admin_count.asp

电子商城代码

<!--#include file="conn.asp"-->
<%
admintop()
Dim admin_flag
admin_flag=",3,"
	if session("admin_name")="" or instr(","&session("flag")&",",admin_flag)=0 then
	adminflag()	
	else
if request("action")="change" then
today=trim(request("today"))
if today="" then today=1
yestoday=trim(request("yestoday"))
if yestoday="" then yestoday=1
allcount=trim(request("allcount"))
if allcount="" then allcount=1
set rs=server.CreateObject("adodb.recordset")
sql="select * from [56770_count]"
rs.open sql, conn, 1, 3
rs("today")=today
rs("yestoday")=yestoday
rs("allcount")=allcount
rs("shuaxin")=request("shuaxin")
rs("ys")=request("ys")
rs("sj2")=trim(request("sj2"))
rs.update
rs.close
response.write "淇℃伅鏇存柊瀹屾瘯锛