菜鸟提问！asp联接ACCESS!!!Help!

tangss 2004-01-06 10:59:47
我的代码如下：
我是ASP新手，联结ACCESS数据库老是不成功，不知为何。请高手不吝指教！
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<%
dim conn
dim connstr
dim db
db="\ckdb.mdb" '数据库文件的位置
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
%>

</body>
</html>
错误类型：
Microsoft JET Database Engine (0x80004005)
/CK/test.asp
...全文
38 29 打赏 收藏 转发到动态 举报
写回复
用AI写文章
29 条回复
切换为时间正序
请发表友善的回复…
发表回复
888228 2004-01-09
  • 打赏
  • 举报
 回复
to:旺财！

rs.open "test",conn,1
response.write rs("aaa")

其中 "test" 是指你要打开的数据表..
rs("aaa")是指你要输出的任意字段...


你这样照搬连看都不看怎么可能不出错阿？？晕死`
xiantao123 2004-01-07
  • 打赏
  • 举报
 回复
<%
Dim db,conn,connstr
db="ckdb.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.open connstr
%>
应该对，如果不对，就不是代码的毛病了。
紫郢剑侠 2004-01-07
  • 打赏
  • 举报
 回复
IIS里设置好了吗?
luluso 2004-01-07
  • 打赏
  • 举报
 回复
15行是什么。你把你完整的代码贴出来吧？上面你写的代码不完整。
或者把你的库名，表名。字段名写出来！
xeimm 2004-01-07
  • 打赏
  • 举报
 回复
<%
dim conn
dim connstr
dim db
db="/ck/ckdb.mdb" '数据库文件的位置
set conn = server.createobject("adodb.connection")
connstr="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath(db)
conn.open connstr
%>
wzm1022 2004-01-07
  • 打赏
  • 举报
 回复
up
danjingwu 2004-01-07
  • 打赏
  • 举报
 回复
db="\ckdb.mdb"这句应该是db="/ckdb.mdb"
还有就是你的数据库的路径真的是这样连可以找到才行
tangss 2004-01-07
  • 打赏
  • 举报
 回复
luluso(luluso)的也是
错误类型：
Microsoft JET Database Engine (0x80004005)
/CK/test.asp, 第 15 行
tangss 2004-01-07
  • 打赏
  • 举报
 回复
我现在就是把ckdb.mdb放在CK目录下,test.asp也在CK下，可是也不行
flying310 2004-01-07
  • 打赏
  • 举报
 回复
dim conn
dim connstr
dim db
db="upload.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
' connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
' connstr="driver={SQL Server};server=localhost;UID=sa;PWD=;database=club"
conn.Open connstr
blueice2002 2004-01-07
  • 打赏
  • 举报
 回复
asp与sql server 数据库的连接
<%
'连接数据库————————————————————————————
set conn=server.createobject("adodb.connection")
Connstr="Provider=SQLOLEDB;Data Source=127.0.0.1;UID=sa;PWD=sa;DataBase=web"
'打开数据库——————————————————————————————————
conn.open connstr
'写数据查询语句————————————————————————
set rs=conn.execute("select * from asp where id>2")
'输出查询结果——————————————————————————
do until rs.eof
response.write rs("id")&"<br>"
response.write rs("name")&"<br>"
rs.movenext
loop
%>
************************************
asp与access 数据库的连接
********************************
<% dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("login.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
if err then
err.clear
end if
end if
set rs=conn.execute("select * from login_info where id>1")
do until rs.eof
response.write rs("id")&"<br>"
response.write rs("username")&"<br>"
response.write rs("password")&"<br>"
rs.Movenext
loop %>

*****************************************************
*****************************************************
<!--#include file="conn.asp"-->
<%
set rs=conn.execute("select * from login_info where id>2")
'set rs=server.createobject("adodb.recordset")
'sql="select * from login_info where id > ='1' "
'rs.open sql,conn,1,1
do until rs.eof
response.write rs("id")&"<br>"
response.write rs("username")&"<br>"
response.write rs("password")&"<br>"
rs.Movenext
loop
%>

**********************************************************
***********************************************************

连结其他数据库的方法(*.dbf,*.txt,excel,foxpro等) ----收藏
2002-10-30 18:41:05 浏览次数:145

'连结dbf文件
<%
' 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBF;"
DBPath = "SourceDB=" & Server.MapPath( "Dbf" )

' 调用Open 方法连接数据库
conn.Open Driver & SourceType & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
' 打开数据源，参数二为Connection对象
rs.Open "Select * From sample", conn, 2, 2
%>
'连结foxpro文件
<%
' 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBC;"
DBPath = "SourceDB=" & Server.MapPath( "Dbf/Sample.dbc" )

' 调用Open 方法连接数据库
conn.Open Driver & SourceType & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
' 打开数据源，参数二为Connection对象
rs.Open "Select * From sample", conn, 2, 2
%>

'连结excel文件
<%
' 建立Connection对象
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Excel Driver (*.xls)};"
DBPath = "DBQ=" & Server.MapPath( "Sample.xls" )

' 调用Open 方法连接数据库
conn.Open Driver & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
' 打开数据源，参数二为Connection对象
rs.Open "Select * From [成绩单$]", conn, 2, 2
%>

'连结txt文件
<%
' 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Text Driver (*.txt; *.csv)};"
DBPath = "DBQ=" & Server.MapPath( "Text" )

' 调用Open 方法连接数据库
conn.Open Driver & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
' 打开数据源，参数二为Connection对象
rs.Open "Select * From sample.txt", conn, 2, 2
%>






SELECT语法：(基本)



*************************************************************
**********************************************************
SELECT [DISTINCT]
(column [{, column } ] )| *
FROM table [ { , table} ]
[ORDER BY column [ASC] | [DESC
[{ , column [ASC] | [DESC } ] ]
WHERE predicate [ { logical-connector predicate } ];
------------------------------------------------------

INSERT语法：

INSERT INTO table
[(column { ,column})]
VALUES
(columnvalue [{,columnvalue}]);
------------------------------------------------------

UPDATE语法：

UPDATE table
SET column = value [{, column = value}]
[ WHERE predicate [ { logical-connector predicate}]];
------------------------------------------------------

DELETE语法：

DELETE FROM table
[WHERE predicate [ { logical-connector predicate} ] ];
------------------------------------------------------
blueice2002 2003-03整理----hshlin.8u8.com qq:14605617
msn:blueicceblue@hotmail.com
luluso 2004-01-07
  • 打赏
  • 举报
 回复
不是数据库连接的问题。是其它语句的错误!
读出时应,要不断地判断是否到了最后
<%
do while not rs.eof
response.writer rs("aaa")
rs.movenext
loop
%>
jfly301 2004-01-07
  • 打赏
  • 举报
 回复
应该是路径问题吧，
tangss 2004-01-07
  • 打赏
  • 举报
 回复
888228(China.Jerry) 的也不对，老是提示response.write rs("aaa")的下一行出错，但下一行什么也没有啊
tangss 2004-01-07
  • 打赏
  • 举报
 回复
谢谢大家，晚上结贴！
celerylhl 2004-01-07
  • 打赏
  • 举报
 回复
db="/ckdb.mdb"
angelheavens 2004-01-07
  • 打赏
  • 举报
 回复
1)用:xiantao123(奋起读书)的代码;
2)关闭Access;
3)强行结束所有能结束的dllhost.exe进程;
4)执行.........;
xieyj 2004-01-07
  • 打赏
  • 举报
 回复
试一下:
<%@language="vbscript" codepage="936"%>
<!doctype html public "-//w3c//dtd html 4.01 transitional//en" "http://www.w3.org/tr/html4/loose.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<%
dim conn
dim connstr
dim db
db="/ck/ckdb.mdb" '数据库文件的位置
set conn = server.createobject("adodb.connection")
connstr="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath(db)
conn.open connstr
%>

</body>
</html>
888228 2004-01-07
  • 打赏
  • 举报
 回复
这串代码给你..一定正确的.


datafile="date/download.mdb" '数据库的相对路径
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="&server.mappath(datafile)&";DRIVER={Microsoft Access Driver (*.mdb)};"
Conn.Open Connstr
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "test",conn,1
response.write rs("aaa")



'如果你的服务器采用较老版本Access驱动，请用下面连接方法connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(datafile)
luluso 2004-01-06
  • 打赏
  • 举报
 回复
<%
Dim db,conn,connstr
db="ckdb.mdb.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.open connstr
%>
加载更多回复（9）
Web Components 新前端组件新手菜鸟快速入门与实战
1，从菜鸟零基础到熟练掌握，使用 Web Components 基于原生的新 前端组件技术，用有趣的堆积木的方式，开发实战一个带动画交互的组件式移动端 WEB 应用。 组件式开发是前端发展的方向，现在流行...
WEB开发文档2 总结
转自：http://blog.donews.com/lvjiyong/archive/2006/06/29/931071.aspx怎样将后台生成的在内存中的图象显示到客户端Microsoft IE WebControls下载地址如何在DATAGRID中使用JAVASCRIPT脚本控制DataGrid中连接到下一页显示数据下载中文名文件时保存文件名乱码问题关于用ASP.net绘图的问题,请大虾指教那
个人收集资料分享（电子、计算机相关）
个人收集资料分享（电子、计算机相关）      毕业设计答辩结束！ 刚好近几天没事做，就整理了一下大学几年来收集的资料，嘿嘿~ 还不是一般的多啊，拖到Nero里看了一下，有5G多！看来要刻盘的话一张普通DVD还解决不了了！      大学四年说完就完了，感觉80后虎年生的人都很坎坷啊！ 找工作都变得辛苦了！ 去年拒了一份offer，没想到过了年回来行情就那么糟糕了，有点后悔了！  
XFocus Windows Internet 服务器安全配置
分享一下我老师大神的人工智能教程！零基础，通俗易懂！http://blog.csdn.net/jiangjunshow也欢迎大家转载本篇文章。分享知识，造福人民，实现我们中华民族伟大复兴！&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Windows&
MS-SQL Server 基础类 - SQL语句
 
ASP

28,390

社区成员

357,068

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章