📄 studentoutlist.asp
字号:
<% Set hdor = Server.CreateObject("HD.studentA")''请确保此行在最前
Set hdobj = Server.CreateObject("HD.ComOpen")'请保证此行在最前面
Connkaa = hdobj.WeekaaConn()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="pragma" content="no-cache">
<title>红笛软件</title>
<style type="text/css">
<!--
.style3 {font-size: 12px}
.style4 { color: #FFFFFF;
font-size: 14px;
}
body,td,th {
font-size: 12px;
}
.STYLE9 {
font-size: 36px;
font-family: "黑体";
font-weight: bold;
color: #FFFF00;
}
.STYLE10 {color: #FF0000}
.STYLE13 {
font-weight: bold;}
a:link {
text-decoration: none;
color: #000066;
}
a:visited {
text-decoration: none;
color: #000066;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
.STYLE12 {font-family: "黑体"; font-size: 16px;}
body {
background-color: #DEE7FF;
margin-left: 10px;
margin-top: 5px;
margin-right: 10px;
margin-bottom: 0px;
}
-->
</style><script language="JavaScript" type="text/JavaScript">
function delpay()
{
if(confirm("确定要删除此吗?"))
return true;
else
return false;
}
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
</head>
<body onmouseover="self.status='红笛软件:服务网址[http://weekaa.com/red]';return true">
<%
If Request.QueryString("deln") = "del" Then
call hdobj.Deler("studentOut","ll")
end if
call hdor.studentlist("studentOut","离校学生查询",1)
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -