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

📄 f3.asp

📁 网佳网络办公系统(以下简称OA)是一套基于B/S模式的无纸化办公系统。[显著特点:无须安装客户端] 主要功能模块:管理 公文 车辆 通知 档案 值班 人事 审批 仓库 主界面 软件下载 个
💻 ASP
字号:
<!--#include file="../config/config.asp"-->
<%Response.Buffer=true
Response.CacheControl = "no-cache" 
Response.AddHeader "Pragma", "no-cache" 
Response.Expires=0
n=Year(date())
y=Month(date())
r=Day(date())
s=Hour(time())
f=Minute(time())
m=Second(time())
if len(y)=1 then y="0" & y
if len(r)=1 then r="0" & r
if len(s)=1 then s="0" & s
if len(f)=1 then f="0" & f
if len(m)=1 then m="0" & m
t=s & ":" & f & ":" & m
sj=n & "-" & y & "-" & r & " " & t
savetime=Session("hxf_u_savetime")
if DateDiff("n",savetime,sj)>=15 then
 Response.Write "<script Language=Javascript>parent.f3.location.href='savevalue.asp';</script>"
 Response.End
end if
online=Application("hxf_c_onlinelist")
s=0
for i=1 to UBound(online) step 6
if Application("hxf_c_disnewuser")<>1 and online(i+1)=lyy then 
s=1
end if
next
shumu=Application("hxf_c_chatrs")-s
%>
<script Language="JavaScript">
if(parent.document.URL.indexOf("file:")>=0||parent.f2.document.URL.indexOf("file:")>=0){parent.location.href='chaterr.asp?id=001';}
//parent.f3.document.open();
parent.md1();
parent.f3.document.writeln("<font color=red class=p9><b><%=shumu%></b></font><font color=00FFFF class=p9>(<%=Application("hxf_c_active")%>)<font color=ffffff class=p9>人在线</font></font><br></div>");
parent.md2();
//parent.ma("<%=amn%>","");
<%for i=1 to UBound(online) step 6
if Application("hxf_c_disnewuser")=1 or online(i+1)<>lyy then
Response.Write "parent.tma(" & chr(34) & online(i+1) & chr(34) & "," & chr(34) & online(i+3)& chr(34) & ",'"&online(i+2)&"');"& chr(13) & chr(10)
end if
next%>
parent.md3();
setTimeout("this.location.reload();",128000);
</script>

⌨️ 快捷键说明

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