asp短信接口源码，比较简单，但也挺实用用的（两个写法）

概述asp短信接口源码，比较简单，但也挺实用用的（两个写法）

下面是内存溢出 jb51.cc 通过网络收集整理的代码片段。

内存溢出小编现在分享给大家，也给大家做个参考。

写法一： <%Sub sendsms(mobile,msg)'如需要发送多个手机号，请自动循环，多个手机号之间用“,”分隔，最后手机号码后不加,号'或调用我们 httpInterfaceMore.aspx 接口，后跟参数一样或调用我们的webservers接口dim userID,password,username,sms,statusdim xmlObj,httpsendurl'请添写您的账号密码sms="平台"username="用户名"userID = "企业ID"  password = "密码"请联系我们索取免费测试帐号httpsendurl="http://jIEkou.56dxw.com/sms/httpInterface.aspx?comID="&userID&"&username="&username&"&userpwd="&password&"&handtel="&mobile&"&sendcontent="&server.URLEncode(msg)&"&sendtime=&smsnumber="&smsSet xmlObj = server.CreateObject("Microsoft.XMLhttp")xmlObj.Open "POST",httpsendurl,falsexmlObj.send()status = xmlObj.responseTextSet xmlObj = nothingIf status = "1" then '发送成功 Response.Write "<br><br>返回状态码："&status&"&nbsp;&nbsp;&nbsp;发送状态：发送成功！&nbsp;&nbsp;&nbsp; <ahref=""JavaScript:history.back();"">返回发送页面</a>"Else '发送失败 Response.Write "<br><br>返回状态码："&status&"&nbsp;&nbsp;&nbsp;发送状态：发送失败！&nbsp;&nbsp;&nbsp;<ahref=""JavaScript:history.back();"">返回发送页面</a>"End ifEnd sub%>写法二 <% Function SendSms(Username,UserPass,DstMobile,SmsMsg)         Dim http,msg,strUrl,RndNumber        set http = Server.CreateObject("Microsoft.XMLhttp")         strurl="http://jIEkou.56dxw.com/sms/httpInterface.aspx?comID=121&username="&Smsname&"&userpwd="&SmsPw&"&sendtime=&smsnumber=1065&handtel="&DstMobile&"&sendcontent="&server.URLEncode(SmsMsg) http.Open "GET",false  http.setRequestheader "Content-type:","text/xml;charset=GB2312"  http.Send  msg=http.ResponseText  set http = nothing     '代表发送成功        If msg="1"  then      SendSms="OK"    else       sendSms="ERR"    end IF   End Function%>来源： http://www.56dxw.com 

以上是内存溢出(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。

总结

以上是内存溢出为你收集整理的asp短信接口源码，比较简单，但也挺实用用的（两个写法）全部内容，希望文章能够帮你解决asp短信接口源码，比较简单，但也挺实用用的（两个写法）所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。