100201.asp

来自「关于网络渗透技术的详细讲解」· ASP 代码 · 共 759 行 · 第 1/3 页

ASP
759
字号
<!--#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 100201 where id="&request("id")
rs.open sql,conn,1,3
nsrsb=rs("nsrsb")
nsrmc=rs("nsrmc")
fddbr=rs("fddbr")
xh1=rs("xh1")
bgxm1=rs("bgxm1")
bgqnl1=rs("bgqnl1")
bghnl1=rs("bghnl1")
xh2=rs("xh2")
bgxm2=rs("bgxm2")
bgqnl2=rs("bgqnl2")
bghnl2=rs("bghnl2")
xh3=rs("xh3")
bgxm3=rs("bgxm3")
bgqnl3=rs("bgqnl3")
bghnl3=rs("bghnl3")
xh4=rs("xh4")
bgxm4=rs("bgxm4")
bgqnl4=rs("bgqnl4")
bghnl4=rs("bghnl4")
xh5=rs("xh5")
bgxm5=rs("bgxm5")
bgqnl5=rs("bgqnl5")
bghnl5=rs("bghnl5")
xh6=rs("xh6")
bgxm6=rs("bgxm6")
bgqnl6=rs("bgqnl6")
nsrqz=rs("nsrqz")
fzr1=rs("fzr1")
bsry=rs("bsry")
blsj1=rs("blsj1")
zgswj=rs("zgswj")
fzr2=rs("fzr2")
jbr=rs("jbr")
blsj2=rs("blsj2")
else
if session("userid")(1)<>"" then
nsrsb=session("userid")(1)
nsrmc=session("userid")(19)
end if
end if
%>
<%if request("b1")="返回" then
response.redirect "admin_swsh.asp"
end if%>
<%'----------添加
if REQUEST("bb")="提交" then
Const sCacheName="NB274868191"
%>
	<%
	Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from 100201"
rs.open sql,conn,1,3
%>

<%	 rs.addnew
rs("name")=session("userid")(1)
rs("name")=request("name")
rs("nsrsb")=request("nsrsb")
rs("nsrmc")=request("nsrmc")
rs("fddbr")=request("fddbr")
rs("xh1")=request("xh1")
rs("bgxm1")=request("bgxm1")
rs("bgqnl1")=request("bgqnl1")
rs("bghnl1")=request("bghnl1")
rs("xh2")=request("xh2")
rs("bgxm2")=request("bgxm2")
rs("bgqnl2")=request("bgqnl2")
rs("bghnl2")=request("bghnl2")
rs("xh3")=request("xh3")
rs("bgxm3")=request("bgxm3")
rs("bgqnl3")=request("bgqnl3")
rs("bghnl3")=request("bghnl3")
rs("xh4")=request("xh4")
rs("bgxm4")=request("bgxm4")
rs("bgqnl4")=request("bgqnl4")
rs("bghnl4")=request("bghnl4")
rs("xh5")=request("xh5")
rs("bgxm5")=request("bgxm5")
rs("bgqnl5")=request("bgqnl5")
rs("bghnl5")=request("bghnl5")
rs("xh6")=request("xh6")
rs("bgxm6")=request("bgxm6")
rs("bgqnl6")=request("bgqnl6")
rs("nsrqz")=request("nsrqz")
rs("fzr1")=request("fzr1")
rs("bsry")=request("bsry")
rs("blsj1")=request("blsj1")
rs("zgswj")=request("zgswj")
rs("fzr2")=request("fzr2")
rs("jbr")=request("jbr")
rs("blsj2")=request("blsj2")

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("nsrmc")
	 rs("nsr_id")=request("nsrsb") 
     rs("reg_name")=session("userid")(1)
      rs("add_date")=cstr(date())
    rs("work")="税务变更登记表"
rs("work_state")="0"
     rs("work_id")=id
     rs("form_id")="100201"
     rs.update
     %>
<%session("userid")=""
response.Redirect "myform.asp"
end if
'-------------------
%><title>税务变更登记表</title>
<!--[if gte mso 9]><xml>
 <o:DocumentProperties>
  <o:Author>chen</o:Author>
  <o:Template>Normal</o:Template>
  <o:LastAuthor>chen</o:LastAuthor>
  <o:Revision>2</o:Revision>
  <o:TotalTime>3</o:TotalTime>
  <o:Created>2005-04-16T12:44:00Z</o:Created>
  <o:LastSaved>2005-04-16T12:44:00Z</o:LastSaved>
  <o:Pages>1</o:Pages>
  <o:Words>63</o:Words>
  <o:Characters>365</o:Characters>
  <o:Lines>3</o:Lines>
  <o:Paragraphs>1</o:Paragraphs>
  <o:CharactersWithSpaces>427</o:CharactersWithSpaces>
  <o:Version>10.4219</o:Version>
 </o:DocumentProperties>
</xml><![endif]--><!--[if gte mso 9]><xml>
 <w:WordDocument>
  <w:SpellingState>Clean</w:SpellingState>
  <w:GrammarState>Clean</w:GrammarState>
  <w:PunctuationKerning/>
  <w:DrawingGridVerticalSpacing>7.8 磅</w:DrawingGridVerticalSpacing>
  <w:DisplayHorizontalDrawingGridEvery>0</w:DisplayHorizontalDrawingGridEvery>
  <w:DisplayVerticalDrawingGridEvery>2</w:DisplayVerticalDrawingGridEvery>
  <w:Compatibility>
   <w:SpaceForUL/>
   <w:BalanceSingleByteDoubleByteWidth/>
   <w:DoNotLeaveBackslashAlone/>
   <w:ULTrailSpace/>
   <w:DoNotExpandShiftReturn/>
   <w:AdjustLineHeightInTable/>
   <w:BreakWrappedTables/>
   <w:SnapToGridInCell/>
   <w:WrapTextWithPunct/>
   <w:UseAsianBreakRules/>
   <w:UseFELayout/>
  </w:Compatibility>
  <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel>
 </w:WordDocument>
</xml><![endif]-->
<style>
<!--
 /* Font Definitions */
 @font-face
	{font-family:宋体;
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-alt:SimSun;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:3 135135232 16 0 262145 0;}
@font-face
	{font-family:黑体;
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-alt:SimHei;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:1 135135232 16 0 262144 0;}
@font-face
	{font-family:"\@宋体";
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:3 135135232 16 0 262145 0;}
@font-face
	{font-family:"\@黑体";
	panose-1:2 1 6 0 3 1 1 1 1 1;
	mso-font-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:1 135135232 16 0 262144 0;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
	{mso-style-parent:"";
	margin:0cm;
	margin-bottom:.0001pt;
	text-align:justify;
	text-justify:inter-ideograph;
	mso-pagination:none;
	font-size:10.5pt;
	mso-bidi-font-size:12.0pt;
	font-family:"Times New Roman";
	mso-fareast-font-family:宋体;
	mso-font-kerning:1.0pt;}
h2
	{mso-style-next:正文缩进;
	margin:0cm;
	margin-bottom:.0001pt;
	text-align:justify;
	text-justify:inter-ideograph;
	mso-pagination:lines-together;
	page-break-after:avoid;
	mso-outline-level:2;
	font-size:15.0pt;
	mso-bidi-font-size:10.0pt;
	font-family:黑体;
	mso-hansi-font-family:Arial;
	mso-font-kerning:1.0pt;
	mso-bidi-font-weight:normal;}
h3
	{mso-style-next:正文缩进;
	margin-top:0cm;
	margin-right:0cm;
	margin-bottom:12.0pt;
	margin-left:0cm;
	text-align:center;
	mso-pagination:lines-together;
	page-break-after:avoid;
	mso-outline-level:3;
	mso-layout-grid-align:none;
	font-size:14.0pt;
	mso-bidi-font-size:10.0pt;
	font-family:"Times New Roman";
	mso-fareast-font-family:黑体;
	mso-bidi-font-weight:normal;}
p.MsoToc1, li.MsoToc1, div.MsoToc1
	{mso-style-update:auto;
	mso-style-noshow:yes;

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?