www.gusucode.com > Follow me超级搜索引擎 > admin/addinfo3.asp

    <%Response.Charset = "GB2312"%>
<!--#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
%>
<!--#include File="htmlindex.asp" -->
<%

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