ConnectionString: String;
The ConnectionString property determines connection string, used for connecting to data provider.
Executing the example requires that the repository contains an ETL task with the Etl identifier, and an Access database file named db.mdb in the disk C root directory. There is a table named Table_1 in the database.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
EtlTask: IEtlTask;
EtlProvider: IEtlPlainDataProvider;
OleDbProvider: IDtOleDbProvider;
WxProvider: IWxRectangle;
WxETLProvider: IWxETLObject;
Begin
MB := MetabaseClass.Active;
//ETL task search. Repository object with the ETL identifier
MObj := MB.ItemById("Etl").Edit;
EtlTask := MObj As IEtlTask;
//Start of the source creation
//The Import From OleDb object creation
EtlProvider := EtlTask.Create(EtlObjectType.PlainDataOleDbProvider) As IEtlPlainDataProvider;
EtlProvider := EtlProvider.Edit;
EtlProvider.Id := "OleDb_Provider";
EtlProvider.Name := "Import from OleDb";
EtlProvider.Description := "Import from OleDb";
//Data source setting
OleDbProvider := EtlProvider.Provider As IDtOleDbProvider;
OleDbProvider.ConnectionString := "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db.mdb;Persist Security Info=False";
OleDbProvider.Query := "Select * from Table_1";
EtlProvider.FillDefault;
//Saving the source
EtlProvider.Save;
//End of source creation
//Start of visual object creation
WxProvider := EtlTask.Workspace.CreateRectangle;
WxETLProvider := New WxETLObject.Create;
WxETLProvider.ETLObject := EtlProvider;
WxProvider.Style.TextPosition := WxTextPosition.Bottom;
WxProvider.Style.PictureMarginTop := -10;
WxProvider.PinPosition := New GxPointF.Create(50, 50);
WxProvider.Extension := WxETLProvider As IWxShapeExtension;
//End of visual object creation
//Save Etl task
MObj.Save;
End Sub Main;
After executing the example the Import from OleDb object is created in the ETL task. The provider extracts data from the table Table_1, that is stored in Access db.mdb database.
See also: