save.asp

电子商务系统Easy_Buy是一个在线销售系统

<!--#include file="../0.asp"-->
<!--#include file="../../../conn/conn.asp"-->
<!--#include file="../../../conn/nosql.asp"-->
<%
w=nosql(replace(request("bt"),"'",""))
d=nosql(replace(request("nr"),"'",""))
dz=clng(request("dz"))
userid=clng(request("id"))

If w="" Then
response.write "SORRY <br>"
response.write "请输入问题内容"
response.end
end if
If d="" Then
response.write "SORRY <br>"
response.write "请输入问题答案"
response.end
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from user_kefu "
rs.open sql,conn,1,3
rs.addnew
rs("bt")=w
rs("nr")=d
if dz<>"" then
rs("dz")=1
else
rs("dz")=0
end if
rs("userid")=userid
rs.update
rs.close
'增加数据到产品添加时间限制
Set s= Server.CreateObject("abodb.recordset")
set rs = conn.execute("select top 1 id from user_kefu where bt='"&w&"' order by id desc")
id=rs("id")
rs.close
conn.execute("Insert into sj_xianzhi(id,lx)values("&id&",2)")
Response.Write "<script>alert(""添加成功"");location.href=""edit.asp"";</script>"
%>