6004.asp

关于网络渗透技术的详细讲解

<!--#include file="conn1.asp" -->
 <!---#include file="form_check.asp"--->    <%
'  dim conn   
' dim connstr
'on error resume next
'   connstr="DBQ="+server.mappath("/sgs/Depot/NBArticle.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
'     set conn=server.createobject("ADODB.CONNECTION")
'     conn.open connstr 
%>
 <%'---赋值
if session("master_name")<>"" then
'Const sCacheName="NB274868191"
	Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from 6004 where id="&request("id")
rs.open sql,conn,1,3
qymc=rs("qymc")
hy1=rs("hy1")
djzcl=rs("djzcl")
zgbm=rs("zgbm")
qymc=rs("qymc")
zcdz=rs("zcdz")
scjyd=rs("scjyd")
fddbr=rs("fddbr")
sfzjm=rs("sfzjm")
lxdh=rs("lxdh")
jcsj=rs("jcsj")
zdmj=rs("zdmj")
jzmj=rs("jzmj")
hy2=rs("hy2")
hsxs=rs("hsxs")
djzcl=rs("djzcl")
zy=rs("zy")
jy=rs("jy")
hj1=rs("hj1")
gdzcj=rs("gdzcj")
zyldz=rs("zyldz")
hj2=rs("hj2")
zc=rs("zc")
jz=rs("jz")
yhdk=rs("yhdk")
mzjz=rs("mzjz")
hj3=rs("hj3")
glry=rs("glry")
jsry=rs("jsry")
scry=rs("scry")
rs=rs("rs")
zscry=rs("zscry")
sbmc1=rs("sbmc1")
xh1=rs("xh1")
sl1=rs("sl1")
zcsj1=rs("zcsj1")
sbmc2=rs("sbmc2")
xh2=rs("xh2")
sl2=rs("sl2")
zcsj2=rs("zcsj2")
sbmc3=rs("sbmc3")
xh3=rs("xh3")
sl3=rs("sl3")
zcsj3=rs("zcsj3")
sbmc4=rs("sbmc4")
xh4=rs("xh4")
sl4=rs("sl4")
zcsj4=rs("zcsj4")
sbmc5=rs("sbmc5")
xh5=rs("xh5")
sl5=rs("sl5")
zcsj5=rs("zcsj5")
cpmc1=rs("cpmc1")
nscnl1=rs("nscnl1")
dw1=rs("dw1")
cpmc2=rs("cpmc2")
nscnl2=rs("nscnl2")
dw2=rs("dw2")
cpmc3=rs("cpmc3")
nscnl3=rs("nscnl3")
dw3=rs("dw3")
cpmc4=rs("cpmc4")
nscnl4=rs("nscnl4")
dw4=rs("dw4")
cpmc5=rs("cpmc5")
nscnl5=rs("nscnl5")
dw5=rs("dw5")
qysql=rs("qysql")
blsj1=rs("blsj1")
qyzgb=rs("qyzgb")
blsj2=rs("blsj2")
xqjmzb=rs("xqjmzb")
blsj3=rs("blsj3")
dsjmz=rs("dsjmz")
blsj4=rs("blsj4")
gjswj1=rs("gjswj1")
blsj5=rs("blsj5")
dfswj1=rs("dfswj1")
blsj6=rs("blsj6")
gjswj2=rs("gjswj2")
blsj7=rs("blsj7")
dfswj2=rs("dfswj2")
blsj8=rs("blsj8")
gjswj3=rs("gjswj3")
blsj9=rs("blsj9")
dfswj3=rs("dfswj3")
blsj10=rs("blsj10")
sjmzb=rs("sjmzb")
blsj11=rs("blsj11")
else
if session("userid")(1)<>"" then
nsrsb=session("userid")(1)
qymc=session("userid")(19)
end if
end if
%>

<%'----------添加
if REQUEST("bb")="提交" then
Const sCacheName="NB274868191"
%>
	<%
	Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from 6004"
rs.open sql,conn,1,3
%>

<%	 rs.addnew
rs("name")=request("name")
rs("qymc")=request("qymc")
rs("hy1")=request("hy1")
rs("djzcl")=request("djzcl")
rs("zgbm")=request("zgbm")
rs("qymc")=request("qymc")
rs("zcdz")=request("zcdz")
rs("scjyd")=request("scjyd")
rs("fddbr")=request("fddbr")
rs("sfzjm")=request("sfzjm")
rs("lxdh")=request("lxdh")
rs("jcsj")=request("jcsj")
rs("zdmj")=request("zdmj")
rs("jzmj")=request("jzmj")
rs("hy2")=request("hy2")
rs("hsxs")=request("hsxs")
rs("djzcl")=request("djzcl")
rs("zy")=request("zy")
rs("jy")=request("jy")
rs("hj1")=request("hj1")
rs("gdzcj")=request("gdzcj")
rs("zyldz")=request("zyldz")
rs("hj2")=request("hj2")
rs("zc")=request("zc")
rs("jz")=request("jz")
rs("yhdk")=request("yhdk")
rs("mzjz")=request("mzjz")
rs("hj3")=request("hj3")
rs("glry")=request("glry")
rs("jsry")=request("jsry")
rs("scry")=request("scry")
rs("rs")=request("rs")
rs("zscry")=request("zscry")
rs("sbmc1")=request("sbmc1")
rs("xh1")=request("xh1")
rs("sl1")=request("sl1")
rs("zcsj1")=request("zcsj1")
rs("sbmc2")=request("sbmc2")
rs("xh2")=request("xh2")
rs("sl2")=request("sl2")
rs("zcsj2")=request("zcsj2")
rs("sbmc3")=request("sbmc3")
rs("xh3")=request("xh3")
rs("sl3")=request("sl3")
rs("zcsj3")=request("zcsj3")
rs("sbmc4")=request("sbmc4")
rs("xh4")=request("xh4")
rs("sl4")=request("sl4")
rs("zcsj4")=request("zcsj4")
rs("sbmc5")=request("sbmc5")
rs("xh5")=request("xh5")
rs("sl5")=request("sl5")
rs("zcsj5")=request("zcsj5")
rs("cpmc1")=request("cpmc1")
rs("nscnl1")=request("nscnl1")
rs("dw1")=request("dw1")
rs("cpmc2")=request("cpmc2")
rs("nscnl2")=request("nscnl2")
rs("dw2")=request("dw2")
rs("cpmc3")=request("cpmc3")
rs("nscnl3")=request("nscnl3")
rs("dw3")=request("dw3")
rs("cpmc4")=request("cpmc4")
rs("nscnl4")=request("nscnl4")
rs("dw4")=request("dw4")
rs("cpmc5")=request("cpmc5")
rs("nscnl5")=request("nscnl5")
rs("dw5")=request("dw5")
rs("qysql")=request("qysql")
rs("blsj1")=request("blsj1")
rs("qyzgb")=request("qyzgb")
rs("blsj2")=request("blsj2")
rs("xqjmzb")=request("xqjmzb")
rs("blsj3")=request("blsj3")
rs("dsjmz")=request("dsjmz")
rs("blsj4")=request("blsj4")
rs("gjswj1")=request("gjswj1")
rs("blsj5")=request("blsj5")
rs("dfswj1")=request("dfswj1")
rs("blsj6")=request("blsj6")
rs("gjswj2")=request("gjswj2")
rs("blsj7")=request("blsj7")
rs("dfswj2")=request("dfswj2")
rs("blsj8")=request("blsj8")
rs("gjswj3")=request("gjswj3")
rs("blsj9")=request("blsj9")
rs("dfswj3")=request("dfswj3")
rs("blsj10")=request("blsj10")
rs("sjmzb")=request("sjmzb")
rs("blsj11")=request("blsj11")
rs("add_date")=cstr(date())
	 rs("is_pass")=0
rs.update
id=rs("id")
'-------
	Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from nsr_work"
rs.open sql,conn,1,3
rs.addnew
	 rs("nsr_mc")=request("qymc")
	 rs("nsr_id")=request("sfzjm") 
     rs("work")="社会福利企业证书申请表"
     rs("work_state")="0"
         rs("reg_name")=session("userid")(1)
 rs("add_date")=cstr(date())
     rs("work_id")=id
     rs("form_id")="6004"
     rs.update%>
<%session("userid")=""