delphi和access連接的方式

條件：控件名：AdoConnecion1,數據庫名：Sample,用戶名：sa 密碼：123，數據庫地址：本機

AdoConnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=Sample;Data Source=.';

Adoconnection1.LoginPrompt:=False;

Adoconnection1.Connected:=True;

上面這段代碼為SQL數據庫的聯接方式：最後壹句Data Source=. 其中的“.”表示為數據庫在本機，如果數據在其它地方，則將點改為IP地址或是服務器名稱。

2.ACCESS數據庫的聯接方式：

條件：Adoconnection1,數據庫名：Sample 密碼：123，數據庫文件路徑為程式存取的根目錄。

procedure TDataModule1.DataModuleCreate(Sender: TObject);

var

DbPath:String;

begin

DbPath:=ExtractFilePath(Application.ExeName)+'Sample.mdb';

Adoconnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123;Data Source='+DbPath+';Persist Security Info=false';

Adoconnection1.LoginPrompt:=False;

Adoconnection1.Connected:=True;

end;