📄 choose.asp

📁 企业信息化管理系统：针对的是一个计算机配件生产公司为背景实现的。

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>选择</title>
</head>

<body bgcolor="#D2D2CA">

<%  
   op=request.querystring("op")
   sp=request.querystring("sp")
   if strcomp(op,"tongzhifabu")=0 then
   op= "tongzhifabu.asp"
   end if
   if strcomp(op,"email_index")=0 then
     op= "email\email_index.asp"
   end if 
   if strcomp(op,"Person")=0 then
     op="person.asp"
   end if 
   if strcomp(op,"persongzchx")=0 or strcomp(op,"Person.asp")=0 then
     op="persongzchx.asp"
   end if
   if strcomp(op,"newregist")=0 then
     op="newregister.asp"
   end if
   if strcomp(op,"change")=0 then
	 op="change.htm"
   end if
    if strcomp(op,"sfile")=0 then
	 op="filemanage.asp"
   end if
   if strcomp(op,"gongzixiugai")=0 then
     op="AXgongzi.asp"
   end if
   if strcomp(op,"gongziff")=0 then
     op="Agongzi.asp"
   end if
    if strcomp(op,"gongzichx")=0 then
     op="gongzichx.asp"
   end if
    if strcomp(op,"rifa")=0 then
     op="rifa.asp"
   end if
   if strcomp(op,"richa")=0 then
     op="richa.asp"
   end if
   if strcomp(op,"zhou")=0 then
     op="zhou.asp"
   end if
   if strcomp(op,"yue")=0 then
     op="cha.asp"
   end if
   if strcomp(op,"manage")=0 then
	 op="manage.htm"
   end if
%>
<IFRAME id='fmaint' WIDTH="100%" height="470" src=<%=op%> scrolling="<%=sp%>" frameborder="0" ></IFRAME>
<script language=javascript>
		setInterval("refreshparent()",1000);
		function refreshparent(){			
			 parent.document.getElementById('fmain').innerHTML=document.getElementById('fmaint').innerHTML;
		}
</script>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -