📄 yongcheinfo.asp
字号:
<!--#include file="../config/config.asp"-->
<%xian=session("xian")
ljl_xian=mid(xian,13,1)
if ljl_xian<>1 then%>
<script language=vbscript>
MsgBox "错误：您无权使用本功能模块，如果确实需要操作本模块的权限，请与管理员联系！"
location.href = "../config/txt.asp"
</script>
<%end if
Set conn=Server.CreateObject("ADODB.CONNECTION")
'Set rs=Server.CreateObject("ADODB.RecordSet")
connstr=Application("hg_connstr")
conn.open connstr
if request.querystring("id")="" then
response.write "没有正确的ID号"
else
NUMBER=clng(request.querystring("id"))
loginname=session("hxf_u_nickname")
ljldj=Session("hxf_u_grade")
set RST=conn.execute("select * from 用车申请 where id=" &NUMBER)
'cao=rst("阅览者")
'if ljldj<rst("保密度") then
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="ljl.css">
<title>oa</title>
</head>
<body>
<div align="center">
<center>
<form name="ljl" method="POST" action="jiashiyuansave.asp?action=23&id=<%=rst("id")%>">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#C0C0C0" width="487" id="AutoNumber1" height="291">
<tr>
<td height="39" width="485" colspan="4" bgcolor="#EEFFEE">
<p align="center"><font color="#FF0000">用车申请单详细信息</font></td>
</tr>
<tr>
<td height="27" width="70" align="center" bgcolor="#EEFFEE">申请车辆</td>
<td height="27" width="167"> <input type="text" name="a1" size="22" value="<%=rst("a1")%>"></td>
<td height="27" width="77" align="center" bgcolor="#EEFFEE">使用时长</td>
<td height="27" width="164"> <input type="text" name="a2" size="22" value="<%=rst("a2")%>"></td>
</tr>
<tr>
<td height="59" width="70" align="center" bgcolor="#EEFFEE">用车事由</td>
<td height="59" width="408" colspan="3"> <textarea rows="4" name="a3" cols="61"><%=rst("a3")%></textarea></td>
</tr>
<tr>
<td height="27" width="70" align="center" bgcolor="#EEFFEE">备注信息</td>
<td height="27" width="167"> <input type="text" name="a5" size="22" value="<%=rst("a5")%>"></td>
<td height="27" width="77" align="center" bgcolor="#EEFFEE">申请人员</td>
<td height="27" width="164"> <input type="text" name="a6" size="22" value="<%=rst("a6")%>"></td>
</tr>
<tr>
<td height="27" width="70" align="center" bgcolor="#EEFFEE">提交者<span lang="en-us">IP</span></td>
<td height="27" width="167"> <input type="text" name="a7" size="22" value="<%=rst("a7")%>"></td>
<td height="27" width="77" align="center" bgcolor="#EEFFEE">申请时间</td>
<td height="27" width="164"> <input type="text" name="a8" size="22" value="<%=rst("a8")%>"></td>
</tr>
<tr>
<td height="27" width="70" align="center" bgcolor="#EEFFEE">是否批准</td>
<td height="27" width="167"> <input type="text" name="a9" size="22" <%if rst("a9")=false then%> value="未批准"><%else%> value="已经批准"><%end if%></td>
<td height="27" width="77" align="center" bgcolor="#EEFFEE">是否作废</td>
<td height="27" width="164"> <input type="text" name="a11" size="22" <%if rst("a11")=false then%> value="未作废"><%else%> value="已经作废"><%end if%></td>
</tr>
<tr>
<td height="53" width="481" align="center" colspan="4">
<br>
<span lang="en-us"> </span><%if rst("a9")=false and rst("a11")=false then%>
<a href="yongchexinxichuli.asp?id=<%=rst("id")%>&action=26&ziduan=<%=rst("a1")%>">审批通过</a>
<a href="yongchexinxichuli.asp?id=<%=rst("id")%>&action=27&ziduan=<%=rst("a1")%>">作废申请单</a><%end if%>
<a href="daibanlist.asp?action=9">返 回</a></td>
</tr>
</table>
</form>
</center>
</div>
</body>
</html>
<%conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -