Url: String;
The Url property determines web page address, or the path and the number of the file, from which data is imported.
Executing the example requires that the repository contains an ETL task with the Etl identifier, and the HTML file Data.html in the disk C root directory.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
EtlTask: IEtlTask;
EtlProvider: IEtlPlainDataProvider;
WebProvider: IDtWebProvider;
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 provider creation
//The Import From Web object creation
EtlProvider := EtlTask.Create(EtlObjectType.PlainDataWebProvider) As IEtlPlainDataProvider;
EtlProvider := EtlProvider.Edit;
EtlProvider.Id := "Web_Provider";
EtlProvider.Name := "Import from Web";
EtlProvider.Description := "Import from Web";
//Set up data provider
WebProvider := EtlProvider.Provider As IDtWebProvider;
WebProvider.HasHeader := True;
WebProvider.TableIdentificationType := DtWebTableIdentificationType.ByNumber;
WebProvider.TableNumber := 1;
WebProvider.Url := "c:\Data.html";
EtlProvider.FillDefault;
//Save provider
EtlProvider.Save;
//End of provider 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 Web object is created in the ETL task. The provider imports data from the Data.html HTML file. The first available table in the file is imported. Field names are imported from the first table row.
See also: