📄 homeiolist.asp

📁 学生信息化管理系统,目前最完美的学生信息化管理系统,界面美观,操作方面,个性化设置.一套软件管理多所学校.

💻 ASP

字号:

<% Set hdobj = Server.CreateObject("HD.comOpen")'请保证此行在最前面
If Request.QueryString("deln") = "del" Then
call hdobj.Deler("HomeIO","k")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>红笛软件</title>
<style type="text/css">
<!--
body {
	background-color: #3399FD;
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-image: url(../Image/bg.gif);
}
body,td,th {
	font-size: 12px;
}
.STYLE2 {
	font-size: 18px;
	font-family: "黑体";
}
a:link {
	text-decoration: none;
}
a:visited {
	text-decoration: none;
}
a:hover {
	text-decoration: none;
}
a:active {
	text-decoration: none;
}
.B A:link {
	FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:visited {
	FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:hover {
	FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:active {
	FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.STYLE2 {
color: #FFFFFF;
	font-size: 18px;
	font-family: "黑体";
}
.tables {
background-image: url(../Image/bigbg.jpg);
background-repeat: no-repeat;

}
-->
</style>

<script language="JavaScript" type="text/JavaScript">
<!--
function delpay()
{
   if(confirm("确定要删除此吗？"))
     return true;
   else
     return false;	 
}

//-->//-->
</script>
</head>

<body>
  <table width="1003" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3399fd">
  <tr>
    <td height="150" align="center" valign="bottom"><img src="../Image/bigbga.jpg" width="1003" height="150"></td>
  </tr>
  <tr>
    <td height="28" align="center" valign="middle" background="../Image/bg01a.jpg"><span class="b"><a href="HomeIolist.asp">现住学生查询</a>　<a href="HomeIolista.asp">曾住学生查询</a>　<a href="StudentList.asp">按学生查询</a></span></td>
  </tr>
  <tr>
    <td height="400" align="center" valign="top" bgcolor="#3399FD"><table width="94%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td height="28" align="right">　</td>
      </tr>
      <tr>
        <td align="center">
<%
Set hd = Server.CreateObject("HD.Home")
Luo="A"
Lui="A"
call hd.HomeIoList(Luo,Lui,"http://weekaa.com")
%></td>
      </tr>
      
    </table>    </td>
  </tr>
  <tr>
    <td height="25" bgcolor="#3399FD">　　</td>
  </tr>
  <tr>
    <td height="25" background="../Image/bg01a.jpg" bgcolor="#3399FD">&nbsp;</td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -