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

📄 main.asp

📁 功能齐全的oa系统
💻 ASP
字号:
<%option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/String.asp" -->
<%
	If Session("AccountID")="" Then
%>
<script language=javascript>
window.close()
</script>
<%
		Response.End 
	End If
	Dim C,ObjDB,ObjRS,i
	Dim ID
	Dim StrRows,StrFrames
	Dim StrTable
	Dim StrDiv
	Dim ObjName,StrTrueName

	ID = Request.QueryString("ID")
	Set C = Server.CreateObject("CMS2003.DBHandle")
	Set ObjDB = Server.CreateObject("Adodb.Connection")
	OpenDB ObjDB
	C.Init(ObjDB)
	Set ObjName = C.View("Select TrueName From t_OA_SYS_Account_Character Where AccountID = " & Session("AccountID"))
	StrTrueName = ObjName("TrueName")
	ObjRS = C.List(1,0,"Select ID,MenuName,SonCount=(Select Count(*) From t_Base_Menu a Where a.ParentID = t_Base_Menu.ID) From t_Base_Menu Where ParentID = 0 And MenuType=1")

	For i =  0 To C.GetRows()
		StrTable = StrTable & "<td width=70 align=left><table cellpadding=2 border=0 cellspacing=0><tr><td style='cursor:hand' class=tdOff onmouseover=" & Chr(34) & "this.className='tdOn'" & Chr(34) & " onmouseout=" & Chr(34) & "this.className='tdOff'" & Chr(34) & "><div onmouseover='ShowMenuItemMis(" & i & ")' onclick='ShowMenuItemMis(" & i & ")'>" & ObjRS(1,i) & "</td></tr></table></td>"
		StrDiv = StrDiv & "<DIV id=MenuItemMis" & i & " style=" & Chr(34) & "display='none';Z-INDEX: 50; LEFT: " & 255+i*74 & "; OVERFLOW: hidden; WIDTH: 120; POSITION: absolute; TOP: 84; HEIGHT: " & ObjRS(2,i)*25 & "" & Chr(34) & ">"
		StrDiv = StrDiv & "<iframe src='MenuItemMis.asp?ID=" & ObjRS(0,i) & "&Item=" & i & "' height='100%' width='100%' FRAMEBORDER=0 MARGINWIDTH=0 MARGINHEIGHT=0 Scrolling=no></iframe></DIV>"
	Next
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>长庆石化公司 计划财务部办公系统</title>
<style>
<!--
body         { border: 0 solid #dedfde }
td           { font-size: 12px }
.tdOn{background-color: #b5bed6; border: 1 solid #000000}
.tdOff{background-color:#dedfde;border:1 solid #dedfde}
.LeftNavOff  { color: #000000; cursor: hand; font-family: Verdana; font-size: 12px; 
               letter-spacing: -0.5pt; line-height: 16px; text-decoration: 
               none; width: 16px; border: 1px solid #Dedede; margin: 0px; 
               padding-left: 3px; padding-right: 3px; padding-top: 1px; 
               padding-bottom: 0px }
.LeftNavUp   { color: #FF3300; cursor: hand; font-family: Verdana; font-size: 12px; height: 
               0pt; letter-spacing: -0.5pt; line-height: 16px; 
               text-decoration: none; width: 16px; 
               border-left: 1px solid #FFFFFF; border-right: 1px solid #808080; 
               border-top: 1px solid #FFFFFF; border-bottom: 1px solid #808080; 
               margin: 0px; padding-left: 3px; padding-right: 3px; 
               padding-top: 1px; padding-bottom: 0px }
.LeftNavDown { color: #000000; cursor: hand; font-family: Verdana; font-size: 12px; 
               letter-spacing: -0.5pt; line-height: 16px; text-decoration: 
               none; width:16px; border-left: 1px solid #808080; 
               border-right: 1px solid #FFFFFF; border-top: 1px solid #808080; 
               border-bottom: 1px solid #FFFFFF; margin: 0px; padding-left: 
               3px; padding-right: 3px; padding-top: 1px; padding-bottom: 0px }

-->
</style>
<script language=javascript>

function GoURL(url){
	alert(url)
}

var MenuItemMisCount = 5
function ShowMenuItemMis(id){
	HideMenuItemMis()
	document.all("MenuItemMis"+id).style.display="";
}
function HideMenuItemMis(){
	for(var i=0;i<=MenuItemMisCount;i++){
		document.all("MenuItemMis"+i).style.display="none";
	}
}

function doAlert(intType,strMessage){
		var strTemp;
		var strVersion;
		var varReturn;
		strVersion = navigator.appVersion;
		strTemp ="<%=Application("RootPath")%>Dialog/alertwindow.asp?intType=" + intType +"&strMessage="+strMessage + "&R=" + Math.random();
		if(strVersion.indexOf("MSIE 5")!=0 && strVersion.indexOf("MSIE 5")!=-1)
			varReturn = window.showModalDialog(strTemp,"Dialog Arguments Value","dialogHeight: 220px; dialogWidth: 300px; center: Yes; help: No; resizable: No; status: no;scroll=no");
		else{
			varReturn = window.showModalDialog(strTemp,"Dialog Arguments Value","dialogHeight: 220px; dialogWidth: 300px; center: Yes; help: No; resizable: no; status: no;scroll=no");
		}
		return varReturn;
}

</Script>

</head>

<body bgcolor="#dedfde" leftMargin=0 topMargin=0 onload="showLineMenu(document.all(lineMenuParent));" >

<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%">
<tr>
<td height="1%" colspan=3 background="/images/ui/bg.gif"><IMG src="/images/ui/logo.gif" ></td>
</tr>
<tr>
<td valign="top" colspan="3" height="1%"><!--分割线--->
	<div align="center">
	<table border="0" cellspacing="0" width="100%" cellpadding="0">
	<tr>
	<td bgcolor="#848284"></td>
	</tr>
	<tr>
	<td bgcolor="#ffffff"></td>
	</tr>
	</table>
	</div><!--分割线--->

	<div align="center">
	<table border="0" cellpadding="2" cellspacing="0" width="100%">
	<tr>
	<td height="35">
		<table border="0" cellpadding="2" cellspacing="0">
		<tr>
		<td width=140 align=center >欢迎您,<%=StrTrueName%></td>
		<td ><img src="/images/ui/mis.gif"></td>
		<td style="border-right: 1 solid #808080">
			<table><tr>
			<%=StrTable%>
			</tr></table>
		</td>
		<td align=right style="border-left: 1 solid #FFFFFF">
			<table border=0 align=right	><tr>
			<td onclick="IframeMain.location='Desk.asp'" class=LeftNavOff onmouseover="this.className='LeftNavUp'" onmousedown="this.className='LeftNavDown'" onmouseup="this.className='LeftNavUp'" onmouseout="this.className='LeftNavOff'" ><img src="/images/ui/head/home.gif"></td>
			<td onclick="history.go(-1)" class=LeftNavOff onmouseover="this.className='LeftNavUp'" onmousedown="this.className='LeftNavDown'" onmouseup="this.className='LeftNavUp'" onmouseout="this.className='LeftNavOff'" ><img src="/images/ui/head/back.gif"></td>
			<td onclick="history.go(1)" class=LeftNavOff onmouseover="this.className='LeftNavUp'" onmousedown="this.className='LeftNavDown'" onmouseup="this.className='LeftNavUp'" onmouseout="this.className='LeftNavOff'" ><img src="/images/ui/head/forward.gif"></td>
			</tr>
			</table>
		</td>
		</tr>
		</table>
	</td>
	</tr>
	</table>
	</div>

</td>
</tr>


<tr>
	<td width="1%" style="BORDER-BOTTOM: #ffffff 1px solid; BORDER-LEFT: #848284 1px solid; BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #848284 1px solid" valign="top" align="middle" height="99%"><!--目录--->
	<iframe src="MenusOA.asp" height="100%" width=130></iframe><!--目录--->
	</td>

	<td width=30>&nbsp;</td>

	<td valign="center" align="middle" width="99%" height="99%">

	<div align="center">
	<table border="0" cellspacing="0" width="99%" height="100%" style="BORDER-BOTTOM: #ffffff 1px solid; BORDER-LEFT: #848284 1px solid; BORDER-RIGHT: #ffffff 1px solid; BORDER-TOP: #848284 1px solid" cellpadding="0">
	<tr>
	<td style="BORDER-BOTTOM: #848284 1px solid; BORDER-LEFT: #ffffff 1px solid; BORDER-RIGHT: #848284 1px solid; BORDER-TOP: #ffffff 1px solid" valign="center" align="middle">
	 
		<table border="0" cellspacing="0" width="99%" height="100%" cellpadding="0">
		<tr>
		<td bgcolor="#ffffff" height="100%">
		<iframe name=IframeMain src="Desk.asp" width="100%" height="100%"></iframe>
		</td>
		</tr>
		<tr>
		<td height="5"></td>
		</tr>
		</table>

	</td>
</tr>
</table>
</div>

		<%=StrDiv%>

</body>

⌨️ 快捷键说明

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