📄 6003.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 6003 where id="&request("id")
rs.open sql,conn,1,3
nsrsb=rs("nsrsb")
nsrmc=rs("nsrmc")
blsj=rs("blsj")
cpxse=rs("cpxse")
cpxss=rs("cpxss")
cpssc=rs("cpssc")
cpxsl=rs("cpxsl")
yjzzs=rs("yjzzs")
yjzzs1=rs("yjzzs1")
sqfzz=rs("sqfzz")
zgswj=rs("zgswj")
sjswj=rs("sjswj")
zgjz=rs("zgjz")
fzr1=rs("fzr1")
fzr2=rs("fzr2")
fzr2=rs("fzr2")
jbr1=rs("jbr1")
jbr2=rs("jbr2")
blsj1=rs("blsj1")
blsj2=rs("blsj2")
fddbr=rs("fddbr")
cwfzr=rs("cwfzr")
bsry=rs("bsry")
blsj3=rs("blsj3")
else
if session("userid")(1)<>"" then
nsrsb=session("userid")(1)
nsrmc=session("userid")(19)
end if
end if
%>
<%'----------添加
if REQUEST("bb")="提交" then
Const sCacheName="NB274868191"
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from 6003"
rs.open sql,conn,1,3
%>
<% rs.addnew
rs("name")=request("name")
rs("nsrsb")=request("nsrsb")
rs("nsrmc")=request("nsrmc")
rs("blsj")=request("blsj")
rs("cpxse")=request("cpxse")
rs("cpxss")=request("cpxss")
rs("cpssc")=request("cpssc")
rs("cpxsl")=request("cpxsl")
rs("yjzzs")=request("yjzzs")
rs("yjzzs1")=request("yjzzs1")
rs("sqfzz")=request("sqfzz")
rs("zgswj")=request("zgswj")
rs("sjswj")=request("sjswj")
rs("zgjz")=request("zgjz")
rs("fzr1")=request("fzr1")
rs("fzr2")=request("fzr2")
rs("fzr2")=request("fzr2")
rs("jbr1")=request("jbr1")
rs("jbr2")=request("jbr2")
rs("blsj1")=request("blsj1")
rs("blsj2")=request("blsj2")
rs("fddbr")=request("fddbr")
rs("cwfzr")=request("cwfzr")
rs("bsry")=request("bsry")
rs("blsj3")=request("blsj3")
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("nsrmc")
rs("work")="社会福利企业增值税返还审批表"
rs("reg_name")=session("userid")(1)
rs("add_date")=cstr(date())
rs("work_state")="0"
rs("work_id")=id
rs("form_id")="6003"
rs.update%>
<script language='javascript'>
alert("数据已添加,请等待管理员审核")
</script><%session("userid")=""
response.Redirect "myform.asp"
end if
'-------------------
%><title>社会福利企业增值税返还审批表</title>
<!--[if gte mso 9]><xml>
<o:DocumentProperties>
<o:Author>fz</o:Author>
<o:Template>Normal</o:Template>
<o:LastAuthor>chen</o:LastAuthor>
<o:Revision>2</o:Revision>
<o:TotalTime>8</o:TotalTime>
<o:Created>2005-04-17T11:49:00Z</o:Created>
<o:LastSaved>2005-04-17T11:49:00Z</o:LastSaved>
<o:Pages>1</o:Pages>
<o:Words>201</o:Words>
<o:Characters>1147</o:Characters>
<o:Company>gs</o:Company>
<o:Lines>9</o:Lines>
<o:Paragraphs>2</o:Paragraphs>
<o:CharactersWithSpaces>1346</o:CharactersWithSpaces>
<o:Version>11.5606</o:Version>
</o:DocumentProperties>
</xml><![endif]--><!--[if gte mso 9]><xml>
<w:WordDocument>
<w:Zoom>75</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-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: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;}
/* 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-bidi-font-family:宋体;
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;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -