📄 main.asp

📁 功能齐全的oa系统
💻 ASP
字号:

<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<script language=javascript>
var MenuCount = 2
function OpenMenu(m){
	var sRows = ""
	for(var i=0;i<MenuCount;i++){
		if(i==m)
			sRows +=  "20,*,"
		else
			sRows +=  "20,0,"
	}
	Menus.rows = sRows + "0,0"
}

function SetOnline(){
	MenuItem0.location = "Online.asp?R=" + Math.random()
	window.setTimeout("SetOnline()",5000)
}

function SetUser(){
	FrmUser1.location = "UserList.asp?ID=1&R=" + Math.random()
	FrmUser2.location = "UserList.asp?ID=2&R=" + Math.random()
	window.setTimeout("SetUser()",60000)
}

var MsgWin;
function SendMsg1(ToID,ToName){
	if(MsgWin&&MsgWin.open&&!MsgWin.closed){
		MsgWin.focus();
		MsgWin.SetInfo(ToID,ToName)
		return
	}
	var sSend = DataSend.document.body.innerHTML
	MsgWin = window.open("about:blank","To"+ToID,"width=315,height=225")
	MsgWin.document.close()
	MsgWin.document.open()
	MsgWin.document.write("<html><head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>短信息提示</title><style><!--td{font-size:12px; font-family: 宋体}--></style></head><body bgcolor=#DEDFDE style='border: 0 solid #FF9393' leftmargin=0 topmargin=0>")
	MsgWin.document.write(sSend)
	MsgWin.SetInfo(ToID,ToName)
}

function SendMsg(ToID,ToName){
	var userinfo = new Array(ToID,ToName)
	showModalDialog("Send.htm?R=" + Math.random(),userinfo,"dialogHeight: 255px; dialogWidth: 355px; center: Yes; help: No; resizable: No; status: no;scroll=no")
}
</script>
<frameset framespacing="0" name=Menus border="0" rows="20,*,20,0,0,0" frameborder="0" onload="this.focus();SetOnline();SetUser()">

<frame name=MenuHead0 src='MenuHead.asp?ID=0&Menu=所有人员' marginwidth=2 marginheight=2 scrolling=no noresize style='border-left: 1 solid #FFFFFF; border-right: 1 solid #808080; border-top: 1 solid #FFFFFF; border-bottom: 1 solid #808080'>
<frame name=FrmUser1 src='UserList.asp?ID=1' marginwidth=2 marginheight=2 scrolling=auto noresize style='border-left: 1 solid #FFFFFF; border-right: 1 solid #FFFFFF; border-top: 1 solid #FFFFFF; border-bottom: 1 solid #FFFFFF'>
<frame name=MenuHead1 src='MenuHead.asp?ID=1&Menu=部门人员' marginwidth=2 marginheight=2 scrolling=no noresize style='border-left: 1 solid #FFFFFF; border-right: 1 solid #808080; border-top: 1 solid #FFFFFF; border-bottom: 1 solid #808080'>
<frame name=FrmUser2 src='UserList.asp?ID=2' marginwidth=2 marginheight=2 scrolling=auto noresize style='border-left: 1 solid #FFFFFF; border-right: 1 solid #FFFFFF; border-top: 1 solid #FFFFFF; border-bottom: 1 solid #FFFFFF'>

<frame name=MenuItem0 src="about:blank">
<frame name=DataSend id=DataSend src="about:blank">
</frameset>
⌨️ 快捷键说明

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