jzz_save.asp

本程序采用ACC数据核心构件！！ 功能介绍： 程序代码重新设计与优化

<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/code.asp"-->
<!--#include file="inc/SqlIn.Asp"-->
<% 
if not isnumeric(Request.Form("jzqq")) then
	   response.write "<script>alert('家族联系人QQ请直接输入正确的QQ号码');history.back();</Script>"
   response.end
end if
if not isnumeric(Request.Form("vswebqq")) then
   response.write "<script>alert('对战服管理员QQ请直接输入正确的QQ号码');history.back();</Script>"
   response.end
end if
%>

<%
set rs = server.createobject("adodb.recordset")
dim jzname,vsname,vstime,gameid,jzmaster,jzqq,jzTel,vsserver,vsweb,vswebqq,vswebtel,about
jzname=htmlencode(request("jzname"))
vsname=htmlencode(request("vsname"))
vstime=request.form("vstime")
gameid=htmlencode(request.form("gameid"))
jzmaster=htmlencode(request.form("jzmaster"))
jzqq=htmlencode(request.form("jzqq"))
jztel=htmlencode(request.form("jztel"))
vsserver=htmlencode(request.form("vsserver"))
vsweb=htmlencode(request.form("vsweb"))
vswebqq=htmlencode(request.form("vswebqq"))
vswebtel=htmlencode(request.form("vswebtel"))
about=htmlencode(request.form("about"))


if jzname="" or vsname="" or vstime="" or gameid="" or jzmaster="" or  jzqq="" or jzTel="" or vsserver="" or vsweb="" or vswebqq="" or vswebtel="" or about="" then
response.write "<script>alert('带*的选项必须填写或选择，请返回检查后再提交');history.back()</script>"
response.end
end if

call add()

sub add()

	sql="select * from Gq_Jzzdata" 
	rs.open sql,conn,1,3
	rs.addnew
	rs("jzname")=jzname
    rs("vsname")=vsname
    rs("vstime")=vstime
    rs("gameid")=gameid
    rs("jzmaster")=jzmaster
    rs("jzqq")=jzqq
    rs("jztel")=jzTel
    rs("vsserver")=vsserver
    rs("vsweb")=vsweb
    rs("vswebqq")=vswebqq
    rs("vswebtel")=vswebtel
    rs("about")=about
	rs("ulock")=JZZUlock   '1:前台添加家族战信息时自动通过审核；0:前台发布家族战信息后需在后台审核后才能显示。
	rs("top")=0
	rs("addtime")=now()
	rs.update
	response.write "<script>alert('恭喜您家族战信息提交成功，请等待管理员审核\n审核成功后您发布的信息将被显示');location.replace('index.asp')</script>"
	rs.close
	rs.nothing
	call closeconn
end sub
%>