form da sms gönderme

Private Sub Sms_Gonder_Click()
 Me.mtn_sms = "https://api.netgsm.com.tr/bulkhttppost.asp?usercode=xxxxxx&password=xxxxx&gsmno=" + Me.Metin47 + "&message=" + Me.Metin53 + "  " + Me.IDMusteri + "  " + Me.Metin51 + "&msgheader=xxxxx&startdate=&stopdate=&dil=TR"
WebBrowser.Navigate URL:=Me.mtn_sms
 
End Sub
bu kodlamının message kısmını sayın yazısını eklemek istiyorum nasıl yapacağım metin olarak ÖRNEK OLARAK
SAYIN  EMRE KALAYCI metin53 kayıtdaki isimi alıyor saten müsteri isminin başına sayın kelimesi eklenecek metin kutusu açıp gösterdim ama olmadı

Merhabalar;
şeklinde sanırım istediğiniz gibi olur.

(17/01/2016, 11:36)serdar_20 yazdı: Merhabalar;

Kod:

Me.mtn_sms = "https://api.netgsm.com.tr/bulkhttppost.asp?usercode=xxxxxx&password=xxxxx&gsmno=" + Me.Metin47 + "&message=" + "Sayın " & Me.Metin53 + "  " + Me.IDMusteri + "  " + Me.Metin51 + "&msgheader=xxxxx&startdate=&stopdate=&dil=TR"

şeklinde sanırım istediğiniz gibi olur.

olmuyor bunu daha önce denedim

Kodu aşağıdaki ile değiştirerek deneyiniz

Private Sub Sms_Gonder_Click()



Dim MesajYazisi As String

MesajYazisi = "Sayın " & Me.Metin53

Me.mtn_sms = "https://api.netgsm.com.tr/bulkhttppost.asp?usercode=xxxxxx&password=xxxxx&gsmno=" + Me.Metin47 + "&message=" + MesajYazisi + "  " + Me.IDMusteri + "  " + Me.Metin51 + "&msgheader=xxxxx&startdate=&stopdate=&dil=TR"

WebBrowser.Navigate URL:=Me.mtn_sms

End Sub

tamamdır hocam oldu sağolasın

Emre bey, sms islemi icin ne kadar ucret oduyorsunuz acaba?