分享一个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 电脑知识网 打造全国最大的电脑知识学习基地