<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<%
|
msg_signature=request("msg_signature")
|
timestamp=request("timestamp")
|
nonce=request("nonce")
|
echostr=request("echostr")
|
|
'连接数据库
|
Set objConn = Server.CreateObject("ADODB.Connection")
|
'objConn.ConnectionString="Provider=SQLOLEDB.1;Password=1382929319;Persist Security Info=True;User ID=sa;Initial Catalog=GBR;Data Source=192.168.0.250;Connect Timeout=60"
|
'objConn.ConnectionString="Provider=SQLOLEDB.1;Password=1382929319;Persist Security Info=True;User ID=sa;Initial Catalog=GBR_B2b;Data Source=61.142.253.51;Connect Timeout=60"
|
objConn.ConnectionString="Provider=SQLOLEDB.1;Password=1382929319;Persist Security Info=True;User ID=sa;Initial Catalog=GBR_B2b;Data Source=120.24.159.70;Connect Timeout=60"
|
objConn.Open
|
|
sql="insert into GBR.dbo.Article (ArtWeb,ArtName,ArtContent,ArtType,ArtThemesID) values ('AusImmigrant','企业号测试','"&echostr&"','资讯',19)"
|
objConn.Execute sql
|
|
%>
|
|
<%=echostr%>
|