Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Whatsapp unicode
Message
De
01/11/2020 01:54:04
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Web Services
Titre:
Whatsapp unicode
Divers
Thread ID:
01676908
Message ID:
01676908
Vues:
48
Dear Experts

I am using these codes to send messages on whatsapp
Declare  Integer FindWindow In WIN32API String , String
Declare  Integer SetForegroundWindow In WIN32API Integer
Declare  Integer  ShowWindow  In WIN32API Integer , Integer
Declare Integer ShellExecute In shell32.Dll ;
	INTEGER hndWin, ;
	STRING cAction, ;
	STRING cFileName, ;
	STRING cParams, ;
	STRING cDir, ;
	INTEGER nShowWin

Local lt, lhwnd

cPhone=[923000000000]

cMessage=[How are you sir?]

cmd='whatsapp://send?phone=&cPhone&text=&cMessage'

=ShellExecute(0, 'open', cmd,'', '', 1)

Wait "" Timeout 3
lt = "Whatsapp"
lhwnd = FindWindow (0, lt)
If lhwnd!= 0 					
	SetForegroundWindow (lhwnd) 
	ShowWindow (lhwnd, 1)
	ox = Createobject ( "Wscript.Shell" )
	ox.sendKeys ( '{ENTER}' )
	*Messagebox ( "Message Sent" )
Else
	Messagebox ( "Whatsapp no activada!" )
Endif
The codes work fine, no issue.
Message are delivered properly.

But.... only English messages

When I try to send message in a language other than English suppose Urdu like this
cMessage=[آپ کیسے ہییں آپ کا آج کا کیا پروگرام ہے؟]
Then I have to face this error message
unrecognized command verb

My question is how to pass unicode characters in this string
cmd='whatsapp://send?phone=&cPhone&text=&cMessage'
Please help me to prepare above message to send whatsapp.

Regards
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform