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';
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;
----------
楼主再试试看
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模块为第一个窗体创建看看!
设置DataModual模块为第一个窗体创建看看!
#14
你单步调试,看在哪个语句出问题了,或者重新启动系统,有的时候delphi会把系统内存搞错了,就会出乱七八糟的问题!
#15
◢██◣
◢██████████◣
◢◣███████████◤
◢████◥██████◤
◢█████████ ███◤
█████████◤ ◢████████◣
◥███████◤ ◢█████████◤
◥██████ ███◤ ████
███ ◢██ ◢█◣◥███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███◢██◤ ███
███ ██████ ◢███
◢██████ ◥█◤██◤ ◥███
◥██████ ◢██ ◢███◤
◥████ ◢███ ◥███◣
◥█◤ ◢███◤ ████◣
◢███◤ ◥████
◢███◤ ◥███
◥█◤ ◥█◤
◢██████████◣
◢◣███████████◤
◢████◥██████◤
◢█████████ ███◤
█████████◤ ◢████████◣
◥███████◤ ◢█████████◤
◥██████ ███◤ ████
███ ◢██ ◢█◣◥███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███◢██◤ ███
███ ██████ ◢███
◢██████ ◥█◤██◤ ◥███
◥██████ ◢██ ◢███◤
◥████ ◢███ ◥███◣
◥█◤ ◢███◤ ████◣
◢███◤ ◥████
◢███◤ ◥███
◥█◤ ◥█◤
#1
看不出问题啊.
#2
ADOConnection1.ConnectionString:='driver={Microsoft Access Driver (*.mdb)};dbq='+
MyPath+'Data\BookManage.mdb';
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;
----------
楼主再试试看
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模块为第一个窗体创建看看!
设置DataModual模块为第一个窗体创建看看!
#14
你单步调试,看在哪个语句出问题了,或者重新启动系统,有的时候delphi会把系统内存搞错了,就会出乱七八糟的问题!
#15
◢██◣
◢██████████◣
◢◣███████████◤
◢████◥██████◤
◢█████████ ███◤
█████████◤ ◢████████◣
◥███████◤ ◢█████████◤
◥██████ ███◤ ████
███ ◢██ ◢█◣◥███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███◢██◤ ███
███ ██████ ◢███
◢██████ ◥█◤██◤ ◥███
◥██████ ◢██ ◢███◤
◥████ ◢███ ◥███◣
◥█◤ ◢███◤ ████◣
◢███◤ ◥████
◢███◤ ◥███
◥█◤ ◥█◤
◢██████████◣
◢◣███████████◤
◢████◥██████◤
◢█████████ ███◤
█████████◤ ◢████████◣
◥███████◤ ◢█████████◤
◥██████ ███◤ ████
███ ◢██ ◢█◣◥███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███ ███ ███
███ ███◢██◤ ███
███ ██████ ◢███
◢██████ ◥█◤██◤ ◥███
◥██████ ◢██ ◢███◤
◥████ ◢███ ◥███◣
◥█◤ ◢███◤ ████◣
◢███◤ ◥████
◢███◤ ◥███
◥█◤ ◥█◤