⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 savemodi.asp

📁 嘉缘人才6.0精简 ,很好用的人才系统
💻 ASP
字号:
<!--#include file="config.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>
<LINK href=../css/style.css rel=stylesheet type="text/css">
</head>
<body style="margin:0">
<%

dim Adid,getname,geturl,getgif,getplace,getwin,adsrs,adssql,getclass,getclicks,getshows,gettime,gettype,getwidth,getheight,getnote,getdiftime,getusername,getcontact,getprice,getpriceid

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

getname = Trim(Request("name"))
if getname="" then getname=null
geturl = Trim(Request("url"))
if geturl="" then geturl=null
getgif = Trim(Request("gif_url"))
getplace =trim(Request("placeid"))
getwin =trim(Request("window"))
getclass=trim(Request("class"))
gettype=trim(Request("itype"))
getwidth=trim(Request("width"))
if isnumeric(getwidth)=false then getwidth=0
getheight=trim(Request("height"))
if isnumeric(getheight)=false then getheight=0
getnote=trim(Request("note"))
getusername=trim(Request("username"))
if getusername="" then getusername=null
getcontact=trim(Request("contact"))
if getcontact="" then getcontact=null

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

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

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

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=date()

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 JOB_price where JOB_price='"&request("price")&"'"
adsrs.open adssql,conn,1,1
getpriceid=adsrs("JOB_priceid")
adsrs.close

set adsrs=server.createobject("adodb.recordset")
adssql="select * from JOB_ads where JOB_id="&Adid
adsrs.open adssql,conn,1,3
adsrs("JOB_sitename")=getname
adsrs("JOB_showtype")=gettype
adsrs("JOB_url")=geturl
adsrs("JOB_gif_url") = getgif
adsrs("JOB_price") = request("price")
adsrs("JOB_place") = request("placeid")
adsrs("JOB_priceid")=getpriceid
adsrs("JOB_window") = getwin
adsrs("JOB_class") = getclass
adsrs("JOB_clicks") = getclicks
adsrs("JOB_shows") = getshows
adsrs("JOB_lasttime") = gettime
adsrs("JOB_width") = getwidth
adsrs("JOB_height") = getheight
adsrs("JOB_note") = getnote
adsrs("JOB_username") = getusername
adsrs("JOB_contact") = getcontact
adsrs("JOB_time") = date()
adsrs.update
adsrs.close
set adsrs=nothing
conn.close
set conn=nothing
%>
<div align=center><center><p> </p><p> </p>
<li>资料修改成功!<br><br>
如果修改的是暂停或者失效广告,请激活。<br><br>
<a href=javascript:window.opener.location.reload();window.close()>关闭窗口</a>
</center></div>
</body>
</html>

⌨️ 快捷键说明

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