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

📄 searchlook.asp

📁 很好的一个学生成绩管理系统
💻 ASP
字号:
<%
dim key
dim biao
key=Request("key")
biao=Request("biao")
%>
<%
Select case biao
case "学号"
   biao="cj"
case "品牌"
   biao="pp"
case "车型"
   biao="cx"
case "排量/功率"
   biao="pl"
case "参考价格"
   biao="jg"
case "销售名称"
   biao="mc"
case "销售电话"
   biao="dh"   
case Else
   Response.Redirect("index.asp")
End Select
%>
<%If key<>"" and biao<>"" Then%>
<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("hljcar.com.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM c1 where "+biao+" like '%"+key+"%'"
rs.Open sql, conn, 1, 1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css">
<title>金融天地成绩查询系统</title>
</head>
<body leftmargin="0" Topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="head.asp" --><form name=form method="post" action="adminsearch.asp" onSubmit="return checkdata()"> 
<table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td> </td>
  </tr>
</table>
<table width="608" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><a href="http://home.163kk.com/YANGHBU/"><span lang="zh-cn">返回</span> </a>                       </td>
  </tr>
</table>
<table width="608" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><div align="center"> <span lang="zh-cn"><font color="#FF0000">有</font></span><font color="#FF0000"><span lang="zh-cn">问题请</span>联系:</font>E-mail:<a href="mailto:webmaster@hljcar.com">yangpo@wihz.com</a> 
         OICQ:93760105 <a href="http://fintd.126.com"><span lang="zh-cn">本人网站</span></a></div></td>
  </tr>
</table>

<table width="750" border="0" align="center" cellpadding="0" cellspacing="1" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
  <tr bgcolor="#49AAFA"> 
    <td width="96" height="20" > <div align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">学号</span>&nbsp;</font></div></td>
    <td width="178" height="16" > <div align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">姓名</span>&nbsp;</font></div></td>
    <td width="85" height="16" > <div align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">性别</span>&nbsp;</font></div></td>
    <td width="96" height="16" > <div align="center"><font color="#FFFFFF">&nbsp;&nbsp;<span lang="zh-cn">出生日期</span></font></div></td>
    <td width="229"  height="16"> <p align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">民族</span></font></p></td>
    <td width="229"  height="16"> <p align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">数学</span></font></p></td>
    <td width="229"  height="16"> <p align="center"><font color="#FFFFFF">&nbsp;<span lang="zh-cn">家</span></font></p></td>
    <td width="79"  height="16" bgcolor="#49AAFA"> <p align="center"><font color="#FFFFFF">&nbsp;详细介绍</font></p></td>
  </tr>
  <% do while not rs.eof %>
  <tr bgcolor="#efefef"> 
    <td height="22"> <div align="center"><font color="#49AAFA"><%=rs("cj")%></font></div></td>
    <td height="18"> <div align="center"> 
        <div align="center"><%=rs("cx")%></div>
      </div></td>
    <td height="18"> <div align="center"><%=rs("pl")%> </div></td>
    <td  height="18"> <div align="center"><%=rs("jg")%></div></td>
    <td  height="18"> <div align="center"><%=rs("mc")%></div></td>
    <td  height="18"> <div align="center"><%=rs("sx")%></div></td>
    <td  height="18"> <div align="center"><%=rs("cc")%></div></td>
   <td  height="18"> </td>
  </tr>
  <% i=i+0                                                                                                  
          rs.movenext                                                                                                  
          if i>=rs.PageSize then exit do 
		  loop                                                                    
          rs.close                                                                                                
          set rs=nothing                                                                                                
          conn.close                                                                                                
          set conn=nothing %>
</table>
<table width="100" height="36" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td> </td>
  </tr>
</table>
<table width="777" border="0" align="center" cellpadding="0" cellspacing="1">
  <tr> 
    <td height="65" bgcolor="#FFFFFF"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td background="../images/bg-t.gif"><table width="101%" border="0" cellspacing="1" cellpadding="0">
              <tr> 
                <td bgcolor="#34A0FA"> </td>
              </tr>
            </table></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="1" cellpadding="0">
        <tr> 
          <td bgcolor="#FFFFFF"> </td>
        </tr>
      </table>
      <table width="98%" height="27" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="27"><SCRIPT language=JavaScript 
                  src="../foot.js"></SCRIPT></td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
<%
Else
response.Write "错误的请求"
end if%>

⌨️ 快捷键说明

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