Delphi Connect to MS Access with Blank Password & Exclusive Protect


Kita bisa menggunakan ADO Connection untuk mengakses database Access, saya bisa menggunakan Ado Query dan Datasource di data access untuk mengolah data, berikut contoh Kode Connectionnya

Connection String untuk blank password :

ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ GetCurrentDir +'mydatabase.mdb;Persist Security Info=False';

Connection Strin untuk database yang di password :

ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ GetCurrentDir +'mydatabase.mdb;Persist Security Info=False;Jet OLEDB:Database Password=mypassword';

Set datasource ADOquery1 dengan ADOconnection1, dan set dataset Datasource1 dengan ADOquery1

ADOQuery1.ConnectionString:=ADOConnection1.ConnectionString;
With ADOQuery1 Do
Begin
  Close;
  SQL.Clear;
  SQL.Add('select * from table1');
  Open;
End;

DataSource1.DataSet := ADOQuery1;
  1. #1 by bang jont at April 7th, 2010

    boleh juga untuk referensi

(will not be published)
  1. No trackbacks yet.