admin_gug.asp

电子商城代码

<!--#include file="conn.asp"-->
<%
admintop()
Dim admin_flag
admin_flag=",35,"
	if session("admin_name")="" or instr(","&session("flag")&",",admin_flag)=0 then
	adminflag()	
	else
id=request.QueryString("id")
if request.QueryString("action")="save" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [56770_gg] where id=1", conn, 1, 3
rs("gg_s1")=Safereplace(trim(request("gg_s1")))
rs("gg_s1url")=Safereplace(trim(request("gg_s1url")))
rs("gg1_w")=Safereplace(trim(request("gg1_w")))
rs("gg1_h")=Safereplace(trim(request("gg1_h")))
rs("gg_s2")=Safereplace(trim(request("gg_s2")))
rs("gg_s2url")=Safereplace(trim(request("gg_s2url")))
rs("gg_s3")=Safereplace(trim(request("gg_s3")))
rs("gg_s3url")=Safereplace(trim(request("gg_s3url")))
rs("gg_s4")=Safereplace(trim(request("gg_s4")))
rs("gg_s4url")=Safereplace(trim(request("gg_s4url")))
rs("gg_tj")=Safereplace(trim(request("gg_tj")))
rs("gg_tjurl")=Safereplace(trim(request("gg_tjurl")))
rs("ifggtj")=Safereplace(trim(request("ifggtj")))
rs("ggtj_w")=Safereplace(trim(request("ggtj_w")))
rs("ggtj_h")=Safereplace(trim(request("ggtj_h")))
rs("ggtop")=Safereplace(trim(request("ggtop")))
rs("ggtop_url")=Safereplace(trim(request("ggtop_url")))
rs("ggtop_w")=Safereplace(trim(request("ggtop_w")))
rs("ggtop_h")=Safereplace(trim(request("ggtop_h")))
rs("ifggtop")=Safereplace(trim(request("ifggtop")))
rs.update
rs.close
set rs=nothing
response.write "<script language='javascript'>" 
response.write "alert('鏁版嵁鎻愪氦鎴愬姛锛