?? bargainmanage.asp
字號:
<tr>
<td width="80" bgcolor="#FFFBE8">合同附件</td>
<td colspan="3" bgcolor="#FFFBE8"><%
if rs("WS_Annex")<>"" then
response.write "<a href='../HXManpowerResource/"&rs("WS_Annex")&"' target='_blank'>"&rs("WS_Annex")&"</a>"
else
response.write "無"
end if
%></td>
</tr>
<tr>
<td width="80" bgcolor="#FFFBE8">特別條款</td>
<td colspan="3" bgcolor="#FFFBE8"><%=rs("WS_notice")%></td>
</tr>
<tr>
<td width="80" bgcolor="#FFFBE8">備注</td>
<td colspan="3" bgcolor="#FFFBE8"> <%=rs("WS_brief")%></td>
</tr>
</table></td>
</tr>
<tr bgcolor="#FFFBE8">
<td height="2" align=right><input type="button" name="WS_Submit2" value=" 返 回 " onclick="javascript:history.go(-1);">
<input type="button" name="WS_Submit2" value=" 打 印 " onclick="javascript:print();"> </td>
</tr>
<%
case else
if rs.recordcount<=0 then%>
<tr>
<td height="27" bgcolor=FFFBE8> 暫無合同，您要<a href="addbargain.asp"><font color=red>添加</font></a>嗎？</td>
</tr>
<%else%>
<tr>
<td bgcolor=FFFBE8><table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="BF9B73">
<tr bgcolor="#FFFBE8">
<td width="7%" height="20"><div align="center">
<%
if DESCORASC="WS_id desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_id asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_id asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_id desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_id desc';"">"
end if
%>序號</div></td>
<td width="11%"><div align="center"><%
if DESCORASC="WS_uid desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_uid asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_uid asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_uid desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_uid desc';"">"
end if
%>簽約人</div></td>
<td width="12%"><div align="center"><%
if DESCORASC="WS_state desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_state asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_state asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_state desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_state desc';"">"
end if
%>合同類別</div></td>
<td width="15%"><div align="center"><%
if DESCORASC="WS_statetime desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_statetime asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_statetime asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_statetime desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_statetime desc';"">"
end if
%>開始日期</div></td>
<td width="15%"><div align="center"><%
if DESCORASC="WS_overtime desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_overtime asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_overtime asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_overtime desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_overtime desc';"">"
end if
%>結束日期</div></td>
<td width="15%"><div align="center"><%
if DESCORASC="WS_register desc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_register asc';""><img src='../hximages/down.gif' align=absmiddle>"
elseif DESCORASC="WS_register asc" then
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_register desc';""><img src='../hximages/up.gif' align=absmiddle>"
else
response.Write "<a style='cursor:hand;' onclick=""location.href='bargainmanage.asp?DESCORASC=WS_register desc';"">"
end if
%>簽訂時間</div></td>
<td width="6%"> <div align="center">附件</div></td>
<td width="19%"><div align="center">操作</div></td>
</tr>
<%
rs.PageSize =15 '每頁記錄條數
iCount=rs.RecordCount '記錄總數
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
ii=0
do while not rs.EOF
%>
<tr <%if ii mod 2 =0 then response.write "bgcolor='#FFFBE8'" else response.write "bgcolor='#FFFBE8'"%>>
<td height="25"><%=rs("WS_id")%></td>
<td><%set urs=WS_S.HX_SetRSD("","HX_CompanyUser"," where WS_Uid="&rs("WS_Uid")):if urs.recordcount>0 then response.Write "<a style='cursor:hand;' onclick=""openwin(680,600,'../HXManpowerResource/userinfolook.asp?WS_Uid="&urs("WS_Uid")&"')""> "&urs("WS_name")&"</a>" else response.Write "無"%></td>
<td><%set bars=WS_S.HX_SetRSD("","HX_bargaintype"," where WS_Tid="&rs("WS_state")):if bars.recordcount>0 then response.Write bars("WS_bargaintypename")%></td>
<td><%if rs("WS_statetime")<date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_statetime"),5),"red")
elseif rs("WS_statetime")=date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_statetime"),5),"#613c25")
else
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_statetime"),5),"blue")
end if
%></td>
<td><%if rs("WS_overtime")<date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_overtime"),5),"red")
elseif rs("WS_overtime")<date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_overtime"),5),"#613c25")
else
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_overtime"),5),"blue")
end if%></td>
<td><%if rs("WS_register")<date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_register"),5),"red")
elseif rs("WS_register")=date then
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_register"),5),"#613c25")
else
response.write WS_S.FormatColor(WS_S.Format_time(rs("WS_register"),5),"blue")
end if%></td>
<td><%
if rs("WS_Annex")<>"" then
response.write "<a href='../HXManpowerResource/"&rs("WS_Annex")&"' target='_blank'><font color=blue>下載</font></a>"
else
response.write "無"
end if
%></td>
<td><input name="edit" type="button" value="修改" onClick="javascript:location.href='bargainmanage.asp?action=edit&WS_id=<%=rs("WS_id")%>';">
<input name="view" type="button" value="查看" onclick="javascript:location.href='bargainmanage.asp?action=view&WS_id=<%=rs("WS_id")%>';">
<input name="delete" type="button" value="刪除" onclick="javascript:location.href='bargainmanage.asp?action=del&WS_id=<%=rs("WS_id")%>';">
</td>
</tr>
<%ii=ii+1
if ii>=rs.PageSize then Exit Do
rs.movenext
loop
call WS_S.PageControl(iCount,maxpage,page,"border=0 align=right","<p align=right>",8)%>
</table>
</td>
</tr>
<tr bgcolor="#FFFBE8">
<td height="2" align=right><input type="button" name="WS_Submit2" value=" 返 回 " onclick="javascript:history.go(-1);">
<input type="button" name="WS_Submit2" value=" 打 印 " onclick="javascript:print();"> </td>
</tr><%end if
end select
%>
</table> </td>
</tr>
</table></td>
</tr>
</table>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -