
怎么连接access数据库实例
1个回答
2016-07-07
展开全部
1.请先看看你的站点路径是否正确
2.看看你的站点是否支持ASP【可用包含<%=now()%>语句测试.】
3.看看权限.
4.如果还不行,请联系我.
<%
dim conn
dim connstr
dim db
db="database/data_asp.mdb"
'注意数据库路径以及数据库名。
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
dim rs,sqlStr
set rs=Server.CreateObject("ADODB.Recordset")
sqlStr="Select * from tablename"
'tablename为数据库中的表名。
rs.open sql,conn,1,3
do while not rs.Eof
'自行修改一下你的字段名,在这里tablename表必须有一下这些字段。
response.write(rs("字段名1")&"<br>")
response.write(rs("字段名2"))
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
2.看看你的站点是否支持ASP【可用包含<%=now()%>语句测试.】
3.看看权限.
4.如果还不行,请联系我.
<%
dim conn
dim connstr
dim db
db="database/data_asp.mdb"
'注意数据库路径以及数据库名。
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
dim rs,sqlStr
set rs=Server.CreateObject("ADODB.Recordset")
sqlStr="Select * from tablename"
'tablename为数据库中的表名。
rs.open sql,conn,1,3
do while not rs.Eof
'自行修改一下你的字段名,在这里tablename表必须有一下这些字段。
response.write(rs("字段名1")&"<br>")
response.write(rs("字段名2"))
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询