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

📄 startto.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">
<meta http-equiv="refresh" content="30">
<!-- #include file="../main/css.asp" -->
<style>
td {
	 MARGIN: 0px;line-height:20px;nowrap;valign:bottom
}
thistitle{filter:DropShadow(Color=#ffffff, OffX=3, OffY=3, Positive=4)}
}
a:hover{color:red}
</style>
<% 	
Session("send")="recived"   '收件箱

Set rs = Server.CreateObject("ADODB.Recordset")%>
</head>
<body scroll=no >


<div id="layimage" style="position:absolute; background:url('../images/bg0.jpg');width:101%;top:0; height:1000;left:400; z-index:-50"> 
    <img src="../images/bg2.jpg" align=right > </div>
	
<div id="laytext" style="position:absolute;top:0;height:100%; width100%;left:0; z-index:-40"><table height="100%" width="100%" border="0" cellspacing="0" cellpadding="0">
    <tr>
        <td valign=bottom align=right> <ilmg src="<%=Session("sys5")%>" align=right valign=bottom></td>
    </tr>
</table>
</div>

<div id="Layuyu" style="position:absolute; width:45%;top:15; height:400px; z-index:8; left: 50%"> 
    <div style="height=210"> 
        <table width="100%" class=vtext border="0" cellspacing="0" cellpadding="0" align="center">
            <tr > 
                <td   height="16" colspan="2" background="../images/startbg<%=Session("cssid")%>.jpg" ><img src="../images/mail.gif"  width="20" height="20" align="absmiddle"><b><span class="thistitle">最新邮件</span></b> </td>
                <td   height="16"  width="65%" align="right"><font face="Arial, Helvetica, sans-serif" color="#CC6633">MAILS</font></td>
            </tr>
                        <tr> 
                <td nowrap  height="1" colspan="3" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
            </tr>
            <tr> 
                <td nowrap  height="" colspan="3"  valign="top">
				            <%
	sql="select top 6 *  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("<tr height=22><td nowrap   colspan=3>　<img src='../images/arrow_r.gif' width='9' height='9' border='0' align='absmiddle'> <a href='../mail/readmail.asp?page=1&num=" & num &  "&opFlag=start'>" & fixx(rs("cent"),16) & "</a></td></tr>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
</td>
            </tr>

            <tr height=30> 
                <td   colspan=3><font color="#0000FF">　</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></td>
            </tr>
        </table>
    </div>
    <div style="height=210"> 
        <table width="100%" class=vtext border="0" cellspacing="0" cellpadding="0" align="center">
            <tr> 
                <td   height="16" colspan="2" background="../images/startbg<%=Session("cssid")%>.jpg" ><img src="../images/cala.gif"  width="20" height="20" align="absmiddle"><b class="thistitle">最新日程</b> </td>
                <td   height="16"  width="65%" align="right"><font face="Arial, Helvetica, sans-serif" color="#CC6633">CALENDAR</font></td>
            </tr>
                        <tr> 
                <td nowrap  height="1" colspan="3" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
            </tr>
            <tr> 
                <td nowrap  height="10" colspan="3"  valign="middle"></td>
            </tr>

            <%
	sql="select top 6 *  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("<tr height=22><td nowrap   colspan=3>　<img src='../images/arrow_r.gif' width='9' height='9' border='0' align='absmiddle'> <a href='../remind/disp.asp?Number=" & num-1 & "&opFlag=start'>" & fixx(rs("vtitle"),16) & "</a></td></tr>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
            <tr height=30> 
                <td nowrap   colspan=3><font color="#0000FF">　</font> 
                    <a href="../remind/edit.asp?opFlag=cmdAddNew"><font color="#0000FF">新日程</font></a> 
                    <a href="../remind/main.asp"><font color="#0000FF">日程安排</font></a> 
                </td>
            </tr>
        </table>
    </div>
</div>

<div id="fgLayuyu" style="position:absolute; width:45%;top:15; height:400px; z-index:8; left: 10"> 
    <div style="height=210"> 
        <table width="100%" class=vtext border="0" cellspacing="0" cellpadding="0" align="center">
            <tr> 
                <td   height="16" colspan="2" background="../images/startbg<%=Session("cssid")%>.jpg" ><img src="../images/notice1.gif"  width="16" height="16" align="absmiddle"><b class="thistitle">最新公告</b></td>
                <td   height="16"  width="65%" align="right"><font face="Arial, Helvetica, sans-serif" color="#CC6633">AFFICHE</font></td>
            </tr>
                        <tr> 
                <td nowrap  height="1" colspan="3" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
            </tr>
            <tr> 
                <td nowrap  height="10" colspan="3"  valign="middle"></td>
            </tr>

            <%	sql="select top 6 *  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("<tr height=22><td    colspan=3>　<img src='../images/arrow_r.gif' width='9' height='9' border='0' align='absmiddle'> <a href='../offiche/disp.asp?Number=" & num-1 & "&opFlag=start'>" & fixx(rs("vtitle"),16) & "</a></td></tr>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
            <tr height=30> 
                <td nowrap  colspan="3"><font color="#0000FF">　<%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> 
                    </font> </td>
            </tr>
        </table>
    </div>
    <div style="height=210"> 
        <table width="100%" class=vtext border="0" cellspacing="0" cellpadding="0" align="center">
            <tr> 
                <td nowrap  height="16" colspan="2" background="../images/startbg<%=Session("cssid")%>.jpg" ><img src="../images/meeting1.gif"  width="20" height="20" align="absmiddle"><b class="thistitle">最新帖子</b></td>
                <td nowrap  height="16"  width="65%" align="right"><font face="Arial, Helvetica, sans-serif" color="#CC6633">BBS</font></td>
            </tr>
                        <tr> 
                <td nowrap  height="1" colspan="3" bgcolor="<%=Session("vtitlebackcolor")%>" valign="middle"></td>
            </tr>
            <tr> 
                <td nowrap  height="10" colspan="3"  valign="middle"></td>
            </tr>

            <%
	sql="select top 6 vtitle as title  from bbs  order by vtime desc"
	rs.open sql,Session("conn"),1,1
	num=1
	while not rs.eof
		response.write("<tr height=22><td   colspan=3>　<img src='../images/arrow_r.gif' width='9' height='9' border='0' align='absmiddle'> <a href='../bbs/disp.asp?Number=" & num-1 & "&opFlag=start'>" & left(rs("title"),58) & fixx(mid(rs("title"),65),15) & "</a></td></tr>")
		rs.movenext
		num=num+1
		
		
	wend
	rs.close
%>
            <tr height=30> 
                <td nowrap   colspan=3> <font color="#0000FF">　</font><a href="../bbs/edit.asp?opFlag=cmdAddNew"><font color="#0000FF">我要发帖</font></a> 
                    <a href="../bbs/main.asp"><font color="#0000FF">BBS交流</font></a> 
                </td>
            </tr>
        </table>
    </div>
</div>

</body>
</html>

⌨️ 快捷键说明

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