B4J Question Send MMS or SMS

Sub SMSSend (PhoneNo As String,Message As String)
Dim strTosend As String
    strTosend="CellNumber="& PhoneNo &"&MessageBody="&Message&"&AccountKey=your_account_key"

Dim j As HttpJob
j.Initialize("",Me)
 
j.Postbytes("http://smsgateway.ca/sendsms.aspx?",strTosend.GetBytes("utf-8")  )
Wait For (j) JobDone(j As HttpJob)

If j.Success=True Then
    'do something'   
    j.Release
Else
    'do something'   

    j.Release
End If   
    
End Sub

Sub AppStart (Form1 As Form, Args() As String)
   MainForm = Form1
   'MainForm.RootPane.LoadLayout("1") 'Load the layout file.
   MainForm.Show
   Dim j As HttpJob
   j.Initialize("sms", Me)
   j.Download2("http://api.clickatell.com/http/sendmsg", _
     Array As String("user", "xxx", _
       "password", "xxx", _
       "api_id", "xx", _
       "to", "xxx", _
       "text", "xxx"))
End Sub

Sub JobDone(Job As HttpJob)
   Log("Success: " & Job.Success)
   If Job.Success Then
     Log(Job.GetString)
   End If
   Job.Release
End Sub