📄 savemodi.asp

📁 一个公司营销系统
💻 ASP
字号:
<%
if session("username")="" or session("password")="" then
   session.timeout=5
   response.write "<script language='javascript'>"
   response.write "alert('账号或密码错误！');"
   response.write "history.go(-1);"
   response.write "</script>"
   response.end
end if
%>
<!--#include file="../conn.asp"-->
<html><head>
<meta http-equiv=Content-Language content=zh-cn>
<meta http-equiv=Content-Type content=text/html; charset=gb2312>
<meta http-equiv=Pragma content=no-cache>
<title>修改广告播放设置</title>

<base target=_top>
</head><body marginwidth=0 marginheight=0>



<%
adsconn.open adsdata
dim getid,getname,geturl,getgif,getplace,getwin,adsrs,adssql,getclass,getclicks,getshows,gettime

getid=cint(request.querystring("id"))

getname = Trim(Request("name"))
geturl = Trim(Request("url"))
getgif = Trim(Request("gif_url"))
getplace =trim(Request("place"))
getwin =trim(Request("window"))
getclass=trim(Request("class"))

if getclass=0 then
getclicks=0
getshows=0
gettime=now()

elseif getclass=1 then
getclicks=trim(request("clicks1"))
getshows=0
gettime=now()

elseif getclass=2 then
getclicks=0
getshows=trim(request("shows2"))
gettime=now()

elseif getclass=3 then
getclicks=0
getshows=0
gettime=trim(request("time3"))

elseif getclass=4 then
getclicks=trim(request("clicks4"))
getshows=trim(request("shows4"))
gettime=now()

elseif getclass=5 then
getclicks=trim(request("clicks5"))
getshows=0
gettime=trim(request("time5"))

elseif getclass=6 then
getclicks=0
getshows=trim(request("shows6"))
gettime=trim(request("time6"))

elseif getclass=7 then
getclicks=trim(request("clicks7"))
getshows=trim(request("shows7"))
gettime=trim(request("time7"))
end if


set adsrs=server.createobject("adodb.recordset")
adssql="select * from ads where id="&getid
adsrs.open adssql,adsconn,1,3
adsrs("sitename")=getname
adsrs("url")=geturl
adsrs("gif_url") = getgif
adsrs("place") = getplace
adsrs("window") = getwin
adsrs("class") = getclass
adsrs("clicks") = getclicks
adsrs("shows") = getshows
adsrs("lasttime") = gettime
adsrs.update
adsrs.close
set adsrs=nothing
adsconn.close
set adsconn=nothing
%>


<div align=center><center><p>　</p><p>　</p>
    <li><font color="#FF0000">资料修改成功</font>！<br>
      <br>
如果修改的是暂停或者失效广告，请激活。<br><br>
<a href=javascript:window.close()>关闭窗口</a>
</center></div>


</body>
</html>
⌨️ 快捷键说明

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