send.asp

短信息群发平台 功能强大 使用于各行各业 还可以和其他系统连接

<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/md5.asp"-->


<%

esname="3dwuxi"
key = "a1b2c3d4e5f6g7h8"
phone=trim(request("phone"))
msg=request("msg")



	set objHttp = CreateObject("Microsoft.XMLHTTP")

	strurl="http://www.mhsms.com/api/?esname="&esname&"&key="&key&"&phone="&phone&"&msg="&msg&""

	objHttp.Open "get",strURL,false
	objHttp.setrequestheader "content-length",len(stra)
	objHttp.send
		
    txt=objHttp.responseText

response.write(txt)
response.end



%>