ｄｅｌｐｈｉ７中ACCESS数据库如何打开问题

水清人专发布于 2010-10-29 16:38， 3007 次点击

本人正在学习DELPHI7，但此书中讲的是ｄｅｌｐｈｉ７小型数据库问题，我试着想用ａｃｃｅｓｓ编个小程序，但如何打开此数据库，因为我在运行时老是提示数据库登陆窗口，数据库没有用户名和密码，点击确定就可以了，但这样太别扭！而且在其他计算机上不能独立运行，

procedure TFormWB.FormActivate(Sender: TObject);
begin

    ADOConnectionWB:=TADOConnection.Create(self);
    ADOConnectionWB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\wbsj\wbsj.mdb;Persist Security Info=False';

   ADOTWB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=D:\wbsj\wbsj.mdb;Persist Security Info=False';
   ADOTWB.TableName:='wmsj';
   ADOTWB.open;
  WMZS.Caption:=IntToStr(ADOTWB.Recordset.RecordCount);
end;
如能提供答案，真心感谢。

5 回复

筱晓绾2010-10-29 16:44

不晓得是不是你没有指定用户名的原因，即使用户名为空，好像在连接字符串里面也要写上
ADOTWB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;User="";Password="";Data Source=D:\wbsj\wbsj.mdb;Persist Security Info=False';

水清人专2010-10-30 22:29

你好，第一次登陆编程论坛，提个问题就马上回复很高兴，但好像不是此问题，当加上User="";　系统就出现Project wbfx.exe raised exception class E0leException with message'找不到可安装的ISAM'.process stopped use step or run to continue.

水清人专2010-10-30 22:39

只有本站会员才能查看附件，请登录

如果不加系统出现此对话框，点击OK，程序就能正常进入，出现

只有本站会员才能查看附件，请登录

系统正常，但如果加入User="";系统出现

只有本站会员才能查看附件，请登录

程序进程中断。

筱晓绾2010-11-01 09:10

呵呵，对于delphi7我不是很熟，所以抱歉了！

不晓得里面有没有加载事件的，许是在加载事件里面你重新加载了该模块？或是在项目里面将此模块设置了启动项。。。

水清人专2010-11-06 22:14

谢谢，问题解决了，我不使用ADOConnectionWB而是直接打开使用打开表方式就可以解决了，还有我的数据太大，将近
４０王条纪录，我不用ACCESS了，我使用SQL也可以解决此问题。
//ADOConnectionWB:=TADOConnection.Create(self);
    //ADOConnectionWB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=D:\wbsj\wbsj.mdb;Persist Security Info=False';
    //ADOConnectionWB.Open;
    //ADOConnectionWB.Connected:=TRUE;
     //ADOConnectionWB.DataSets:=ADOTWB;
    // ADOTWB.Connection:=ADOConnectionWB;
   ADOTWB.ConnectionString:='FILE NAME=D:\wbsj\sjlj.udl';
   ADOTWB.TableName:='wmsj';
   ADOTWB.Active:=true;