replay_up.asp

来自「综合测评.你自己看着办」· ASP 代码 · 共 35 行

ASP
35
字号
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<%
if((Session("rank")!=0&&Session("rank")!=1)||Session("passed")!=12287666342)
{Response.Redirect("index.htm");
 Response.End();
 }
 %>
<!--#include file="Connections/conn1.asp" -->
<%

if(String(Session("adminname")) != "undefined"){ c1__adminno1 = String(Session("adminname"));}

if(String(Session("rank")) != "undefined"){ c1__rank1 = String(Session("rank"));}

if(String(Server.HTMLEncode(Request("adminname"))) != "undefined"){ c1__adminname1 = String(Request("adminname"));}

if(String(Server.HTMLEncode(Request("admintxt"))) != "undefined"){ c1__admintxt1 = String(Request("admintxt"));}

if(String(Request("msnid")) != "undefined"){ c1__msnid1 = String(Request("msnid"));}


%>
<%

var c1 = Server.CreateObject("ADODB.Command");
c1.ActiveConnection = MM_conn1_STRING;
c1.CommandText = "UPDATE  msn SET adminno='"+ c1__adminno1 + "', adminname='"+ c1__adminname1 + "',  admintxt='"+ c1__admintxt1 + "',adminrank="+ c1__rank1 + " WHERE msnid="+ c1__msnid1 + " ";
c1.CommandType = 1;
c1.CommandTimeout = 0;
c1.Prepared = true;
c1.Execute();
Response.Write("<script language='javascript'>alert('成功提交留言'); location=('msn.asp');</script>")
Response.End();
%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?