addinfo3.asp

来自「Follow me超级搜索引擎V6.2(完美版)绝对是目前全国功能最优秀的超级搜」· ASP 代码 · 共 30 行

<!--#include File="../Conn.asp" -->
<%
dbpath="../"
dblink
%>
<!--#include file="check.asp"-->

<%dim sql 
dim rs,other3,aa,bb,n 

gg3=LCase(request("other3"))


Set Rs=Server.Createobject("Adodb.Recordset")
sql="select * from adminuser where username like '"&Session("admin")&"' "
Rs.open Sql,Conn,1,3
Rs("gg3")=gg3
Rs.update


rs.close
Set rs = Nothing
   response.write "<script language='javascript'>"
   response.write "alert('广告添加成功！');"
   response.write "history.go(-1);"
   response.write "</script>"
   response.end 
%>