100104.asp

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

<!--#include file="conn1.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 100104 where id="&request("id")
rs.open sql,conn,1,3
nsrz=rs("nsrz")
nsry=rs("nsry")
fddbr1=rs("fddbr1")
frzjl=rs("frzjl")
zjhm=rs("zjhm")
zcdz=rs("zcdz")
yzbm1=rs("yzbm1")
scjyd=rs("scjyd")
yzbm2=rs("yzbm2")
zy=rs("zy")
jy=rs("jy")
pzjg=rs("pzjg")
pzwh=rs("pzwh")
pzrq=rs("pzrq")
gsjgm=rs("gsjgm")
yyzzm=rs("yyzzm")
yyzzz=rs("yyzzz")
fzrq=rs("fzrq")
kyrq=rs("kyrq")
yxqx1=rs("yxqx1")
yxqx2=rs("yxqx2")
scjyq1=rs("scjyq1")
scjyq2=rs("scjyq2")
cyrs=rs("cyrs")
jyfs=rs("jyfs")
djzcl=rs("djzcl")
hy=rs("hy")
cwfzr=rs("cwfzr")
bsry=rs("bsry")
bzrzj=rs("bzrzj")
zjhm1=rs("zjhm1")
lxdh=rs("lxdh")
lsgx=rs("lsgx")
zczb1=rs("zczb1")
zczbb=rs("zczbb")
yhzl1=rs("yhzl1")
khyhm1=rs("khyhm1")
yhzh1=rs("yhzh1")
bz1=rs("bz1")
sfjsz1=rs("sfjsz1")
yhzl2=rs("yhzl2")
khyhm2=rs("khyhm2")
yhzh2=rs("yhzh2")
bz2=rs("bz2")
sfjsz2=rs("sfjsz2")
yhzl3=rs("yhzl3")
khyhm3=rs("khyhm3")
yhzh3=rs("yhzh3")
bz3=rs("bz3")
sfjsz3=rs("sfjsz3")
kjbbz=rs("kjbbz")
yhptx=rs("yhptx")
zjfs=rs("zjfs")
nsrsb=rs("nsrsb")
nsrmc=rs("nsrmc")
gb=rs("gb")
zcdz=rs("zcdz")
zczb2=rs("zczb2")
zcbz=rs("zcbz")
djxcl=rs("djxcl")
jyfw=rs("jyfw")
fddbr2=rs("fddbr2")
zgsdm=rs("zgsdm")
zgsmc=rs("zgsmc")
email=rs("email")

end if
%>

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

<%	 rs.addnew
rs("name")=request("name")
rs("nsrz")=request("nsrz")
rs("nsry")=request("nsry")
rs("fddbr1")=request("fddbr1")
rs("frzjl")=request("frzjl")
rs("zjhm")=request("zjhm")
rs("zcdz")=request("zcdz")
rs("yzbm1")=request("yzbm1")
rs("scjyd")=request("scjyd")
rs("yzbm2")=request("yzbm2")
rs("zy")=request("zy")
rs("jy")=request("jy")
rs("pzjg")=request("pzjg")
rs("pzwh")=request("pzwh")
rs("pzrq")=request("pzrq")
rs("gsjgm")=request("gsjgm")
rs("yyzzm")=request("yyzzm")
rs("yyzzz")=request("yyzzz")
rs("fzrq")=request("fzrq")
rs("kyrq")=request("kyrq")
rs("yxqx1")=request("yxqx1")
rs("yxqx2")=request("yxqx2")
rs("scjyq1")=request("scjyq1")
rs("scjyq2")=request("scjyq2")
rs("cyrs")=request("cyrs")
rs("jyfs")=request("jyfs")
rs("djzcl")=request("djzcl")
rs("hy")=request("hy")
rs("cwfzr")=request("cwfzr")
rs("bsry")=request("bsry")
rs("bzrzj")=request("bzrzj")
rs("zjhm1")=request("zjhm1")
rs("lxdh")=request("lxdh")
rs("lsgx")=request("lsgx")
rs("zczb1")=request("zczb1")
rs("zczbb")=request("zczbb")
rs("yhzl1")=request("yhzl1")
rs("khyhm1")=request("khyhm1")
rs("yhzh1")=request("yhzh1")
rs("bz1")=request("bz1")
rs("sfjsz1")=request("sfjsz1")
rs("yhzl2")=request("yhzl2")
rs("khyhm2")=request("khyhm2")
rs("yhzh2")=request("yhzh2")
rs("bz2")=request("bz2")
rs("sfjsz2")=request("sfjsz2")
rs("yhzl3")=request("yhzl3")
rs("khyhm3")=request("khyhm3")
rs("yhzh3")=request("yhzh3")
rs("bz3")=request("bz3")
rs("sfjsz3")=request("sfjsz3")
rs("kjbbz")=request("kjbbz")
rs("yhptx")=request("yhptx")
rs("zjfs")=request("zjfs")
rs("nsrsb")=request("nsrsb")
rs("nsrmc")=request("nsrmc")
rs("gb")=request("gb")
rs("zcdz")=request("zcdz")
rs("zczb2")=request("zczb2")
rs("zcbz")=request("zcbz")
rs("djxcl")=request("djxcl")
rs("jyfw")=request("jyfw")
rs("fddbr2")=request("fddbr2")
rs("zgsdm")=request("zgsdm")
rs("zgsmc")=request("zgsmc")
rs("email")=request("email")

	 rs("is_pass")=0
     rs("add_date")=cstr(date())
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("nsrz")
	 rs("nsr_id")=request("zjhm") 
               rs("reg_name")=session("userid")(1)
 rs("add_date")=cstr(date())
     rs("work")="外资企业分支机构机构登记"
     rs("work_state")="0"
     rs("add_date")=cstr(date())
     rs("work_id")=id
     rs("form_id")="100104"
     rs.update%>
<%
response.Redirect("myform.asp")
end if
'-------------------
%>
<title>纳税人名称</title>
<style>
<!--
 /* Font Definitions */
 @font-face
	{font-family:宋体;
	panose-1:2 1 6 0 3 1 1 1 1 1;}
@font-face
	{font-family:"\@宋体";
	panose-1:2 1 6 0 3 1 1 1 1 1;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
	{margin:0cm;
	margin-bottom:.0001pt;
	text-align:justify;
	text-justify:inter-ideograph;
	font-size:10.5pt;
	font-family:"Times New Roman";}
p.MsoToc1, li.MsoToc1, div.MsoToc1
	{margin:0cm;
	margin-bottom:.0001pt;
	text-align:center;
	font-size:12.0pt;
	font-family:宋体;}
 /* Page Definitions */
 @page Section1
	{size:595.3pt 841.9pt;
	margin:72.0pt 89.85pt 12.45pt 89.85pt;
	layout-grid:15.6pt;}
div.Section1
	{page:Section1;}
body {
	background-color: #CCCCCC;
}
-->
</style>

</head>

<body lang=ZH-CN style='text-justify-trim:punctuation'>

<div class=Section1 style='layout-grid:15.6pt'>