?? guidangdetail.asp
字號:
if(upfj==1) return false;
}
}
}//for
//--------發送附件
document.submitinput.submit()
return false;
}
</script>
<script language="JavaScript">
<!--
function dis(){
document.submitinput.submit.value=' 提交..'
document.submitinput.submit.disabled=true;
return true;
}
function check() {
return true
}
//-->
</SCRIPT>
<link href="../../css/link.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style5 {
color: #FFFFFF;
font-weight: bold;
}
.style2 {font-size: 13px}
.tx {height: 16px; width: 30px; border-color: black black #000000; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px; font-size: 9pt; background-color: #eeeeee; color: #0000FF}
.inputline { border-top: 1px none #FF0000;
border-right: 1px none #FF0000;
border-bottom: 1px solid #999999;
border-left: 1px none #FF0000;
}
.style41 {color: #FF0000}
.style42 {color: #009933}
.style43 {color: #999999}
.style44 {color: #000000}
-->
</style>
</head>
<div align="center"><script language=VBScript>
function tof_Click()
if document.all("tof").checked Then
document.all("his").style.display="inline"
Else
document.all("his").style.display="none"
End IF
end function
</script>
<table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="6" height="20"><img src="/img/bbs/leftlin1red.gif" width="6" height="21"></td>
<td width="936" height="20" bgcolor="#FF3333"><div align="center" class="style5">收 文 詳 細 信 息</div></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="5" cellspacing="1" bgcolor="#FF0000">
<tr bgcolor="#FFFFFF">
<td width="10%"><div align="right">來文機關：</div></td>
<td width="44%"> <%=(r.Fields.Item("來文機關").Value)%></td>
<td width="46%">來文字號： <%=(r.Fields.Item("來文字號").Value)%> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">來文日期：</div></td>
<td> <%=(r.Fields.Item("來文日期").Value)%> 收文日期： <%=(r.Fields.Item("收文日期").Value)%></td>
<td> 辦完日期： <%=(r.Fields.Item("辦完日期").Value)%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">事 由：</div></td><%shiyou=r.Fields.Item("事由").Value%>
<td colspan="2"><%=HTMLEncode(shiyou)%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">擬辦意見：</div></td>
<td colspan="2"><%=HTMLEncode(r.Fields.Item("擬辦意見").Value)%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">審稿意見：</div></td>
<td colspan="2"> <%
While ((Repeat2__numRows <> 0) AND (NOT Recordset2.EOF))
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr><%session("shenpiid")=r("id")%>
<td valign="top" style="word-break:break-all;Width:fixed">
<hr width="95%" size="1" color="#cccccc" height="1">
<div align="left"><%=HTMLEncode(Recordset2.Fields.Item("審批意見").Value)%> <br>
<%=(Recordset2.Fields.Item("審批人姓名").Value)%>(<%=(Recordset2.Fields.Item("審批人部門").Value)%>) 結果：<span class="style42"><%=(Recordset2.Fields.Item("審稿結果").Value)%></span> </div></td>
</tr>
<tr>
<td valign="top" style="word-break:break-all;Width:fixed"><div align="right"><%=(Recordset2.Fields.Item("審批時間").Value)%>
<%if Recordset2("最后更新日期")<>"2006-10-1" then %>
<span class="style39 style41">更新：<%=(Recordset2.Fields.Item("最后更新時間").Value)%></span>
<%end if%>
</div></td>
</tr>
</table>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
Recordset2.MoveNext()
Wend
%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">簽閱意見：</div></td>
<td colspan="2"><%
While ((Repeat3__numRows <> 0) AND (NOT Recordset1.EOF))
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%session("shenpiid")=r("id")%>
<td valign="top" style="word-break:break-all;Width:fixed"><hr width="95%" size="1" color="#cccccc" height="1">
<div align="left"><%=HTMLEncode(Recordset1.Fields.Item("審批意見").Value)%> <br>
<%=(Recordset1.Fields.Item("審批人姓名").Value)%>(<%=(Recordset1.Fields.Item("審批人部門").Value)%>) 結果：<span class="style42"><%=(Recordset1.Fields.Item("審稿結果").Value)%></span> </div></td>
</tr>
<tr>
<td valign="top" style="word-break:break-all;Width:fixed"><div align="right"><%=(Recordset1.Fields.Item("審批時間").Value)%>
<%if Recordset1("最后更新日期")<>"2006-10-1" then %>
<span class="style39 style41">更新：<%=(Recordset1.Fields.Item("最后更新時間").Value)%></span>
<%end if%>
</div></td>
</tr>
</table>
<%
Repeat3__index=Repeat3__index+1
Repeat3__numRows=Repeat3__numRows-1
Recordset1.MoveNext()
Wend
%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">辦理結果：</div></td>
<td colspan="2"><%
While ((Repeat4__numRows <> 0) AND (NOT Recordset3.EOF))
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%session("shenpiid")=r("id")%>
<td valign="top" style="word-break:break-all;Width:fixed"><hr width="95%" size="1" color="#cccccc" height="1">
<div align="left"><%=HTMLEncode(Recordset3.Fields.Item("審批意見").Value)%> <br>
<%=(Recordset3.Fields.Item("審批人姓名").Value)%>(<%=(Recordset3.Fields.Item("審批人部門").Value)%>) 結果：<span class="style42"><%=(Recordset3.Fields.Item("審稿結果").Value)%></span> </div></td>
</tr>
<tr>
<td valign="top" style="word-break:break-all;Width:fixed"><div align="right"><%=(Recordset3.Fields.Item("審批時間").Value)%>
<%if Recordset3("最后更新日期")<>"2006-10-1" then %>
<span class="style39 style41">更新：<%=(Recordset3.Fields.Item("最后更新時間").Value)%></span>
<%end if%>
</div></td>
</tr>
</table>
<%
Repeat4__index=Repeat4__index+1
Repeat4__numRows=Repeat4__numRows-1
Recordset3.MoveNext()
Wend
%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">備 注：</div></td>
<td colspan="2"><%=HTMLEncode(r.Fields.Item("備注").Value)%></td>
</tr>
<%if not Recordset11.eof or not Recordset11.bof then%>
<tr bgcolor="#FFFFFF">
<td><div align="right">附 件：</div></td>
<td colspan="2"><table width="99%" border="0" cellspacing="0" cellpadding="0">
<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset11.EOF))
%><%dim fname
fname=(Recordset11.Fields.Item("文件名").Value)%>
<tr>
<%p=Recordset11.Fields.Item("文件路徑").Value%>
<td width="507"> <a href="redirect.asp?id=<%=(Recordset11.Fields.Item("id").Value)%>&gwid=<%=(Recordset11.Fields.Item("郵件編號").Value)%>&fpath=<%=p%>&n=<%=fname%>" target="_blank"><%=fname%></a> <span class="style43"><%=(Recordset11.Fields.Item("文件上傳時間").Value)%> <%=(Recordset11.Fields.Item("上傳人姓名").Value)%>(<%=(Recordset11.Fields.Item("上傳人部門").Value)%>)</span></td>
<td width="162"><a href="downfile.asp?id=<%=(Recordset11.Fields.Item("id").Value)%>&gwid=<%=(Recordset11.Fields.Item("郵件編號").Value)%>" >下載</a> <a href="shoucang.asp?id=<%=(Recordset11.Fields.Item("id").Value)%>&gwid=<%=(Recordset11.Fields.Item("郵件編號").Value)%>&fpath=<%=p%>">收藏</a> <a href="zhuanfa.asp?id=<%=(Recordset11.Fields.Item("id").Value)%>">轉發</a></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset11.MoveNext()
Wend
%><%
kg=r("開關")
%>
</table><%if r.Fields.Item("附件數").Value<>0 then%>
<img src="../../img/common.gif" width="16" height="16"> <span class="style40 style43"><%=(r.Fields.Item("附件數").Value)%>個附件</span>
<%end if%></td>
<%end if%>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">審 稿 人：</div></td>
<td colspan="2"><%=(r.Fields.Item("審稿人").Value)%> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">擬 稿 人：</div></td>
<td colspan="2"><%=(r.Fields.Item("添加人姓名").Value)%> (<%=(r.Fields.Item("添加人部門").Value)%>) <%=(r.Fields.Item("添加時間").Value)%></td>
</tr><%if r("最后更新日期")<>"2006-10-1" then%>
<tr bgcolor="#FFFFFF">
<td><div align="right">最后更新：</div></td>
<td colspan="2"><span class="style41"><%=(r.Fields.Item("最后更新時間").Value)%></span> 更新人：<%=(r.Fields.Item("最后更新人").Value)%>(<%=(r.Fields.Item("最后更新人部門").Value)%>)</td><%end if%>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="right">狀 態：</div></td>
<td colspan="2"><table width="95%" height="21" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr bgcolor="#FFFFFF">
<td>歸檔：<%=(r.Fields.Item("歸檔結果").Value)%>
</td>
</tr>
</table>
<%dim bz
bz=r.Fields.Item("bz").Value%>
<%if bz<>"" then%> 歸檔備注：<%=HTMLEncode(bz)%><%else%>
<%end if %><%if r("歸檔更新時間")<>"2006-10-1" then%>
<span class="style41">最后歸檔更新:<%=r("歸檔更新時間")%> <span class="style44">歸檔時間：<%=r("歸檔時間")%></span></span>
<%else%>歸檔時間：<%=r("歸檔時間")%><%end if%></td>
</tr>
</table>
<p><a href="javascript:history.go(-1)">返回</a> <span class="style2"><a href="javascript:window.print()">我要打印</a></span></p>
</div>
</html>
<%
r.Close()
Set r = Nothing
%>
<%
Recordset11.Close()
Set Recordset11 = Nothing
%>
<%
jimi.Close()
Set jimi = Nothing
%>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
<%
Recordset3.Close()
Set Recordset3 = Nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -