<%@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%>