How to use Enter in string 2

[TariqMehmod]

Sir I am trying to send message on whatsapp with following codes

 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?'+SPACE(2)+'what are you doing'


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


=ShellExecute(0, 'open', comando,'', '', 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 activated!" )
Endif

The command work fine, no issue
But I want to send above message into 2 lines so I add CRLF

#define CRLF CHR(13)+CHR(10)
cMessage='How are you sir?'+CRLF+'what are you doing'

When I run command is says

command contains unrecognized command phrase/keyword

Please help me to send above message in 2 lines like this

Regards

 

[Mike Lewis]

Are you sure the error occurs in that line? And are you sure your code is exactly as you posted it.

Your code works for me:

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[TariqMehmod]

Sir I posted correct codes

The message is delivered in single line on whatsapp but I want to send it into 2 lines so I used CRLF

You can run this prg with you pc+whatsapp

when I use this line

cMessage='How are you sir?'+SPACE(2)+'what are you doing'

then no issue
but when I use this line

#define CRLF CHR(13)+CHR(10)
cMessage='How are you sir?'+CRLF+'what are you doing'

then it shows error


Please

 

[Mike Lewis]

OK, I've just run your entire code. The error does NOT occur on the line that you showed. It occurs on this line:

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

That's because you are macro-expanding cMessage, and the CRLF causes the macro expansion to stop. You need to do something like this:

comando='whatsapp://send?phone=&cPhone&text=How are you sir?'+CRLF+'what are you doing'

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[TariqMehmod]

Thanks sir for helping

your wrote

 comando='whatsapp://send?phone=&cPhone&text=How are you sir?'+CRLF+'what are you doing'

you added CRLF in above command

is it possible to add CRLF in variable &cMessage because I am adding message into command string from variable.

Please

 

[Mike Lewis]

You can't put CRLF in &cMessage, because &cMessage is a macro - not a variable. However, there is no reason to use a macro in this case. You could simply do this instead:

#define CRLF CHR(13)+CHR(10)
cMessage='How are you sir?'+CRLF+'what are you doing' 
comando='whatsapp://send?phone=&cPhone&text=' + cMessage

Of course, while that will get rid of your syntax error, I have no way of knowing how Whatsapp will interpret it. You may need some different way of inserting a line break in a Whatsapp message. But try the above and let us know if it works.

Mike


__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[GriffMG]

Like this:

whatsapp://send?phone=02084418979&text=%0a‎Hello%0aWorld

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[Mike Lewis]

So, to combine Griff's suggestion with Tariq's original code:

cMessage='How are you sir?[highlight #EDD400]%0a[/highlight]what are you doing' 
comando='whatsapp://send?phone=&cPhone&text=' + cMessage

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[GriffMG]

Exactly Mike.

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[GriffMG]

Not sure about the &cPhone

cMessage='How are you sir?%0awhat are you doing' 
comando='whatsapp://send?phone='+cPhone+'&text=' + cMessage

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[Mike Lewis]

I think &cPhone should be OK because it just contains a string of digits. But I agree. Better to eliminate it. The whole thing's a bit creaky, because he was using an ampersand both to flag a VFP macro, and as a parameter separator in the URL:

comando='whatsapp://send?phone=[highlight #EDD400]&[/highlight]cPhone[highlight #73D216]&[/highlight]text=' + cMessage

Mike





__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[GriffMG]

That's interesting, that VFP would expand the first macro expression, but not error when the second one doesn't expand.

That is not behaviour I would have expected.

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[TariqMehmod]

Thanks sir GriffMG and Mikewis

Now with these codes messages are going in multiple lines

*#define CRLF CHR(13)+CHR(10)
*cMessage='How are you sir?%0awhat are you doing?'

But issue is in unicode, I am trying to send message in Urdu language like

cMessage=[ÇÓáÇã Úáí˜ã];
+' a0% '+;
[ÓÑ ˜íÓÿ ÀíŸ]
comando='whatsapp://send?phone=&cPhone&text=' + cMessage

When I send message then appears like this

The original messages are like below

Please help

 

[Mike Lewis]

Your Urdu string contains a0%. Try changing it to %0A.

(I know that Urdu is written right-to-left, but I think the URL encoding should go left to right. Someone will correct me if i am wrong about that.)

Mike

__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads

 

[GriffMG]

Well spotted

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are !good for you. ​

 

[TariqMehmod]

Dear all participants,

Thanks for helping all problem solved.

Regards