' the loop statement
do while messagessent < messages submitted
messagessent = messagesent + 1
Dim client = New RestClient("https://api.infobip.com/sms/1/text/multi")
foneno = trim(foneno.Replace(",",""","""))
Dim request = New RestRequest(Method.POST)
request.AddHeader("accept", "application/json")
request.AddHeader("content-type", "application/json")
request.AddHeader("authorization", "Basic NutrtryoYW5nZW1lMUE=") 'base64 of usename and password
request.AddParameter("application/json","{""messages"":[{""from"":""" + senderid + """,""to"":["""& mobileno &""" ],""text"":""" + message + """}]}",ParameterType.RequestBody)
Dim eresponse As IRestResponse = client.Execute(request)
loop
答案 0 :(得分:0)
我不确定代码有哪些其他问题,但从我可以看到的内容中你有两个明显的错误。
messages submitted
我怀疑这是有效的。foneno
并在其下面的代码mobileno
中使用其他变量。显然,这两个天堂中有一个已被宣布。