我delphi用ADO做毕业设计,编译通过了,但运行的时候就冒出project project1.exe raised exception class EOLeException with message‘找

时间:2022-02-16 18:37:01
....

procedure TMainForm.FormCreate(Sender: TObject);

begin
MyPath:=ExtractFilePath(ParamStr(0));
ShortDateFormat:= 'yyyy/mm/dd';
end;


---------------------------------------------------------------
....

procedure TDataModuleADO.DataModuleCreate(Sender: TObject);
begin
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;DataSource='+
         MyPath+'Data\BookManage.mdb;Jet OLEDB:DATAbase Password='+
         MyPassW+';Persist Security Info=False';
ADOQuery1.Connection:=ADOConnection1;
ADOTable1.Connection:=ADOConnection1;

end;





15 个解决方案

#1


看不出问题啊.

#2


ADOConnection1.ConnectionString:='driver={Microsoft Access Driver (*.mdb)};dbq='+
         MyPath+'Data\BookManage.mdb';

#3


打开你的delphi 7安装盘上的mdac\mdac_typ.exe安装一下;

#4


S.F.兄。好久不见啊。

#5


mdac\mdac_typ.exe

#6


你的Jet引擎用的是什么版本的,看一下你的计算机里存在该版本的引擎不?

#7


数据库有问题

#8


还是搞不定 upupupupupup

#9


是不是你的ODBC DSN动态数据源没有设置

#10


请问如何配置ODBC DSN动态数据源没有设置

#11


procedure TDataModuleADO.DataModuleCreate(Sender: TObject);
begin

AdoConnection1.Connected:=False;    //加上这句


ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;DataSource='+
         MyPath+'Data\BookManage.mdb;Jet OLEDB:DATAbase Password='+
         MyPassW+';Persist Security Info=False';


AdoConnection1.Connected:=True;    //加上这句

ADOQuery1.Connection:=ADOConnection1;
ADOTable1.Connection:=ADOConnection1;
----------
楼主再试试看

#12



                       ◢██◣      
             ◢██████████◣     
           ◢◣███████████◤     
        ◢████◥██████◤         
   ◢█████████   ███◤          
   █████████◤  ◢████████◣     
   ◥███████◤  ◢█████████◤     
    ◥██████   ███◤  ████      
        ███  ◢██ ◢█◣◥███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███◢██◤ ███      
        ███  ██████ ◢███      
    ◢██████  ◥█◤██◤ ◥███      
    ◥██████    ◢██ ◢███◤      
      ◥████   ◢███ ◥███◣      
        ◥█◤  ◢███◤  ████◣     
            ◢███◤   ◥████     
           ◢███◤     ◥███     
           ◥█◤        ◥█◤     

#13


打开项目属性,
设置DataModual模块为第一个窗体创建看看!

#14


你单步调试,看在哪个语句出问题了,或者重新启动系统,有的时候delphi会把系统内存搞错了,就会出乱七八糟的问题!

#15


◢██◣      
             ◢██████████◣     
           ◢◣███████████◤     
        ◢████◥██████◤         
   ◢█████████   ███◤          
   █████████◤  ◢████████◣     
   ◥███████◤  ◢█████████◤     
    ◥██████   ███◤  ████      
        ███  ◢██ ◢█◣◥███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███◢██◤ ███      
        ███  ██████ ◢███      
    ◢██████  ◥█◤██◤ ◥███      
    ◥██████    ◢██ ◢███◤      
      ◥████   ◢███ ◥███◣      
        ◥█◤  ◢███◤  ████◣     
            ◢███◤   ◥████     
           ◢███◤     ◥███     
           ◥█◤        ◥█◤

#1


看不出问题啊.

#2


ADOConnection1.ConnectionString:='driver={Microsoft Access Driver (*.mdb)};dbq='+
         MyPath+'Data\BookManage.mdb';

#3


打开你的delphi 7安装盘上的mdac\mdac_typ.exe安装一下;

#4


S.F.兄。好久不见啊。

#5


mdac\mdac_typ.exe

#6


你的Jet引擎用的是什么版本的,看一下你的计算机里存在该版本的引擎不?

#7


数据库有问题

#8


还是搞不定 upupupupupup

#9


是不是你的ODBC DSN动态数据源没有设置

#10


请问如何配置ODBC DSN动态数据源没有设置

#11


procedure TDataModuleADO.DataModuleCreate(Sender: TObject);
begin

AdoConnection1.Connected:=False;    //加上这句


ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;DataSource='+
         MyPath+'Data\BookManage.mdb;Jet OLEDB:DATAbase Password='+
         MyPassW+';Persist Security Info=False';


AdoConnection1.Connected:=True;    //加上这句

ADOQuery1.Connection:=ADOConnection1;
ADOTable1.Connection:=ADOConnection1;
----------
楼主再试试看

#12



                       ◢██◣      
             ◢██████████◣     
           ◢◣███████████◤     
        ◢████◥██████◤         
   ◢█████████   ███◤          
   █████████◤  ◢████████◣     
   ◥███████◤  ◢█████████◤     
    ◥██████   ███◤  ████      
        ███  ◢██ ◢█◣◥███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███◢██◤ ███      
        ███  ██████ ◢███      
    ◢██████  ◥█◤██◤ ◥███      
    ◥██████    ◢██ ◢███◤      
      ◥████   ◢███ ◥███◣      
        ◥█◤  ◢███◤  ████◣     
            ◢███◤   ◥████     
           ◢███◤     ◥███     
           ◥█◤        ◥█◤     

#13


打开项目属性,
设置DataModual模块为第一个窗体创建看看!

#14


你单步调试,看在哪个语句出问题了,或者重新启动系统,有的时候delphi会把系统内存搞错了,就会出乱七八糟的问题!

#15


◢██◣      
             ◢██████████◣     
           ◢◣███████████◤     
        ◢████◥██████◤         
   ◢█████████   ███◤          
   █████████◤  ◢████████◣     
   ◥███████◤  ◢█████████◤     
    ◥██████   ███◤  ████      
        ███  ◢██ ◢█◣◥███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███ ███ ███      
        ███  ███◢██◤ ███      
        ███  ██████ ◢███      
    ◢██████  ◥█◤██◤ ◥███      
    ◥██████    ◢██ ◢███◤      
      ◥████   ◢███ ◥███◣      
        ◥█◤  ◢███◤  ████◣     
            ◢███◤   ◥████     
           ◢███◤     ◥███     
           ◥█◤        ◥█◤