一个笨菜鸟的问题!(50分)

K

kyleman

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样建立数据库的连接,
我想建立一个连接将ACCESS的数据库和Delphi应用程序连接,
数据库的名字为phone.mdb.并要对这个表进行查询。
 
先在BDE中建立一个连接,
再在Delphi中用Tquery控件
 
先在odbc中建立一个连接,然后打开bde就可以看到那个连接了!
 
如果不想每次连接都输入口令,加个Tdatabase控件
 
用BDE的话,可以用ODBC来连接.
用ADO的话,更简单,只要设置connectionstring就可以了!
 
大家说的都没错;
建立连接可以通过多种方式,我建议你看一看数据库的有关连接方法和方式
 
delphi可以直接用table来联接access的mdb文件呀。
 
最快的办法:
  用DIMAOND控件,操作最简单,速度最快,DIMAOND可以在http://go1.163.com/~onekey
下载。

最折中的办法:
  用ADO,加一个Tadoconnect控件,设置CONNECTION的属性即可,用‘JET OLEDB4.0’

当然用BDE和ODBC也行。
 
[:D]最间单的是用ODBC,在用户DSN中点击添加,选择一个MDB的驱动完成,输入数据库名和路径就OK
 
我也想知道,我不想通过ODBC,我想通过ADO,可是配置的connectstring都不对,因为我有多个数据源,要配置的话,太多了,谁有好的办法
 
在程序中动态配置ADO的connectstring 。
 
http://www.aidelphi.com/6to23/docu/ADODemo.zip
看一下这个DEMO吧
 
ADO+Assess是经典的结合,而且要动态确定数据库路径,以免找不到数据库!
 
简单得可以借鉴这个例子!
procedure TForm1.Button1Click(Sender: TObject);
var
path: string;
begin
path := ExtractFilePath(Application.ExeName); //程序路径
ADOConnection1.Connected := False;
try
ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
path + 'db.mdb' + ';Persist Security Info=False';
ADOConnection1.Connected := true;
MessageBox(GetActiveWindow(), '成功连接!', '警告', MB_OK + MB_ICONWARNING);
except
MessageBox(GetActiveWindow(), '系统错误!', '警告', MB_OK + MB_ICONWARNING);
application.Terminate;
end;
with self.ADOQuery1 do
begin
close;
self.ADOQuery1.SQL.Clear;
self.ADOQuery1.SQL.Add('insert into test values(''ASD'',''RER'',''FAF'')');
//ADOQuery1.parambyname('A').asstring:=Edit1.text;
// parambyname('B').asstring:=Edit2.text;
// parambyname('C').asstring:=Edit3.text;这里哪位大侠告诉我用什么语句可以代替QUERY中得这个语句
self.ADOQuery1.ExecSQL;
end;
self.ADOQuery1.ExecSQL;
end;
前提条件熟呢得数据库和应用程序在同一个目录下
 
// parambyname('B').asstring:=Edit2.text;
这里哪位大侠告诉我用什么语句可以代替QUERY中得这个语句
 
//parambyname('B').asstring:=Edit2.text;
Parameters.ParamByName('b').Value ???
 
顶部