qhdjsave.asp

来自「if you want it,call me.」· ASP 代码 · 共 29 行

<!--#include file="conn.asp"-->
<%
'=======================================
'88red科技独立开发完成本程序，并提供免费技术支持与升级服务
'官方网站 http://www.88red.com    QQ:8375158  TEL:[phone]
'对于商业客户，本站提供细致周到的各项售后服务；对于盗版客户恕不提供，对于散播本程序者本站将追究其法律责任
'88red科技将陆续开发其他各种先进程序，例如企业网站建站系统等等，对老客户购买其他程序给予最大程度的优惠，欢迎洽谈
'=======================================
if request.form("connect")="" then
response.write"<script language=javascript>alert('用户名必须填写');this.location.href='javascript:history.go(-1)';</script>"
response.end
end if
if request.form("content")="" then
response.write"<script language=javascript>alert('内容必须填写');this.location.href='javascript:history.go(-1)';</script>"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from qhdj"
rs.open sql,conn,3,3
rs.addnew
rs("connect")=trim(request("connect"))
rs("content")=trim(request("content"))
rs("date")=now()
rs("ip")=request.servervariables("remote_addr")
rs.update
rs.close
set rs=nothing
response.write "<script language=javascript>alert('您的登记已成功提交，谢谢！');window.location.reload('javascript:window.close()')</script>"
%>