ASP如何获取短信验证码

案例：创蓝253云通讯平台的短信验证码接口demo---ASP

<%@LANGUAGE="VBSCRIPT"CODEPAGE="65001"%>

<%

Function Post(url,data)

         dimHttps

         setHttps=server.createobject("MSXML2.XMLHTTP")

         Https.open"POST",url,false

         Https.setRequestHeader"Content-Type","application/x-www-form-urlencoded"

         Https.senddata

         ifHttps.readystate=4 then

                   dimobjstream

                   setobjstream = Server.CreateObject("adodb.stream")

                   objstream.Type= 1

                   objstream.Mode=3

                   objstream.Open

                   objstream.WriteHttps.responseBody

                   objstream.Position= 0

                   objstream.Type= 2

                   objstream.Charset= "utf-8"

                   Post= objstream.ReadText

                   objstream.Close

                   setobjstream = nothing

                   sethttps=nothing

         endif

End Function

dim target,post_data

target = "http://222.73.117.156/msg/HttpBatchSendSM"

post_data = "account=创蓝账号&pswd=创蓝密码&mobile=手机号&msg="&Server.URLEncode("短信测试")&"&needstatus=true&extno="

response.Write(Post(target,post_data))

''//请自己解析Post(target,post_data)返回的字符串并实现自己的逻辑

''第一行xxxxxxx,0表示成功,其它的参考http.doc文档

%>