------------search.asp----------------
ASP网页查询ACCESS数据
欢迎使用***查询系统
------------show.asp----------------
<%
response.charset="utf-8"
cnStr="provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")
set cn = server.createObject("adodb.connection")
set rs = Server.CreateObject("adodb.recordset")
cn.open cnStr
sql = "select * from DATA where 身份证号码='" & Trim( request("sid") ) & "'"
rs.open sql , cn , 3,3
%>
->查询结果<-
编号 |
姓名 |
身份证号码 |
缴费截止年 |
个人帐户月标准 |
个人帐户余额 |
备注 |
---|
<%
if rs.EOF then response.redirect "error.htm"
while not rs.EOF
%>
<%=rs("编号")%> |
<%=rs("姓名")%> |
<%=rs("身份证号码")%> |
<%=rs("缴费截止年月")%> |
<%=rs("个人帐户月标准")%> |
<%=rs("个人帐户余额")%> |
---无---- |
<%
rs.moveNext
wend
rs.close
cn.close
'ErrH:
'response.redirect "error.htm"
%>
返回主页---------------error.htm------------------
--------测试数据-------------------------
身份证号码
4509823198210220021
4509823198210220022
4509823198210220023
4509823198210220024
4509823198210220025
4509823198210220026
4509823198210220027
4509823198210220028
4509823198210220029