📄 addstation.asp
字号:
<% option explicit%>
<!-- #include virtual="include/MyFunc.asp" -->
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="Include/Page.asp" -->
<!-- #include virtual="Include/SelectValue.asp" -->
<body leftmargin="0" topmargin="0"><table id=MoreInfo class=Ltable cellspacing=1 cellpadding=3>
<tr>
<%
dim ObjDB,ConCode,Operation
Operation=Request.QueryString("Operation")
ConCode= Request.QueryString("IDs")
Set ObjDB = Server.CreateObject("ADODB.Connection")
OpenDBH ObjDB
dim StrSQLA,ObjRSA
StrSQLA = "Select ID,PID,Company,Department,Station,PostTime From t_Hrms_Employees_UserPostChange Where PID="&ConCode&" Order by ID desc"
Set ObjRSA = ObjDB.Execute(StrSQLA)
If ObjRSA.EOF Then
Response.Write "<body background='../../../images/bg_1.gif'><table border=0 height='100%' width='100%'><tr><td valign=middle align=center>你还没有添加过绩效考评信息呢！！！！<td></tr></table></body>"
'Response.End
ELSE
%>
<table width="270" cellpadding=3 cellspacing=1 class=Ltable >
<tr class=LHtr>
<td width=2%> </td>
<td width=6%></td>
<td width=16%>姓名</td>
<td width=16%>公司</td>
<td width=16%>部门</td>
<td width=16%>岗位</td>
<td width=16%>时间</td>
<td width=10%>删除</td>
</tr>
<%
do WHILE NOT ObjRSA.EOF
%>
<tr class=Ltr name=ITEMTR id=<%=ObjRSA("ID")%>>
<td> </td>
<td><img src="../../../Images/OA/Private/Data/2.gif" width="16" height="16">
</td>
<td><%=SelectValueView(ObjDB,"Select ID,Name from t_Hrms_Employees_UsersBasic",ObjRSA("PID"))%> </td>
<td><%=SelectValueView(ObjDB,"Select ID,DepName from T_Hrms_Dep",ObjRSA("Company"))%></td>
<td><%=SelectValueView(ObjDB,"Select ID,DepName from T_Hrms_Dep",ObjRSA("Department"))%></td>
<td><%=SelectValueView(ObjDB,"Select ID,JobName from T_Hrms_Sys_Job",ObjRSA("Station"))%></td>
<td><%=FormatDate(ObjRSA("PostTime"))%></td>
<%if Operation="" then%>
<td><a href=../Usersbasic/deletestation.asp?IDs=<%=ObjRSA("ID")%>&AddID=<%=ConCode%> >删除</a></td>
<%
else%>
<td>删除</td>
<%end if%>
</tr>
<%
ObjRSA.movenext
loop
END IF
ObjRSA.close
set ObjRSA=nothing
objDB.close
set ObjDB=nothing
%>
</table>
<p>
<input name="button" type="submit" class=Button id="button" value="关 闭" onClick="window.close();">
</p>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -