当前位置:数据库 > Access >>

分享一个ASP连接access查询知识教程

问题描述:

本人想学ASP苦无人指点,所以请高手指点下,假如我有这样一个数据库MDB,(学号,姓名,性别,民族,班号),我如果在HTML页面里编辑个一个表单,输入学号,或者姓名后点提交,便可在页面显示学生记录信息的。这样的代码怎么写啊,我要全一点的,
 从Dim conn开始
   Dim rs
   Dim db
   Dim sql
   db=".../student.mdb"
   sql="select *
        from student
   ...........
   ..........."
请问后面怎么写啊,我实在不知道


答案:
1、数据库连接
dim conn,connstr,db
db="/data/student.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr

2、通过学号查询,(HTML表单页你自己写,这是查询显示页)
<%
dim sXH
sXH=request.form("XH") '学号

sql = "SELECT * FROM [Student] WHERE XH='" &sXH& "'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.bof and rs.eof then
 rs.close
 set rs=nothing
 Response.write "查无记录!"
 response.End()
else
 sXH = rs("XH") '学号
 sXM      = rs("XM") '姓名
 sXB = rs("XB") '性别
 sMZ = rs("MZ") '民族
 sBH = rs("BH") '班号
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

学号:<%=sXH%><br>
姓名:<%=sXM%><br>
性别:<%=sXB%><br>
民族:<%=sMZ%><br>
班号:<%=sBH%></p>

www.zzzyk.com 电脑知识网 打造全国最大的电脑知识学习基地

Oracle
MySQL
Access
SQLServer
DB2
Excel
SQLite
SYBASE
Postgres
如果你遇到数据库难题:
请访问www.zzzyk.com 试试
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,