使用以下代码打开DBF文件(ADODataSet的名字为DBF,所选择打开的DBF文件名字叫做Output.Dbf):
With DBF Do Begin
Active := False;
ConnectionString := 'Provider=MSDASQL.1;Persist Security Info=False;'
+ 'Data Source=dBASE Files;DefaultDir= ' + ExtractFilePath(cFName)
+ ';Initial Catalog=' + ExtractFilePath(cFName);
CommandText := 'Select * From ' + Copy(ExtractFileName(cFName),1,Pos ('.',cFName)-1) + ' Order By cCODE,dDate';
Active := True;
End;异常提示信息为:
[Microsoft] [ODBC dBase Driver] Microsoft Jet 数据库引擎找不到对象'OutPut.dbf'.请确定对象是否存在,并正确地写出他的名称和路径.问题是:在我的电脑上运行时不会出现异常,在其他装过Delphi的电脑上(不知是否是巧合)也正常,而在
其他没装Delphi的工作站上运行就出错.曾经怀疑是ADO版本或者操作系统补丁的问题,结果ADO已更新成2.8还是出错.
希望大虾们慷慨献计,99小弟.
With DBF Do Begin
Active := False;
ConnectionString := 'Provider=MSDASQL.1;Persist Security Info=False;'
+ 'Data Source=dBASE Files;DefaultDir= ' + ExtractFilePath(cFName)
+ ';Initial Catalog=' + ExtractFilePath(cFName);
CommandText := 'Select * From ' + Copy(ExtractFileName(cFName),1,Pos ('.',cFName)-1) + ' Order By cCODE,dDate';
Active := True;
End;异常提示信息为:
[Microsoft] [ODBC dBase Driver] Microsoft Jet 数据库引擎找不到对象'OutPut.dbf'.请确定对象是否存在,并正确地写出他的名称和路径.问题是:在我的电脑上运行时不会出现异常,在其他装过Delphi的电脑上(不知是否是巧合)也正常,而在
其他没装Delphi的工作站上运行就出错.曾经怀疑是ADO版本或者操作系统补丁的问题,结果ADO已更新成2.8还是出错.
希望大虾们慷慨献计,99小弟.
2、找一找,将Ado936.dll和AdoPlus.dll直接拷贝到程序所在路径中。试试
你搞错了,
也没看在那个贴的回复!
当时,我也是用delphi7 访问 .dbf 时,开始不行,后来,下载了新的驱动,才解决问题!
完全是 win32 的技术!
http://borland.mblogger.cn/scyangyu/posts/1527.aspxDelphi中Visual FoxPro的访问方法升级--------
哈哈,发现一个很奇怪的问题,这个页面左边有一个Flash时钟,鼠标旁边有一个JavaScript时钟,应该都是读取本地时间,但是两者的秒针居然不一致,而且相差好几秒。