0

dear all im tried to send multiline sms using gnikii but it fails

 Dim xCmd As String
    xCmd = "cmd.exe /c echo " & txtBody.Text & " | c:\sms\gnokii.exe --sendsms 0771234567 2> test.txt"
    Shell(xCmd)

Please help me

Amila Thennakoon
  • 419
  • 1
  • 5
  • 15

1 Answers1

0

You can split your text on vbCrLf and add echo in front so you end up with this cmdline instead

cmd.exe /c lineOne echo line2 | c:\sms\gnokii.exe --sendsms 0771234567 2> test.txt

code wise you can do it like this:

    Dim sString As String 
    Dim aLines As String()
    Dim xCmd As String

    sString = "lineOne" & vbCrLf & "line2"
    aLines = sString.Split(vbCrLf)
    sString = Join(aLines," echo")

    xCmd = "cmd.exe /c " & sString & " | c:\sms\gnokii.exe --sendsms 0771234567 2> test.txt"
    Shell(xCmd)
Archlight
  • 2,019
  • 2
  • 21
  • 34