<!--#include file="../inc/config.asp"-->
<%
'短信发送接口
dim act,msgconn,Content,Tel,GetKey
act=request.QueryString("act")
if(act="add") then
	Content=request("Content")
	if(len(Content)>70) then
		Content=left(Content,70)
	end if
	Tel=request("Tel")
	GetKey=request.QueryString("GetKey")
	if(GetKey=MemberGenKey) then
		set msgconn=server.CreateObject("adodb.connection") 
		msgconn.open "driver={sql server};server=119.176.105.149;database=cmppe;uid=cmppe;pwd=cmppe"
		msgconn.execute("insert cmpp_submit (src_terminal_id,msg_level,msg_fmt,dest_terminal_id,msg_content,registered_delivery) values ('10655953600','1','15','"&Tel&"',(convert(varbinary(255),'"&Content&"')),'1')")
		msgconn.close
		set msgconn=nothing
		response.Write("成功发送")
	else
		response.Write("密钥错误")
	end if
	'''''''''''''''''''''''''''''''''添加到库''''''''''''''''''''''''''''
end if
%>