用oledb连接Access2000库有问题,请看一下

wssqsh 2003-08-19 06:07:36
代码:
adocon1.Execute ("INSERT INTO OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0','Data Source=c:\sjsb.mdb" & ";User ID=Admin;Password=').evaluate.dbo.carunitprice SELECT * FROM carunitprice order by bm")
报错:已拒绝对OLE DB提供程序‘Microsoft.jet.oledb 4.0’的特殊访问。必须通过链接服务器来访问此提供程序
...全文
128 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
wumy_ld 2003-08-20
  • 打赏
  • 举报
回复
access数据库哪来的用户名?

dim con as new adodb.connection
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\sjsb.mdb;jet oledb:database password=YourPassword"

注意oledb后面是冒号。

然后
dim rs as new adodb.recordset
set rs=con.execute "SELECT * FROM carunitprice order by bm"

给分吧:)
wssqsh 2003-08-20
  • 打赏
  • 举报
回复
行行好
hxy2003 2003-08-20
  • 打赏
  • 举报
回复
up
wssqsh 2003-08-20
  • 打赏
  • 举报
回复
不是远程调用,*.mdb在本机
td427 2003-08-20
  • 打赏
  • 举报
回复
远程调用引用的错误。远程调用时的目录路径应为:\\计算机名\目录\文件
wssqsh 2003-08-20
  • 打赏
  • 举报
回复
??
wssqsh 2003-08-20
  • 打赏
  • 举报
回复
什么补丁
zhenglc 2003-08-20
  • 打赏
  • 举报
回复
补丁
wssqsh 2003-08-20
  • 打赏
  • 举报
回复
kissoflife(明月高楼休独倚,酒入愁肠,化作相思泪!):
ado连接服务器SQL,用insert into 本地ACCESS数据库,不是打开数据库,
现测试在2000pr...版中Microsoft.jet.oledb 4.0驱动可行,2000server版通不过,报错信息如贴

wssqsh 2003-08-19
  • 打赏
  • 举报
回复
????
wssqsh 2003-08-19
  • 打赏
  • 举报
回复
代码:
adocon1.Execute ("INSERT INTO OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0','Data Source=c:\sjsb.mdb" & ";User ID=Admin;Password=')...carunitprice SELECT * FROM carunitprice order by bm")
报错:已拒绝对OLE DB提供程序‘Microsoft.jet.oledb 4.0’的特殊访问。必须通过链接服务器来访问此提供程序
首先新建一个工程名称为ADO的基本对话框工程。然后: 1.在头文件stdafx.h 中加入 #import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","rsEOF") 2.在ADODLG.cpp中加入 void CADODlg::OnBtnQuery() { CoInitialize(NULL); // 初始化COM环境 _ConnectionPtr conn(__uuidof(Connection)); // 创建连接对象 _RecordsetPtr rst(__uuidof(Recordset)); // 创建记录集 try { conn->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=691126" ,"", "", adModeUnknown); // 打开数据库并建立连接(有密码) //conn->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb;" ,"", "", adModeUnknown); // 打开数据库并建立连接(没有密码) rst->Open(_variant_t("select * from sheet1"), _variant_t((IDispatch*) conn), adOpenDynamic, adLockOptimistic, -1); // 读取数据表 while(!rst->rsEOF) { ((CListBox*)GetDlgItem(IDC_LIST1))->AddString((_bstr_t)rst->GetCollect("姓名")); // 查询"姓名"字段 rst->MoveNext(); } } catch(_com_error e) { CString errormessage; // 保存错误信息 errormessage.Format("Error: %s", e.ErrorMessage()); // 设置错误信息的格式 //AfxMessageBox(errormessage); // 以对话框的形式输出错误信息 MessageBox(errormessage,"错误提示"); } //MessageBox("查询结束!","提示",0); rst->Close(); conn->Close(); rst.Release(); // 释放相应COM接口上的引用计数 conn.Release(); CoUninitialize(); // 卸载COM环境库 }

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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