asp 如何连接access数据库
<%
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("你的数据库路径")
%>
基本逻辑不对
条件还没有写完,你就查询了改,
<%
cname=request.form("uname")
cpass=request.form("upass")
dim conn
dim strConn
set conn=server.CreateObject("adodb.connection")
strConn="Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("data\Test.mdb")
conn.open strConn
sqlstr="select uid,姓名,课程号,分数,老师 from score,uid where uid.uid=score.uid and score.uid='"&Session("UserName")&"'"
if CName"" then
sqlstr=sqlstr &" and 课程名 like '%"&CName&"%'"
end if
sqlstr=sqlstr & " Order by uid.uid"
set rs=conn.Execute(sqlstr)
conn.close
set conn=nothing
%>
成绩信息网页
成绩信息
uid
姓名
课程号
分数
老师
方法如下:
1、首先新建一个access数据库。access的版本建议是2003年版本的,没有access可以自行下载安装。数据库的名字我们就叫db1.mdb,新建数据库表明为table_1,在表1中新建name等几个字段,并相应插入字段值。
2、用FTP工具在虚拟服务器中新建一个mytest文件夹,将该数据库上传到mytest文件夹中。
3、在mytest文件夹下,新建一个test.asp文件,该文件的内容如下:
<%
set conn=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("db1.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql="select * from table_1 order by id asc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
response.write(rs("name"))
rs.movenext
loop
conn.close
set rs=nothing
set conn=nothing
%>
4、然后在地址栏输入域名\mytestest.asp,显示结果如下图。查询到的是“name"字段的值。
<%
dbstring ="db/guestbook.mdb" '数据库文件的位置
Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbstring)
conn.Open connstr
%>
把第一行代码 按照自己的改下就可以了 其余的不用变 2014的ACC的后缀应该是 其他的