⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 4002.asp

📁 关于网络渗透技术的详细讲解
💻 ASP
📖 第 1 页 / 共 3 页
字号:
<!--#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 4002 where id="&request("id")
rs.open sql,conn,1,3
bh=rs("bh")
sqdwm=rs("sqdwm")
hy=rs("hy")
swdj=rs("swdj")
jjlx=rs("jjlx")
fr=rs("fr")
kj=rs("kj")
jbr=rs("jbr")
sfzh=rs("sfzh")
dh=rs("dh")
sqfpz1=rs("sqfpz1")
sqfps1=rs("sqfps1")
sqfpz2=rs("sqfpz2")
sqfps2=rs("sqfps2")
sqfpz3=rs("sqfpz3")
sqfps3=rs("sqfps3")
sqgz=rs("sqgz")
yjyjj=rs("yjyjj")
yjsjh=rs("yjsjh")
zskyj=rs("zskyj")
fgjzj=rs("fgjzj")
qm1=rs("qm1")
qm2=rs("qm2")
blsj1=rs("blsj1")
blsj2=rs("blsj2")
else
if session("userid")(1)<>"" then
bh=session("userid")(1)
sqdwm=session("userid")(19)
end if
end if
%>

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

<%	 rs.addnew
rs("name")=request("name")
rs("bh")=request("bh")
rs("sqdwm")=request("sqdwm")
rs("hy")=request("hy")
rs("swdj")=request("swdj")
rs("jjlx")=request("jjlx")
rs("fr")=request("fr")
rs("kj")=request("kj")
rs("jbr")=request("jbr")
rs("sfzh")=request("sfzh")
rs("dh")=request("dh")
rs("sqfpz1")=request("sqfpz1")
rs("sqfps1")=request("sqfps1")
rs("sqfpz2")=request("sqfpz2")
rs("sqfps2")=request("sqfps2")
rs("sqfpz3")=request("sqfpz3")
rs("sqfps3")=request("sqfps3")
rs("sqgz")=request("sqgz")
rs("yjyjj")=request("yjyjj")
rs("yjsjh")=request("yjsjh")
rs("zskyj")=request("zskyj")
rs("fgjzj")=request("fgjzj")
rs("qm1")=request("qm1")
rs("qm2")=request("qm2")
rs("blsj1")=request("blsj1")
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("sqdwm")
	 rs("nsr_id")=request("sfzh") 
     rs("work")="领购发票申请表"
          rs("reg_name")=session("userid")(1)
rs("add_date")=cstr(date())
     rs("work_state")="0"
     rs("work_id")=id
     rs("form_id")="4002"
     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>4</o:Revision>
  <o:TotalTime>26</o:TotalTime>
  <o:Created>2005-04-16T13:34:00Z</o:Created>
  <o:LastSaved>2005-04-17T10:00:00Z</o:LastSaved>
  <o:Pages>1</o:Pages>
  <o:Words>166</o:Words>
  <o:Characters>952</o:Characters>
  <o:Lines>7</o:Lines>
  <o:Paragraphs>2</o:Paragraphs>
  <o:CharactersWithSpaces>1116</o:CharactersWithSpaces>
  <o:Version>11.5606</o:Version>
 </o:DocumentProperties>
</xml><![endif]--><!--[if gte mso 9]><xml>
 <w:WordDocument>
  <w:View>Print</w:View>
  <w:Zoom>BestFit</w:Zoom>
  <w:SpellingState>Clean</w:SpellingState>
  <w:GrammarState>Clean</w:GrammarState>
  <w:FormsDesign/>
  <w:PunctuationKerning/>
  <w:DrawingGridVerticalSpacing>7.8 磅</w:DrawingGridVerticalSpacing>
  <w:DisplayHorizontalDrawingGridEvery>0</w:DisplayHorizontalDrawingGridEvery>
  <w:DisplayVerticalDrawingGridEvery>2</w:DisplayVerticalDrawingGridEvery>
  <w:ValidateAgainstSchemas/>
  <w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid>
  <w:IgnoreMixedContent>false</w:IgnoreMixedContent>
  <w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText>
  <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]--><!--[if gte mso 9]><xml>
 <w:LatentStyles DefLockedState="false" LatentStyleCount="156">
 </w:LatentStyles>
</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-charset:134;
	mso-generic-font-family:auto;
	mso-font-pitch:variable;
	mso-font-signature:3 135135232 16 0 262145 0;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
	{mso-style-parent:"";
	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; margin-left:0cm; margin-right:0cm; margin-top:0cm}
span.GramE
	{mso-style-name:"";
	mso-gram-e:yes}
 /* Page Definitions */
 @page
	{mso-page-border-surround-header:no;
	mso-page-border-surround-footer:no;}
@page Section1
	{size:595.3pt 841.9pt;
	margin:72.0pt 90.0pt 72.0pt 90.0pt;
	mso-header-margin:42.55pt;
	mso-footer-margin:49.6pt;
	mso-paper-source:0;
	layout-grid:15.6pt;}
div.Section1
	{page:Section1;}
body {
	background-color: #CCCCCC;
}
.style1 {font-weight: bold}
-->
</style>
<!--[if gte mso 10]>
<style>
 /* Style Definitions */
 table.MsoNormalTable
	{mso-style-name:普通表格;
	mso-tstyle-rowband-size:0;
	mso-tstyle-colband-size:0;
	mso-style-noshow:yes;
	mso-style-parent:"";
	mso-padding-alt:0cm 5.4pt 0cm 5.4pt;
	mso-para-margin:0cm;
	mso-para-margin-bottom:.0001pt;
	mso-pagination:widow-orphan;
	font-size:10.0pt;
	font-family:"Times New Roman";
	mso-fareast-font-family:"Times New Roman";
	mso-ansi-language:#0400;
	mso-fareast-language:#0400;
	mso-bidi-language:#0400}
table.MsoTableGrid
	{mso-style-name:网格型;
	mso-tstyle-rowband-size:0;
	mso-tstyle-colband-size:0;
	border:solid windowtext 1.0pt;
	mso-border-alt:solid windowtext .5pt;
	mso-padding-alt:0cm 5.4pt 0cm 5.4pt;
	mso-border-insideh:.5pt solid windowtext;
	mso-border-insidev:.5pt solid windowtext;
	mso-para-margin:0cm;
	mso-para-margin-bottom:.0001pt;
	text-align:justify;
	text-justify:inter-ideograph;
	mso-pagination:none;
	font-size:10.0pt;
	font-family:"Times New Roman";

⌨️ 快捷键说明

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