eldmaty2010

مساعده في API

2 ردود في هذا الموضوع

السلام عليكم 

اعمل برنامج لارسال رسائل قصيرة للعملاء من خلال بوابة ارسال 

واعطوني بيانات API 

استخدمت هذا الكود   لكن به خطا

On Error GoTo Handler
Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
URL = "https://smsmisr.com/api/webapi/?"
objHTTP.Open "POST", URL, False
objHTTP.SetRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.SetRequestHeader "Content-type", "application/x-www-form-urlencoded"
objHTTP.send ("username=" & txtUser.Text & "&password=" & txtPass.Text & "&sender=" & Text1.Text & "&mobile=" & txtMobile.Text & "&message=" & txtMessage.Text & ",&DelayUntil=30/10/2018")
MsgBox objHTTP.ResponseText
Set objHTTP = Nothing
Exit Sub
'Format(DTPicker1.Value, "mm/dd/yyyy")

Handler:
MsgBox Err.Description

 

 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .