view_content.asp

来自「功能齐全的oa系统」· ASP 代码 · 共 88 行

ASP

88 行

<% 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">&nbsp;</td>
    <td width="95">公 　 司：</td>
    <td width="159"><%=ObjRS("ComName")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>部　　门：</td>
    <td><%=ObjRS("DepName")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>岗 　位：</td>
    <td><%=ObjRS("JobName")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>申请理由：</td>
    <td><%=ObjRS("Reason")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>人 　数：</td>
    <td><%=ObjRS("Number")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>申请日期：</td>
    <td><%=DateValue(ObjRS("AppTime"))%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>希望到岗日期：</td>
    <td><%=ObjRS("InTime")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>岗位职责：</td>
    <td><%=ObjRS("Responsibility")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td>任职条件：</td>
    <td><%=ObjRS("Condition")%></td>
  </tr>
  <tr> 
    <td height="30">&nbsp;</td>
    <td height="30">备　　注:</td>
    <td height="30"><%=ObjRS("Des")%></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?

view_content.asp

view_content.asp - 源码说明

⌨️ 快捷键说明