📄 view_content.asp
字号:
<% option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/String.asp" -->
<%
Dim ObjDB,StrSQL
Dim IntID,C,ObjRS,conn
Dim IntIsHtml
IntID = Request.QueryString("ID")
Set conn=Server.CreateObject("ADODB.Connection")
OpenDBH( conn )
Set ObjDB = Server.CreateObject("ADODB.Connection")
OpenDB objDB
Set C = Server.CreateObject("CMS2003.DBHandle")
C.Init(conn)
StrSQL = "Select * From v_Hrms_DepRequirement Where ID = " & IntID
Set ObjRS = C.View(StrSQL)
ObjDB.Close
Set ObjDB = Nothing
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
td { font-size:12px }
</style>
</head>
<body leftmargin="5" topmargin="5" bgcolor="#FFFFFF">
<br><table class=Ltable cellspacing=1 cellpadding=3>
<tr>
<td width="14" height="30"> </td>
<td width="95">公 司：</td>
<td width="159"><%=ObjRS("ComName")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>部 门：</td>
<td><%=ObjRS("DepName")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>岗 位：</td>
<td><%=ObjRS("JobName")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>申请理由：</td>
<td><%=ObjRS("Reason")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>人 数：</td>
<td><%=ObjRS("Number")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>申请日期：</td>
<td><%=DateValue(ObjRS("AppTime"))%></td>
</tr>
<tr>
<td height="30"> </td>
<td>希望到岗日期：</td>
<td><%=ObjRS("InTime")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>岗位职责：</td>
<td><%=ObjRS("Responsibility")%></td>
</tr>
<tr>
<td height="30"> </td>
<td>任职条件：</td>
<td><%=ObjRS("Condition")%></td>
</tr>
<tr>
<td height="30"> </td>
<td height="30">备 注:</td>
<td height="30"><%=ObjRS("Des")%></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -