Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Whatsapp unicode
Message
From
01/11/2020 01:54:04
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Web Services
Title:
Whatsapp unicode
Miscellaneous
Thread ID:
01676908
Message ID:
01676908
Views:
49
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
Next
Reply
Map
View

Click here to load this message in the networking platform