<!--#include file=CONN.ASP-->
<!--#include file=foxx.asp-->
<!--#include file="config.asp"-->
<!--#include file="usercookies.asp"-->
<link href="fox.css" rel="stylesheet" type="text/css">
<%
dim xxid,ts,username,lxrname,usertel,phone,company,qq,email,dizhi,code,ad,memo,huitype,yz,class1,class2,youxiao,leixing,jiage,jiages,sheng,shi,xiang,rs,sql,userip
xxid=trim(request("xxid"))
ts=trim(request("ts"))
username=trim(request("username"))
lxrname=trim(request("lxrname"))
usertel=trim(request("usertel"))
phone=trim(request("phone"))
company=trim(request("company"))
qq=trim(request("qq"))
email=trim(request("email"))
dizhi=trim(request("dizhi"))
code=trim(request("code"))
ad=trim(request("ad"))
memo=trim(request("memo"))
huitype=trim(request("huitype"))
yz=trim(request("yz"))
class1=trim(request("class1"))
class2=trim(request("class2"))
youxiao=trim(request("youxiao"))
leixing=trim(request("leixing"))
jiage=trim(request("jiage"))
jiages=trim(request("jiages"))
sheng=trim(request("sheng"))
shi=trim(request("shi"))
xiang=trim(request("xiang"))

if huitype="0" then
    Response.Write "<script>alert('您的级别不能操作此功能！');history.go(-1);</SCRIPT>"
    Response.end
end if

set rs=server.createobject("adodb.recordset")
sql="select * from [FOX_shop] where UserName='"&UserName&"' and xxid='"&xxid&"'"
rs.open sql,conn,1,3
if session("addxinxi")<>"" then
  if DateDiff("s",session("addxinxi"),Now())<180 then
  response.write "<script>alert('系统保护：你提交数据太快，系统中止运行，请等待180秒钟！！');this.location.href='userhome.asp';</SCRIPT>"
  response.end
  end if
  end if
if not rs.eof or not rs.bof then
rs("ts")=ts
rs("lxrname")=lxrname
rs("usertel")=usertel
rs("phone")=phone
rs("company")=company
rs("qq")=qq
rs("email")=email
rs("dizhi")=dizhi
rs("code")=code
rs("ad")=ad
rs("memo")=memo
rs("huitype")=huitype
rs("class1")=class1
rs("class2")=class2
rs("youxiao")=youxiao
rs("leixing")=leixing
rs("jiage")=jiage
rs("jiages")=jiages
rs("sheng")=sheng
rs("shi")=shi
rs("xiang")=xiang
rs("youxiao")=youxiao
if huitype>"0" and yz="1" then
rs("yz")=1
else
rs("yz")=0
end if
rs("fbsj")=now()
rs("dqsj")=rs("fbsj")+rs("youxiao")
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then 
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rs("ip")=userip
rs.update
rs.close
set rs=nothing
else
rs.addnew
rs("xxid")=xxid
rs("username")=username
rs("company")=company
rs("ad")=ad
rs("memo")=memo
rs("huitype")=huitype
rs("class1")=class1
rs("class2")=class2
rs("youxiao")=youxiao
rs("leixing")=leixing
rs("jiage")=jiage
rs("sheng")=sheng
rs("shi")=shi
rs("xiang")=xiang
rs("youxiao")=youxiao
if huitype>"0" and yz="1" then
rs("yz")=1
else
rs("yz")=0
end if
rs("fbsj")=now()
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then 
userip=Request.ServerVariables("REMOTE_ADDR")
end if
rs("ip")=userip
rs.update
rs.close
set rs=nothing
end if
set rs=server.createobject("adodb.recordset")
sql="select jf,dxb from [FOX_user] where UserName='"&UserName&"'"
rs.open sql,conn,1,3
if huitype="1" then
rs("dxb")=rs("dxb")-hxb
end if
rs("jf")=rs("jf")+spjf
rs.update
rs.close
set rs=nothing
closedb
session("addxinxi")=now()
    Response.Write "<script>alert('发布成功！');this.location.href='spma.asp';</SCRIPT>"
     response.end
Response.Redirect "spma.asp"
%></body></html>