7.asp

本oa系统内部短信.手机短信.文件传输.公文收发.邮件服务.共享下载.内部论坛等功能

                        <br>
                        <table width="130%"  border="0" cellpadding="0" cellspacing="0">
                          <% 
While ((Repeat2__numRows <> 0) AND (NOT Recordset1.EOF)) 
%>
                          <tr>
                            <td width="4%" height="23"><div align="right"></div></td>
                            <td width="75%" colspan="2"><A HREF="../../toall/tz/tzcontentdrfgwdfgrt.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "id=" & Recordset1.Fields.Item("id").Value %>"> </A><A HREF="../../toall/tz/tzcontentdrfgwdfgrt.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "id=" & Recordset1.Fields.Item("id").Value %>">
                              <% if len(Recordset1("标题"))>18 then%>
                              <%=(left(Recordset1("标题"),18)&"..")%>
                              <%
	else%>
                              <%
	=(Recordset1("标题"))%>
                              <%end if%>
                              </A>
                                <%if Recordset1("最后更新日期")="2006-10-1" then  %>
                                <%
				if DateDiff("d",Recordset1("入库日期"),now())<5 then %>
                                <%response.Write("<img src=../../img/newgif.gif>")%>
                                <span class="style2 style10 style37"><%=(Recordset1.Fields.Item("入库日期").Value)%></span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset1("最后更新日期")="2006-10-1" then %>
                                <%if DateDiff("d",Recordset1("入库日期"),now())>5 then %>
                                <span class="style13 style10 style37"><%=(Recordset1.Fields.Item("入库日期").Value)%></span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset1("最后更新日期")<>"2006-10-1" then %>
                                <%
				if DateDiff("d",Recordset1("最后更新日期"),now())<5 then %>
                                <span class="style2 style10 style37"><%=(Recordset1.Fields.Item("最后更新日期").Value)%></span><span class="style12 style10 style40">[更新]</span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset1("最后更新日期")<>"2006-10-1" then %>
                                <%if DateDiff("d",Recordset1("最后更新日期"),now())>5 then %>
                                <span class="style13 style10 style37"><%=(Recordset1.Fields.Item("最后更新日期").Value)%></span>
                                <%end if%>
                                <%end if%></td>
                            <td width="21%">&nbsp;</td>
                          </tr>
                          <% 
  Repeat2__index=Repeat2__index+1
  Repeat2__numRows=Repeat2__numRows-1
  Recordset1.MoveNext()
Wend
%>
                      </table></td>
                      <td width="370" valign="top"><br>
                        <br>
                        <table width="130%"  border="0" cellspacing="0" cellpadding="0">
                          <% 
While ((Repeat1__numRows <> 0) AND (NOT Recordset2.EOF)) 
%>
                          <tr>
                            <td width="4%" height="21"><div align="right"></div></td>
                            <td width="75%"><A HREF="../../toall/tz/tzenews.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "id=" & Recordset2.Fields.Item("id").Value %>"> </A><A HREF="../../toall/tz/tzenews.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "id=" & Recordset2.Fields.Item("id").Value %>"> </A><A HREF="../../toall/tz/tzenews.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "id=" & Recordset2.Fields.Item("id").Value %>">
                              <% if len(Recordset2("主题"))>18 then%>
                              <%=(left(Recordset2("主题"),18)&"..")%>
                              <%
	else%>
                              <%
	=(Recordset2("主题"))%>
                              <%end if%>
                              </A>
                                <%if Recordset2("最后更新日期")="2006-10-1" then  %>
                                <%
				if DateDiff("d",Recordset2("日期"),now())<5 then %>
                                <%response.Write("<img src=../../img/newgif.gif>")%>
                                <span class="style2 style10 style37"><%=(Recordset2.Fields.Item("日期").Value)%></span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset2("最后更新日期")="2006-10-1" then %>
                                <%if DateDiff("d",Recordset2("日期"),now())>5 then %>
                                <span class="style13 style10 style37"><%=(Recordset2.Fields.Item("日期").Value)%></span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset2("最后更新日期")<>"2006-10-1" then %>
                                <%
				if DateDiff("d",Recordset2("最后更新日期"),now())<5 then %>
                                <span class="style2 style10 style37"><%=(Recordset2.Fields.Item("最后更新日期").Value)%></span><span class="style12 style10 style40">[更新]</span>
                                <%end if%>
                                <%end if%>
                                <%if Recordset2("最后更新日期")<>"2006-10-1" then %>
                                <%if DateDiff("d",Recordset2("最后更新日期"),now())>5 then %>
                                <span class="style13 style10 style37"><%=(Recordset2.Fields.Item("最后更新日期").Value)%></span>
                                <%end if%>
                                <%end if%></td>
                          </tr>
                          <% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset2.MoveNext()
Wend
%>
                      </table></td>
                    </tr>
                  </table>
              </div></td>
            </tr>
          </table>
      </div></td>
    </tr>
  </table>
  <table width="200" height="8" border="0" cellpadding="0" cellspacing="00">
    <tr>
      <td></td>
    </tr>
  </table>
  <table width="810" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td><img src="../img/jpg/766.gif" width="810" height="16"></td>
    </tr>
  </table>
  <table width="810" border="0" cellspacing="1" bgcolor="#AFDBFF">
    <tr>
      <td bgcolor="#FFFFFF"><table width="100%"  border="0" cellpadding="1" cellspacing="4">
          <tr>
            <td><div align="center"><img src="../../toall/gw/img/gif/1.gif" width="28" height="28"></div></td>
            <td><a href="../../f/asp/filesupadmin/jieshouselffilessdfghfg.asp">接收文件</a> <span class="style7"><a href="/f/asp/filesupadmin/index.asp" target="mainFrame">传送文件</a></span><a href="../../f/asp/filesupadmin/totongshifiles.asp"><span class="style37"> /</span>记录</a></td>
            <td><div align="center"><span class="style15">●</span></div></td>
            <td><span class="style33"><a href="../../toall/rizhi/writedsfgs.asp">工作日志</a> <span class="style37">/<a href="../../toall/rizhi/youserselftfd.asp">记录.管理 </a></span></span></td>
            <td><span class="style33"><a href="../../toall/workreport/writeworkreport.asp" target="mainFrame">工作周报 </a></span><span class="style37">/</span><a href="../../toall/workreport/bumenlistreportwdfbvgyhrtgh5t656gadvt.asp" target="mainFrame">管理</a></td>
            <td><span class="style33"><a href="../../../toall/workreport/writemonhthorjidudfb.asp" target="mainFrame">月份总结</a></span> <span class="style37">/</span><a href="../../../toall/workreport/adminzongjie/listyuejiefgh.asp" target="mainFrame">管理</a></td>
          </tr>
          <tr>
            <td><div align="center"><img src="../../logimg/ico_10.gif" width="28" height="28"></div></td>
            <td><a href="../../toall/sms/readsmsfgnjeytjwestrh.asp">接收消息</a> <a href="../../toall/sms/writesms.asp" target="mainFrame">发送消息</a> <span class="style37">/</span><a href="../../toall/sms/mysmstoother.asp">记录</a></td>
            <td><div align="center"><span class="style15">●</span></div></td>
            <td><a href="../../toall/rizhi/writemoban.asp">定义日志模板 </a><span class="style37">/</span><a href="../../toall/rizhi/listmobansghdfg.asp">模板管理</a></td>
            <td><span class="style33"><a href="../../toall/news/writejiaoxue.asp" target="mainFrame">发布新闻</a><span class="style16"> / <a href="../../toall/news/listbwanglu.asp" target="mainFrame">新闻管理</a></span></span></td>
            <td><a href="../../../toall/workreport/writjiduthorjidudfb.asp" target="mainFrame">季度总结 </a><span class="style37">/</span><a href="../../../toall/workreport/adminzongjie/listjidujiefgh.asp" target="mainFrame">管理</a></td>
          </tr>
          <tr>
            <td><div align="center"><img src="../../logimg/briefcase.gif" width="28" height="28"></div></td>
            <td><a href="../../toall/gw/getgongwengadfvgdfg.asp">接收公文</a> </td>
            <td><div align="center"><span class="style15">●</span></div></td>
            <td><span class="style33"><a href="../../toall/bwdfhdghndgh/writebwsdfdgfdbnbg.asp" target="mainFrame">工作日程 </a><span class="style37">/</span><a href="../../toall/bwdfhdghndgh/listbwanglu.asp" target="mainFrame">管理</a></span></td>
            <td><span class="style33"><a href="../../toall/shenpi/writezdfd.asp">提交审批</a> <span class="style37">/</span><a href="../../toall/shenpi/getshenlist.asp">办理审批 </a> <span class="style37">/</span><a href="../../toall/shenpi/sentshengqinglistfsdghs.asp">申请记录</a></span></td>
            <td><a href="../../../toall/workreport/nianzaongjiegfgdfb.asp" target="mainFrame">年度总结</a> <span class="style37">/</span><a href="../../../toall/workreport/adminzongjie/listnianjiefgh.asp" target="mainFrame">管理</a> </td>
          </tr>
          <tr>
            <td><div align="center"><img src="../../logimg/ico_1.gif" width="27" height="27"></div></td>
            <td><a href="../../toall/tz/tzlisttrgytry356.asp" class="style10">接收通知</a> </td>
            <td><div align="center"><span class="style15">●</span></div></td>
            <td><span class="style33"><span class="style7"><a href="../../toall/jihuahghyhgergfbhu546j7tghc/writeonejihua.asp" target="mainFrame">工作计划</a> 　 </span><span class="style37"> /<a href="../../toall/jihuahghyhgergfbhu546j7tghc/listgerenjihua.asp">记录.</a></span><a href="../../toall/jihuahghyhgergfbhu546j7tghc/listgerenjihua.asp">管理</a><span class="style37"> </span></span></td>
            <td><span class="style33"><a href="../../toall/h/writehrecordwefgbgf.asp">会议记录</a> <span class="style37">/</span><a href="../../toall/h/adminlistrecoadfgfbxfgbsfgh.asp">会议管理</a>/<a href="../../toall/h/bumenlistrecoadfgfbxfgbsfgh.asp" target="mainFrame">列表</a> <span class="style37">/</span><a href=../../toall/h/usertype/allhuiyibubumen.asp >分类</a></span></td>
            <td><span class="style33"><a href="../../../../toall/zhidu/shaertoall457tyhadfvSDFtoallll.asp" >制度列表 </a><span class="style37">/</span><a href="../../../toall/zhidu/type/tztype.asp" target="mainFrame">分类</a></span></td>
          </tr>
          <tr>
            <td width="5%"><div align="center"><img src="../../logimg/addr.gif" width="28" height="28"></div></td>
            <td width="29%"><a href="../../toall/jfoanet/shaertoall457tyhadfvSDFtoallll.asp">共享下载</a><span class="style37">/</span><a href="../../toall/jfoanet/tasketogongxiang.asp">上传</a><span class="style37">/</span><a href="../../toall/jfoanet/mysharefiles.asp">管理</a></td>
            <td width="1%"><div align="center"><span class="style15">●</span></div></td>
            <td width="27%"><span class="style33"><a href="../../toall/e/onlineemail.asp" target="mainFrame">电子邮件 </a></span></td>
            <td width="25%"><a href="../../toall/hr/addnew.asp">录入人事档案</a> <span class="style37">/</span><a href="../../toall/hr/9list.asp">管理档案</a></td>
            <td width="13%"><a href="../../getpwd/submitemaildfg.asp">密码绑定</a></td>
          </tr>
          <tr>
            <td><div align="center"><img src="../../img/down.gif" width="28" height="28"></div></td>
            <td><span class="style33"><span class="style37">发文：</span><a href="../../toall/fawen/sendgwfoxz.asp">提 交</a><span class="style37">/</span><a href="../../toall/fawen/getshenlist.asp">办理</a><span class="style37">/</span><a href="../../toall/fawen/sentshengqinglistfsdghs.asp">记录</a><span class="style37">/</span><a href="../../toall/fawen/updatimgpath.asp">上传签名</a></span></td>
            <td><div align="center"><span class="style15">●</span></div></td>
            <td><span class="style33"><span class="style37">收文：</span><a href="../../toall/shouwen/sendgwfoxz.asp">提 交</a><span class="style37">/</span><a href="../../toall/shouwen/getshenlist.asp">办理</a><span class="style37">/</span><a href="../../../toall/shouwen/sentshengqinglistfsdghs.asp">记录</a><span class="style37">/</span><a href="../../toall/fawen/updatimgpath.asp">上传签名</a></span></td>
            <td><a href="../../toall/mobile/send.asp">发送短信</a><span class="style37">(移动、联通、小灵通)</span></td>
            <td><span class="style33"><a href="../../toall/tongxunlu/writexunlu.asp" target="mainFrame">通讯录</a></span></td>
          </tr>
      </table></td>
    </tr>
  </table>
  <table width="810" height="50" border="0" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top"><br>
        <%=session("names")%>   <%if m="男" then%><img src="../../img/man.gif" width="8" height="12">
        <%else%><img src="../../img/women.gif" width="8" height="12">
        <%end if%> &nbsp;<%dim t 
	  t=hour(now())
	
	  if t<=3 and t>=0 then
	  response.write ("您这么晚还在忙吗？注意休息哦^-^")
	  end if
	  
	    if t<=5 and t>=4 then
	  response.write ("您还在忙吗，天快亮了？")
	  end if
	  
	  
	   if t<=8 and t>=6 then
	 response.write ("早上好！")
	  end if
	 if t<12 and t>=9 then
	 response.write ("上午好！")
	  end if
	  
	   if t<13 and t>=12 then
	 response.write ("中午了，该吃饭啦！")
	  end if
	     if t<14 and t>=13 then
	 response.write ("下午好，您不休息吗？")
	  end if
	  
 if t<=17 and t>=14 then
	 response.write ("下午好！")
	  end if
	   if t<=22 and t>=18 then
	   response.write ("晚上好！")
	    end if
	     if t<24 and t>=23 then
	   response.write ("很晚了，该休息啦！")
	 
			    end if
	  %>        &nbsp; 目前时间：<img height=11 src="../../toall/kq/t/time.gif" width=11 align=absmiddle> <span class="style4" id="webasp_time"></span><br>
  
        <script>setInterval("webasp_time.innerHTML=new Date().toLocaleString()+' 星期'+'日一二三四五六'.charAt (new Date().getDay());",1000);</script>   
  </td>
    </tr>
  </table>
  <br>
  <br>
          <EMBED NAME='CS1142665227437' SRC='../../sms.mid' LOOP=false 
AUTOSTART=false MASTERSOUND HIDDEN=true WIDTH=0 HEIGHT=0></EMBED>
  </div>
</body>
</html>
<% if session("toshowjs")="ok" then%>
<SCRIPT language=javascript src="../../ifrmae/js/hello.js"></SCRIPT>
<%if session("bofang")<>"yes" then %>
<%if tixingmusic("是否开通提示音乐")="是" then %>
<bgsound src="../../sms.mid" loop="0">
<%session("bofang")="yes"%>
<%end if%>
<%end if%>
<%end if%>
<%session("toshowjs")=""%>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
<%
tixingmusic.Close()
Set tixingmusic = Nothing
%>