⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 startn.asp

📁 Lirong网络办公系统
💻 ASP
字号:
🔍 


<html>
<head>
<title>立人网络信息系统首页</title>
<meta http-equiv=Content-Language content=zh-cn>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">

<!-- #include file="../inc/css.asp" -->
<style>.p9 {
	FONT-SIZE: 9pt; FONT-FAMILY: 宋体
}
.p90 {
	FONT-SIZE: 9pt; LINE-HEIGHT: 130%; FONT-FAMILY: 宋体
}
.p10 {
	FONT-SIZE: 10.5pt; FONT-FAMILY: 宋体
}
.xian {
	WIDTH: 246px; HEIGHT: 1px; BACKGROUND-COLOR: <%=Session("vtabletitlebackcolor")%>
}

td {
	 MARGIN: 0px;line-height:23px;
}
</style>
<% 	
Session("send")="recived"

Set rs = Server.CreateObject("ADODB.Recordset")%>


</head>
<body   o1ncontextmenu=self.event.returnValue=false  topmargin=6 bgcolor="#FFFFFF" background="../images/bg.GIF" >
<div id="Layer2" style="position:absolute; width:102%;top:0; height:115px; z-index:1"><img src="../images/start.jpg" align=right> </div>
<div id="Layuyu" style="position:absolute; width:90%;top:20; height:400; z-index:8; left: 10"> 
    <table width="100%"  border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
            <td height="18" width="5%" ><img src="../images/notice1.gif"  width="20" height="20"></td>
            <td height="18" width="15%" bgcolor="<%=Session("vtabletitlebackcolor")%>"  align=center valign="middle">最新公告</td>
            <td height="18" align="right"><font face="Arial, Helvetica, sans-serif" color="#999999">OFFICHE</font></td>
        </tr>
        <tr> 
            <td></td>
            <td height="1" style="height:1" colspan="2"   bgcolor="<%=session("vtitlebackcolor")%>" valign="middle"></td>
        </tr>
        <tr height=""> 
            <td colspan="3" height="15"> </td>
        </tr>
        <tr > 
            <td colspan="3"> 
                <ul>
                    <%
	sql="select * from offiche order by vdate desc"
	SET rs=Server.CreateObject("ADODB.RecordSet") 
	rs.open sql,Session("conn"),1,1
	num=1
	while not rs.eof
		response.write(num & "、<a href='../offiche/disp.asp?Number=" & num-1 & "&opFlag=start'>" & rs("vtitle") & "<font color='666666'>[" & rs("vdate") & "]</font></a><br>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
                    <br>
                    <img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"> 
                    <%if mid(Session("qx"),9,1)="1" then %>
					<a href="../offiche/edit.asp?opFlag=cmdAddNew"><font color="#0000FF"> 
                    发布公告</font></a>
					<%end if%>
					 <a href="../offiche/main.asp"><font color="#0000FF">公告栏</font></a> 
                </ul>
            </td>
        </tr></table>
		
		    <table width="100%"  border="0" cellspacing="0" cellpadding="0" align="center">

        <tr> 
            <td height="16" width="15" ><img src="../images/mail.gif"  width="20" height="20"></td>
            <td height="16" width="15%" bgcolor="<%=Session("vtabletitlebackcolor")%>"  align=center valign="middle">最新邮件 </td>
            <td height="16" align="right"><font face="Arial, Helvetica, sans-serif" color="#999999">MAILS</font></td>
        </tr>
        <tr> 
            <td></td>
            <td height="1" colspan="2" bgcolor="<%=session("vtitlebackcolor")%>"  valign="middle"></td>
        </tr>
        <tr height="120"> 
            <td colspan="3" height="15"> </td>
        </tr>
        <tr height="120"> 
            <td colspan="3"> 
                <ul>
                    <%
	sql="select * from recived" & Session("id") & " order by ilevel desc,idatetime desc"
	SET rs=Server.CreateObject("ADODB.RecordSet") 
	rs.open sql,Session("conn2"),1,1
	num=1
	while not rs.eof
		response.write(num & "、<a href='../mail/readmail.asp?page=1&num=" & num & "&opFlag=start'>" & rs("cent") & "<font color='666666'>[" & rs("idatetime") & "]</font></a><br>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
                    <p><font color="#0000FF"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"> 
                        </font><a href="../mail/write.asp"><font color="#0000FF">写邮件</font></a>　<a href="../mail/mailbox.asp?mailbox=common"><font color="#0000FF">公共信箱</font></a>　<a href="../mail/mailbox.asp?mailbox=recived"><font color="#0000FF">收件箱</font></a>　<a href="../mail/mailbox.asp?mailbox=sendout"><font color="#0000FF">发件箱</font></a>　<a href="../mail/mailbox.asp?mailbox=del"><font color="#0000FF">回收站</font></a><font color="#0000FF"> 
                        </font></p>
                </ul>
            </td>
        </tr>
        <tr> 
            <td height="16" width="15" ><img src="../images/meeting1.gif"  width="20" height="20"></td>
            <td height="16" width="15%" bgcolor="<%=Session("vtabletitlebackcolor")%>"  align=center valign="middle">最新帖子</td>
            <td height="16" align="right"><font face="Arial, Helvetica, sans-serif" color="#999999">BBS</font></td>
        </tr>
        <tr> 
            <td></td>
            <td height="1" colspan="2" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
        </tr>
        <tr height="120"> 
            <td colspan="3" height="15"> </td>
        </tr>
        <tr height="120"> 
            <td colspan="3"> 
                <ul>
                    <%
	sql="select * from bbs  order by vtime desc"
	rs.open sql,Session("conn"),1,1
	num=1
	while not rs.eof
		response.write("<div>" & num & "、<a href='../bbs/disp.asp?Number=" & num-1 & "&opFlag=start'>" & rs("vtitle") & "<font color='666666'>[" & rs("vtime") & "]</font></a><div><br>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
                    <p><font color="#0000FF"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"> 
                        </font><a href="../bbs/edit.asp?opFlag=cmdAddNew"><font color="#0000FF">我要发帖</font></a> 
                        <a href="../bbs/main.asp"><font color="#0000FF">BBS交流</font></a></p>
                </ul>
            </td>
        </tr>
        <tr> 
            <td height="16" width="15" ><img src="../images/file.GIF"  width="20" height="20"></td>
            <td height="16" width="15%" bgcolor="<%=Session("vtabletitlebackcolor")%>"  align=center valign="middle">最新公文 </td>
            <td height="16" align="right"><font face="Arial, Helvetica, sans-serif" color="#999999">FILES</font></td>
        </tr>
        <tr> 
            <td></td>
            <td height="1" colspan="2" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
        </tr>
        <tr height="120"> 
            <td colspan="3" height="15"> </td>
        </tr>
        <tr height="120"> 
            <td colspan="3"> 
                <ul>
                    <%
	sql="select * from file where vauthor='" & Session("id")
	sql=sql & "' or " & "vdolist like '%" & Session("id")  & "%' "
	sql=sql & " or " & "vreaders like '%" & Session("id")  & "%' "
	sql=sql & " or " & "vaccepters like '%" & Session("id")  & "%' order by vtime desc"
	rs.open sql,Session("conn"),1,1
	num=1
	while not rs.eof
		response.write(num & "、<a href='../file/disp.asp?Number=" & num-1 & "&opFlag=start'>" & rs("vtitle") & "<font color='666666'>[" & rs("vtime") & "]</font></a><br>")
		rs.movenext
		num=num+1
		
	wend
	rs.close
%>
                    <p><font color="#0000FF"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"> 
                        </font><a href="../file/edit.asp"><font color="#0000FF">新文拟稿</font></a> 
                        <a href="../file/edit.asp?opFlag=cmdRecive"><font color="#0000FF">来文接收</font></a> 
                        <a href="../file/myfiles.asp"><font color="#0000FF">我的公文夹</font></a> 
                        <a href="../file/reads.asp"><font color="#0000FF">我的阅读夹</font></a> 
                        <a href="../file/todo.asp"><font color="#0000FF">待处理公文</font></a> 
                        <a href="../file/already.asp"><font color="#0000FF">已处理公文</font></a></p>
                </ul>
            </td>
        </tr>
        <tr> 
            <td height="16" width="15" ><img src="../images/calendar.gif"  width="20" height="20"></td>
            <td height="16" width="15%" bgcolor="<%=Session("vtabletitlebackcolor")%>"  align=center valign="middle">最新日程 </td>
            <td height="16" align="right"><font face="Arial, Helvetica, sans-serif" color="#999999">CALENDAR</font></td>
        </tr>
        <tr> 
            <td></td>
            <td height="1" colspan="2" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
        </tr>
        <tr height="120"> 
            <td colspan="3" height="15"> </td>
        </tr>
        <tr height="120"> 
            <td colspan="3"> 
                <ul>
                    <%
	sql="select * from remind where vowner='" & Session("id") & "' order by vtime desc"
	rs.open sql,Session("conn"),1,1
	num=1
	while not rs.eof
		response.write(num & "、<a href='../remind/disp.asp?Number=" & num-1 & "&opFlag=start'>" & rs("vtitle") & "<font color='666666'>[" & rs("vtime") & "]</font></a><br>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
                    <p><font color="#0000FF"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"><img src="../images/arrow_r.gif" width="7" height="7" border="0" align="absmiddle"></font> 
                        <a href="../remind/edit.asp"><font color="#0000FF">新日程</font></a> 
                        <a href="../remind/main.asp"><font color="#0000FF">日程安排</font></a></p>
                </ul>
            </td>
        </tr>
    </table>

</div>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -