PDA

View Full Version : حرفه ای: ارسال sms از طریق url



milad.biroonvand
یک شنبه 06 اردیبهشت 1394, 08:18 صبح
سلام
چطور باید این کد رو در برنامه های ویندوزی پیاده سازی کنم

'تعریف تابع ارسال پیامک
Function SMSSEND(username,password,too,text,FromNumber)
sMsg = server.urlencode(text)
sBaseUrl = "Http://www.namesite.com/APISend.aspx"
set objHTTP = Server.CreateObject("msxml2.XMLHTTP")
objHTTP.open "POST", sBaseUrl, False
objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objHTTP.send "username=" & username & "&password=" & password & "&to=" & too
& "&From:" & FromNumber & "&text=" & sMsg
SMS_SEND = objHTTP.responseText
Set objHTTP = Nothing
End Function
'استفاده از تابع در جای مورد نظر
response.write SMSSEND("username","password","09111111111","Salam","30007546")




خود تابعش آسون است ولی بجای response.write چی باید بنویسیم.

Mani_rf
یک شنبه 06 اردیبهشت 1394, 09:02 صبح
response.write خروجی متد SMSSEND که احتمالا باید از نوع string باشه رو توی صفحه وب سایت شما چاپ میکنه. حال شما اون خروجی رو توی یک متغییر بریز و هر استفاده که دوست داری ازش بکن.

milad.biroonvand
یک شنبه 06 اردیبهشت 1394, 09:05 صبح
این یک متد رو response.write کرده ، حالا استفاده میکنم ببینم جواب میده.

Mani_rf
یک شنبه 06 اردیبهشت 1394, 10:27 صبح
این یک متد رو response.write کرده ، حالا استفاده میکنم ببینم جواب میده.

البته متد رو response.write نکرده! خروجی متد رو response.write کرده.