📄 top.asp

📁 这是一个学生考勤系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title><%=sj&"期"&fll%>成绩处理系统(<%=session("yfjb")%>＜<%if len(session("zname"))>0 then%><%=session("zname")%><%else%>匿名<%end if%>＞)</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="jscript.encode" src="menu.js"></script>
<!--#include file="style.css"-->
<script language="JavaScript">
<!--
function custom_print() {
    if (document.all) {
        if (navigator.appVersion.indexOf("5.0") == -1) {
            var OLECMDID_PRINT = 6;
            var OLECMDEXECOPT_DONTPROMPTUSER = 2;
            var OLECMDEXECOPT_PROMPTUSER = 1;
            var WebBrowser = "<OBJECT ID=\"WebBrowser1\" WIDTH=0 HEIGHT=0 CLASSID=\"CLSID:8856F961-340A-11D0-A96B-00C04FD705A2\"></OBJECT>";
            document.body.insertAdjacentHTML("beforeEnd", WebBrowser);
            WebBrowser1.ExecWB(6, 2);
            WebBrowser1.outerHTML = "";
        } else {
<!--            self.print();-->
           window.print();
        }
    } else {
<!--            self.print();-->
           window.print();
    }
}
//-->
</script>

</head>
<%dim cdc,yfjb,b,strr,cdh,rs1,q,r2s
dim gcd(10),cdm(10),cdlj(10),tp(10),ctp(10)
%>
<script language="JavaScript">
top.window.moveTo(0,0);
if (document.all) {
top.window.resizeTo(screen.availWidth,screen.availHeight);
}
else if (document.layers||document.getElementById) {
if (top.window.outerHeight<screen.availHeight||top.window.outerWidth<screen.availWidth){
top.window.outerHeight = screen.availHeight;
top.window.outerWidth = screen.availWidth;
}
}

if (!document.layers){function hr()
	{document.write("<div><hr></div>")}}
function link(act,txt)
	{document.write("<div class=link onMouseOver=this.className='overlink' onMouseOut=this.className='link' style='padding-left:16;padding-top:1;padding-bottom:1' onclick="+act+">"+txt+"</div>")}
function pop(win)
	{window.open(win,'','')}
function pw(win)
	{window.open(win,'','width=400,height=280,center,center')}
function showmenuie5(){
	var rightedge=document.body.clientWidth-event.clientX-100
	var bottomedge=document.body.clientHeight-event.clientY-25
if (rightedge<ie5menu.offsetWidth)
	ie5menu.style.left=document.body.scrollLeft+event.clientX-ie5menu.offsetWidth+20;
else
	ie5menu.style.left=document.body.scrollLeft+event.clientX-20
if (bottomedge<ie5menu.offsetHeight)
	ie5menu.style.top=document.body.scrollTop+event.clientY-ie5menu.offsetHeight
else
	ie5menu.style.top=document.body.scrollTop+event.clientY-40
	ie5menu.style.visibility="visible"
return false}
function hidemenuie5(){
	ie5menu.style.visibility="hidden"}
function tit(){
document.write("<div><font color='#FF9900'> 学生成绩处理系统</font></div>")}
var mailsys="Netscape mail";

var author="Jon Eyrick";
if (author == "Jon Eyrick"){
	phrompt=prompt;
	snarkconf=confirm;
}
function mailsome1(){
	who=phrompt("填写收信人邮件地址: ","leitw@163.com");
	what=phrompt("添加主题: ","[no subject]");
	if (snarkconf("你确定要发往 "+who+" 主题为 "+what+" 的信吗? ")==true){
		parent.location.href='mailto:'+who+'?subject='+what+'';
	}
}
</script>

<%yfjb=session("yfjb")
set rs=server.createobject("adodb.recordset")
rs.open "select * from menu where cdc=0 order by cdh",conn,1,3
b=1
strr=""
do while not rs.eof
cdh=rs("cdh")
gcd(b)=rs("cdmc")
tp(b)=rs("tp")
strr=strr+"mpmenu"&b&"=new mMenu('"&gcd(b)&"','','self','IMAGE/"&tp(b)&"','18','18','0');"


set rs1=server.createobject("adodb.recordset")
rs1.open "select * from menu where cdc="&cdh&" order by cdh",conn,1,3
q=1
do while not rs1.eof
set r2s=server.createobject("adodb.recordset")
r2s.open "select * from jbqx where yfjb='"&yfjb&"' and qx like '%{"&cdh&q&"}%'",conn,1,3
if not r2s.eof then
cdlj(q)=rs1("cdlj")
cdm(q)=rs1("cdmc")
ctp(q)=rs1("tp")
if cdm(q)="-" then
strr=strr+"mpmenu"&b&".addItem(new mMenuItem(null,null,null,true));"
else
strr=strr+"mpmenu"&b&".addItem(new mMenuItem('"&cdm(q)&"','"&cdlj(q)&"','self',false,'New','IMAGE/"&ctp(q)&"','16','16','0'));"
end if

end if
set r2s=nothing
q=q+1
rs1.movenext
loop

rs1.close
set rs1=nothing
%>
<%b=b+1
rs.movenext
loop
%>
<script language="javascript">
<%=strr%>
</script>
<link id="css" rel="stylesheet" href="menu.css" type="text/css">
<body topmargin="0" leftmargin="0" bgcolor="#FFFFFF" text="#000000">
<script>document_load()</script>
<div id=ie5menu class=up style="text-align: left;position: absolute; visibility: hidden; width: 150px; z-index: 200;padding:1px">
<script>tit();hr();link('javascript:history.back(1);','后退');
link('javascript:location.reload();','刷新');
<!--link('javascript:custom_print();','打印');-->
link('javascript:custom_print();','打印');
hr();link('javascript:alert("建设中...")','帮助');
link('pw("gybxt.asp")','关于本系统');
hr();link('mailsome1()','提点建议');
if (document.all&&window.print){
document.oncontextmenu=showmenuie5
document.body.onclick=hidemenuie5}
</script>
</div>
⌨️ 快捷键说明

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