| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3007 人关注过本帖
标题:delphi7中ACCESS数据库如何打开问题
只看楼主 加入收藏
水清人专
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-10-29
结帖率:0
收藏
已结贴  问题点数:20 回复次数:5 
delphi7中ACCESS数据库如何打开问题
本人正在学习DELPHI7,但此书中讲的是delphi7小型数据库问题,我试着想用access编个小程序,但如何打开此数据库,因为我在运行时老是提示数据库登陆窗口,数据库没有用户名和密码,点击确定就可以了,但这样太别扭!而且在其他计算机上不能独立运行,

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;
如能提供答案,真心感谢。
搜索更多相关主题的帖子: 数据库 ACCESS 
2010-10-29 16:38
筱晓绾
Rank: 10Rank: 10Rank: 10
来 自:湖南
等 级:贵宾
威 望:12
帖 子:512
专家分:1736
注 册:2010-9-1
收藏
得分:20 
不晓得是不是你没有指定用户名的原因,即使用户名为空,好像在连接字符串里面也要写上   
ADOTWB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;User="";Password="";Data Source=D:\wbsj\wbsj.mdb;Persist Security Info=False';
2010-10-29 16:44
水清人专
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-10-29
收藏
得分:0 
你好,第一次登陆编程论坛,提个问题就马上回复很高兴,但好像不是此问题,当加上User=""; 系统就出现Project wbfx.exe raised exception class E0leException with message'找不到可安装的ISAM'.process stopped use step or run to continue.
2010-10-30 22:29
水清人专
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-10-29
收藏
得分:0 
图片附件: 游客没有浏览图片的权限,请 登录注册

如果不加系统出现此对话框,点击OK,程序就能正常进入,出现
图片附件: 游客没有浏览图片的权限,请 登录注册

系统正常,但如果加入User="";系统出现
 
图片附件: 游客没有浏览图片的权限,请 登录注册

程序进程中断。
2010-10-30 22:39
筱晓绾
Rank: 10Rank: 10Rank: 10
来 自:湖南
等 级:贵宾
威 望:12
帖 子:512
专家分:1736
注 册:2010-9-1
收藏
得分:0 
呵呵,对于delphi7我不是很熟,所以抱歉了! 不晓得里面有没有加载事件的,许是在加载事件里面你重新加载了该模块?或是在项目里面将此模块设置了启动项。。。
2010-11-01 09:10
水清人专
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-10-29
收藏
得分:0 
谢谢,问题解决了,我不使用ADOConnectionWB而是直接打开使用打开表方式就可以解决了,还有我的数据太大,将近
40王条纪录,我不用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;
2010-11-06 22:14
快速回复:delphi7中ACCESS数据库如何打开问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024791 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved