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

📄 newleft.asp

📁 一套简单的OA系统
💻 ASP
字号:
<%response.expires=0%>
<!--#include file="asp/opendb.asp"-->
<!--#include file="asp/sqlstr.asp"-->
<HTML><HEAD><title>企业办公自动化IE37-OA系统</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/css.css" rel=stylesheet>
<meta http-equiv="pragma" content="no-cache">
<script language="JavaScript" src="css/outlook-like.js"></script>
<SCRIPT language=JavaScript1.2>
<!--
window.parent("main").location.href="jishuang.asp";
scores = new Array(20);
var numTotal=0;
NS4 = (document.layers) ? 1 : 0;
IE4 = (document.all) ? 1 : 0;
ver4 = (NS4 || IE4) ? 1 : 0;

if (ver4) {    with (document) {        write("<STYLE TYPE='text/css'>");        if (NS4) {            write(".parent {position:absolute; visibility:visible}");            write(".child {position:absolute; visibility:visible}");            write(".regular {position:absolute; visibility:visible}")        }        else {            write(".child {display:none}")        }        write("</STYLE>");    }}



function getIndex(el) {    ind = null;    for (i=0; i<document.layers.length; i++) {        whichEl = document.layers[i];        if (whichEl.id == el) {            ind = i;            break;        }    }    return ind;}


function arrange() {    nextY = document.layers[firstInd].pageY +document.layers[firstInd].document.height;    for (i=firstInd+1; i<document.layers.length; i++) {        whichEl = document.layers[i];        if (whichEl.visibility != "hide") {            whichEl.pageY = nextY;            nextY += whichEl.document.height;        }    }}function initIt(){    if (!ver4) return;    if (NS4) {        for (i=0; i<document.layers.length; i++) {            whichEl = document.layers[i];            if (whichEl.id.indexOf("Child") != -1) whichEl.visibility = "hide";       }        arrange();    }    else {        divColl = document.all.tags("DIV");        for (i=0; i<divColl.length; i++) {            whichEl = divColl(i);            if (whichEl.className == "child") whichEl.style.display = "none";        }    }}


function expandIt(el) {	if (!ver4) return;    if (IE4) {        whichEl1 = eval(el + "Child");		for(i=1;i<=numTotal;i++){			whichEl = eval(scores[i] + "Child");			if(whichEl!=whichEl1) {				whichEl.style.display = "none";			}		}        whichEl1 = eval(el + "Child");        if (whichEl1.style.display == "none") {            whichEl1.style.display = "block";        }        else {            whichEl1.style.display = "none";        }    }    else {        whichEl = eval("document." + el + "Child");		for(i=1;i<=numTotal;i++){			whichEl = eval("document." + scores[i] + "Child");			if(whichEl!=whichEl1) {				whichEl.visibility = "hide";			}		}        if (whichEl.visibility == "hide") {            whichEl.visibility = "show";        }        else {            whichEl.visibility = "hide";        }        arrange();    }}



onload = initIt;

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function openkg()
{	
	var openwinflag=0;
	openwinflag=window.open('','hrz8315','fullscreen=1,toolbar=no,scrollbars=no,resizable=0,menubar=no');
	openwinflag.resizeTo(112,301);
	openwinflag.moveTo(600,163);
	openwinflag.focus();
	openwinflag.location.href="qqprg/kuaig.asp";
}

function opennetmeeting()
{
	var openwinflag=0;
	openwinflag=window.open('','netmeetingwin','toolbar=no,scrollbars=no,resizable=0,menubar=no');
	openwinflag.resizeTo(465,455);
	openwinflag.moveTo(100,100);
	openwinflag.focus();
	openwinflag.location.href="netmeeting.asp";
}
//-->
</SCRIPT>
<link rel="stylesheet" href="9pp.css" type="text/css">

</HEAD>
<BODY leftMargin=0 topMargin=0 marginwidth="0" link="#000000" vlink="#000000" alink="#000000">
<table id=table1 width="100%" border="0" cellspacing="0" cellpadding="0" class="borderon"> 
<tr> 
 <td height="20" style="padding-top:3px"><nobr>&nbsp;<a href="left.asp">IE37办公导航</a></nobr></td>
</tr> 
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    
    <td style="height: 100%" id="outLookBarShow" name="outLookBarShow" valign="top" align="center" width="100%" class="borderon"> 
      <table border="1" cellspacing="0" cellpadding="7" style="height:100%;width:100%;border-bottom:0pt solid #ebf5d6;" valign="middle" align="center" width="90%" bordercolorlight="#808080" bordercolordark="#808080">   
<%
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
'打开数据库,读出权限
if oabusyusername="" then 
	response.write("<script language=""javascript"">")
	response.write("window.top.location.href='default.asp';")
	response.write("</script>")
	response.end
end if
on error resume next
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
rs.open "select count(*) as countss from userinf",conn,1,1
usercount=rs("countss")
if usercount >500 then
   rs.close
   set rs=nothing
   %>
   <script language=javascript>
       window.alert("对不起,超过了最大使用用户数");
       parent("main").location.href="/usercontrol.asp";
   </script>
<%
end if
rs.close
sql="select * from userinf where username=" & sqlstr(oabusyusername)
rs.open sql,conn,1

cook_allow_manage_workthings=rs("allow_manage_workthings")
cook_allow_auditing_workthings=rs("allow_auditing_workthings")
%>
       <tr> 
          <td>
            <p align="center"><a href="bmfw/15.asp" target="main">在线计数器</a></p>
          </td>
        </tr>		
<tr>
          <td>
            <p align="center"><a href="bmfw/8.asp" target="main">世界各地时间</a>
          </td>
</tr>
<tr>
          <td>
            <p align="center"><a href="bmfw/1.asp" target="main">浏览器在线修复</a>
          </td>
</tr>

        <tr> 
          <td>
            <p align="center"><a href="bmfw/ip/" target="main">手机IP地址查询</a></p>
          </td>
        </tr>		
        <tr> 
          <td>
            <p align="center"><a href="bmfw/5.asp" target="main">邮编区号查询</a></p>
          </td>
        </tr>		
        <tr> 
          <td>
            <p align="center"><a href="rl/cal.htm" target="main">万年历查询</a></p>
          </td>
        </tr>		

        <tr> 
          <td>
            <p align="center"><a href="qyml/default.asp" target="main">企业名录</a></p>
          </td>
        </tr>		
             </table>
          </td>
        </tr>
		
		<div name="blankdiv" id="blankdiv" style="overflow:auto;width:100%;height:100%"> 
	    </div>
      </table>
</BODY></HTML>

⌨️ 快捷键说明

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