Objekt TKAPADOConnection

Z K.A.P.
Verze z 15. 2. 2015, 14:29, kterou vytvořil Grepl (diskuse | příspěvky) (→‎Objekt TKAPADOConnection)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)
Skočit na navigaciSkočit na vyhledávání

Objekt TKAPADOConnection

Tato třída slouží pro podporu připojování k databázovým zdrojům prostřednictvím rozhraní ADO ve skriptovacím programovacím jazyku. Je možné se připojit k externí databázi prostřednictvím ADO (dle ConnectionString), zahájit, ukončit či zrušit transakci. Komponenty potřebují, aby ADO 2.1 (nebo vyšší) bylo instalováno na hostitelském počítači. Navíc, klientský software pro cílový databázový systém (jako například Microsoft SQL Server) musí být nainstalován (ovladač OLE DB nebo ovladač ODBC specifický pro daný databázový systém).

TKAPADOConnection = class(TDataset)
   constructor Create(AOwner: TObject);
   procedure Open;
   procedure Close;
   procedure BeginTrans;
   procedure RollbackTrans;
   procedure CommitTrans;
   property ConnectionString: string;
end;

Pro připojení k ADO zdroji dat je třeba správně připravit ConnectionString. To je řetězec znaků obsahující jednotlivé parametry připojení oddělené středníky.

Parametr Popis
Provider jméno místního ADO providera, který se má využít pro komunikaci
Data Source Jméno úložiště dat
File name Jméno souboru obsahujícího informace o připojení
Remote Provider Jméno ADO providera, který běží na vzdáleném počítači
Remote Server Jméno vzdáleného serveru (v případe použití vzdáleného ADO providera)

Parametrů může být v závislosti na typu připojení i více.
Výsledný příkaz pro nastavení připojení k MS SQL serveru může vypadat např. takto:
t.ConnectionString:= 'Provider=SQLOLEDB.1;Password=heslo;Persist Security Info=True;User ID=sa;Initial Catalog=MojeDatabaze;Data Source=MujServer;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=MujPC;Use Encryption for Data=False;Tag with column collation when possible=False';


nebo pro čtení dat z tabulky MS Excel:
t.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Slozka\TestData.xls;Extended Properties=Excel 8.0';
Pro připojení k tabulce MS Excel musí být zpracovávaná data označena pomocí názvu (funkce Definovat název v MS Excel). Vlastnost Extended Properties určuje verzi MS Excel (např. Excel 8.0 označuje verzi MS Excel 97; Excel 9.0 označuje verzi MS Excel 2000)


nebo pro čtení dat z DBF souboru:
t.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Slozka; Extended Properties=DBASE III;
dBase driver je v tomto případě Microsoft Jet xBASE Isam

nebo t.ConnectionString:= 'Provider=MSDASQL.1;Extended Properties="DefaultDir=%s;deleted=0;Driver={Microsoft dBase Driver (*.dbf)};DriverId=533;FIL=dBase 5.0";
dBase driver je v tomto případě Microsoft ODBC Desktop Driver Pack

nebo t.ConnectionString:= 'Provider=vfpoledb;Data Source=%s;Collating Sequence=general;
dBase driver je v tomto případě OLE DB Provider for Visual FoxPro

Pro přípravu ConnectionString pomocí dialogu lze využít funkci CreateADOConnectionStringDlg.