📄 savejingjia.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<%
if request.Cookies("days6")("username")="" then
response.write "<script language=javascript>alert('您没用会员帐号登陆，不支持商家出价！！');window.close;</script>"
response.End
end if
if session("addtime")<>"" then
if DateDiff("s",session("addtime"),Now())<10 then
response.write "<script language=javascript>alert('你提交数据太快，请等10秒在提交！');history.go(-1);</script>"
response.end
end if
end if
bookid=int(trim(request("id")))
username=request.cookies("days6")("username")
jiage=int(trim(request("jiage")))
tidu=int(session("tidu"))
shuliang=int(trim(request("shuliang")))
if jiage<tidu then
response.write"<script>alert(""你违反了竞价规则…正确的出价不小于[有效出价]"");history.go(-1);</script>"
response.end
end if
set rs_user=server.CreateObject("adodb.recordset")
rs_user.Open "select userid,jf from [user] where username='"&username&"'",conn,1,3
rs_user("jf")=rs_user("jf")+1
rs_user.update
set rs_news=server.CreateObject("adodb.recordset")
rs_news.Open "select kucun from [shop_books] where bookid="&bookid&"",conn,1,3
kucun=int(rs_news("kucun"))
if shuliang>kucun then
response.write"<script>alert(""库存数量不足！！"");history.go(-1);</script>"
response.end
end if
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from bookjia",conn,1,3
rs.AddNew
rs("bookid")=bookid
rs("leixing")=1
rs("username")=username
rs("userid")=rs_user("userid")
rs("jiage")=trim(request("jiage"))
rs("shuliang")=trim(request("shuliang")) '
rs("adddate")=now() '加入日期
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rs("userip")=userip
rs.Update
session("addtime")=now()
rs.Close
set rs=nothing
response.Write "成功出价!"
cl
response.End
set session("tidu")=nothing
%>
<%sub cl()%>
<body onLoad="setTimeout(window.close, 1000)">
<%end sub%>
<%closedb%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -