⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dts_tlb.pas

📁 delphi使用sqlserver2000中dts导入导出数据
💻 PAS
📖 第 1 页 / 共 5 页
字号:
  TaskLogRecordDisp = dispinterface;
  PackageInfos = interface;
  PackageInfosDisp = dispinterface;
  PackageInfo = interface;
  PackageInfoDisp = dispinterface;
  PackageRepository = interface;
  PackageRepositoryDisp = dispinterface;
  PackageLineages = interface;
  PackageLineagesDisp = dispinterface;
  PackageLineage = interface;
  PackageLineageDisp = dispinterface;
  StepLineages = interface;
  StepLineagesDisp = dispinterface;
  StepLineage = interface;
  StepLineageDisp = dispinterface;
  _Package2 = interface;
  _Package2Disp = dispinterface;
  ExecuteSQLTask2 = interface;
  ExecuteSQLTask2Disp = dispinterface;
  CustomTaskUI = interface;
  CustomTaskUIDisp = dispinterface;
  _Application = interface;
  _ApplicationDisp = dispinterface;

// *********************************************************************//
// Declaration of CoClasses defined in Type Library                       
// (NOTE: Here we map each CoClass to its Default Interface)              
// *********************************************************************//
  Package = _Package;
  Package2 = _Package2;
  PropertiesProvider = _PropertiesProvider;
  Application = _Application;


// *********************************************************************//
// Declaration of structures, unions and aliases.                         
// *********************************************************************//
  LPDTSPackageError = ^DTSPackageError; 
  LPDTSStepExecStatus = ^DTSStepExecStatus; 
  LPDTSStepExecResult = ^DTSStepExecResult; 
  LPDTSStepScriptResult = ^DTSStepScriptResult; 
  LPDTSTaskExecResult = ^DTSTaskExecResult; 
  LPDTSStepPrecedenceBasis = ^DTSStepPrecedenceBasis; 
  LPDTSStepRelativePriority = ^DTSStepRelativePriority; 
  LPDTSPackagePriorityClass = ^DTSPackagePriorityClass; 
  LPDTSIsolationLevel = ^DTSIsolationLevel; 
  LPDTSForceMode = ^DTSForceMode; 
  LPDTSCustomTaskUIFlags = ^DTSCustomTaskUIFlags; 
  LPDTSRepositoryStorageFlags = ^DTSRepositoryStorageFlags; 
  LPDTSSQLServerStorageFlags = ^DTSSQLServerStorageFlags; 
  LPDTSRepositoryMetadataOptions = ^DTSRepositoryMetadataOptions; 
  LPDTSSQLObjectType = ^DTSSQLObjectType; 
  LPDTSTransfer_CopyDataOption = ^DTSTransfer_CopyDataOption; 
  LPDTSTransfer_ScriptOption = ^DTSTransfer_ScriptOption; 
  LPDTSTransfer_ScriptOptionEx = ^DTSTransfer_ScriptOptionEx; 
  LPDTSBulkInsert_DataFileType = ^DTSBulkInsert_DataFileType; 
  LPDTSLineageOptions = ^DTSLineageOptions; 
  LPDTSFastLoadOptions = ^DTSFastLoadOptions; 
  LPDTSTransformationSetOptions = ^DTSTransformationSetOptions; 
  LPDTSPackageType = ^DTSPackageType; 
  LPDTSExceptionFileOptions = ^DTSExceptionFileOptions; 
  LPDTSDesignerSettings = ^DTSDesignerSettings; 
  POleVariant1 = ^OleVariant; {*}


// *********************************************************************//
// Interface: IDTSStdObject
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10010004-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  IDTSStdObject = interface(IDispatch)
    ['{10010004-EB1C-11CF-AE6E-00AA004A34D5}']
  end;

// *********************************************************************//
// DispIntf:  IDTSStdObjectDisp
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10010004-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  IDTSStdObjectDisp = dispinterface
    ['{10010004-EB1C-11CF-AE6E-00AA004A34D5}']
  end;

// *********************************************************************//
// Interface: Properties
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10020001-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  Properties = interface(IDTSStdObject)
    ['{10020001-EB1C-11CF-AE6E-00AA004A34D5}']
    function Get_Parent: IDTSStdObject; safecall;
    function Item(Index: OleVariant): Property_; safecall;
    function Get__NewEnum: IUnknown; safecall;
    function Get_Count: Integer; safecall;
    property Parent: IDTSStdObject read Get_Parent;
    property _NewEnum: IUnknown read Get__NewEnum;
    property Count: Integer read Get_Count;
  end;

// *********************************************************************//
// DispIntf:  PropertiesDisp
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10020001-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  PropertiesDisp = dispinterface
    ['{10020001-EB1C-11CF-AE6E-00AA004A34D5}']
    property Parent: IDTSStdObject readonly dispid 2;
    function Item(Index: OleVariant): Property_; dispid 0;
    property _NewEnum: IUnknown readonly dispid -4;
    property Count: Integer readonly dispid 5;
  end;

// *********************************************************************//
// Interface: Property_
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10020002-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  Property_ = interface(IDTSStdObject)
    ['{10020002-EB1C-11CF-AE6E-00AA004A34D5}']
    function Get_Parent: IDTSStdObject; safecall;
    function Get_Value: OleVariant; safecall;
    procedure Set_Value(pRetVal: OleVariant); safecall;
    function Get_Properties: Properties; safecall;
    function Get_Name: WideString; safecall;
    function Get_Type_: Integer; safecall;
    function Get_Get: WordBool; safecall;
    function Get_Set_: WordBool; safecall;
    property Parent: IDTSStdObject read Get_Parent;
    property Value: OleVariant read Get_Value write Set_Value;
    property Properties: Properties read Get_Properties;
    property Name: WideString read Get_Name;
    property Type_: Integer read Get_Type_;
    property Get: WordBool read Get_Get;
    property Set_: WordBool read Get_Set_;
  end;

// *********************************************************************//
// DispIntf:  Property_Disp
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10020002-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  Property_Disp = dispinterface
    ['{10020002-EB1C-11CF-AE6E-00AA004A34D5}']
    property Parent: IDTSStdObject readonly dispid 2;
    property Value: OleVariant dispid 0;
    property Properties: Properties readonly dispid 7;
    property Name: WideString readonly dispid 11;
    property Type_: Integer readonly dispid 12;
    property Get: WordBool readonly dispid 13;
    property Set_: WordBool readonly dispid 14;
  end;

// *********************************************************************//
// Interface: _Package
// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
// GUID:      {10020205-EB1C-11CF-AE6E-00AA004A34D5}
// *********************************************************************//
  _Package = interface(IDTSStdObject)
    ['{10020205-EB1C-11CF-AE6E-00AA004A34D5}']
    function Get_Parent: IDTSStdObject; safecall;
    function Get_Properties: Properties; safecall;
    function Get_Name: WideString; safecall;
    procedure Set_Name(const pRetVal: WideString); safecall;
    function Get_Steps: Steps; safecall;
    function Get_Tasks: Tasks; safecall;
    function Get_Connections: Connections; safecall;
    function Get_GlobalVariables: GlobalVariables; safecall;
    function Get_PackageID: WideString; safecall;
    function Get_Description: WideString; safecall;
    procedure Set_Description(const pRetVal: WideString); safecall;
    function Get_WriteCompletionStatusToNTEventLog: WordBool; safecall;
    procedure Set_WriteCompletionStatusToNTEventLog(pRetVal: WordBool); safecall;
    function Get_LogFileName: WideString; safecall;
    procedure Set_LogFileName(const pRetVal: WideString); safecall;
    function Get_FailOnError: WordBool; safecall;
    procedure Set_FailOnError(pRetVal: WordBool); safecall;
    function Get_VersionID: WideString; safecall;
    function Get_CreatorName: WideString; safecall;
    function Get_CreatorComputerName: WideString; safecall;
    function Get_CreationDate: TDateTime; safecall;
    function Get_PackagePriorityClass: DTSPackagePriorityClass; safecall;
    procedure Set_PackagePriorityClass(pRetVal: DTSPackagePriorityClass); safecall;
    function Get_MaxConcurrentSteps: Integer; safecall;
    procedure Set_MaxConcurrentSteps(pRetVal: Integer); safecall;
    procedure Execute; safecall;
    procedure SaveToStorageFile(const UNCFile: WideString; const OwnerPassword: WideString; 
                                const OperatorPassword: WideString; 
                                var pVarPersistStgOfHost: OleVariant; bReusePasswords: WordBool); safecall;
    procedure SaveToRepository(const RepositoryServerName: WideString; 
                               const RepositoryDatabaseName: WideString; 
                               const RepositoryUserName: WideString; 
                               const RepositoryUserPassword: WideString; 
                               Flags: DTSRepositoryStorageFlags; const CategoryID: WideString; 
                               var pVarPersistStgOfHost: OleVariant); safecall;
    procedure RemoveFromRepository(const RepositoryServerName: WideString; 
                                   const RepositoryDatabaseName: WideString; 
                                   const RepositoryUserName: WideString; 
                                   const RepositoryUserPassword: WideString; 
                                   const PackageID: WideString; const VersionID: WideString; 
                                   const PackageName: WideString; Flags: DTSRepositoryStorageFlags); safecall;
    procedure LoadFromStorageFile(const UNCFile: WideString; const Password: WideString; 
                                  const PackageID: WideString; const VersionID: WideString; 
                                  const Name: WideString; var pVarPersistStgOfHost: OleVariant); safecall;
    procedure LoadFromRepository(const RepositoryServerName: WideString; 
                                 const RepositoryDatabaseName: WideString; 
                                 const RepositoryUserName: WideString; 
                                 const RepositoryUserPassword: WideString; 
                                 const PackageID: WideString; const VersionID: WideString; 
                                 const PackageName: WideString; Flags: DTSRepositoryStorageFlags; 
                                 var pVarPersistStgOfHost: OleVariant); safecall;
    function GetSavedPackageInfos(const UNCFile: WideString): SavedPackageInfos; safecall;
    procedure UnInitialize; safecall;
    procedure SaveToSQLServer(const ServerName: WideString; const ServerUserName: WideString; 
                              const ServerPassword: WideString; Flags: DTSSQLServerStorageFlags; 
                              const PackageOwnerPassword: WideString; 
                              const PackageOperatorPassword: WideString; 
                              const PackageCategoryID: WideString; 
                              var pVarPersistStgOfHost: OleVariant; bReusePasswords: WordBool); safecall;
    procedure LoadFromSQLServer(const ServerName: WideString; const ServerUserName: WideString; 
                                const ServerPassword: WideString; Flags: DTSSQLServerStorageFlags; 
                                const PackagePassword: WideString; const PackageGuid: WideString; 
                                const PackageVersionGuid: WideString; 
                                const PackageName: WideString; var pVarPersistStgOfHost: OleVariant); safecall;
    procedure RemoveFromSQLServer(const ServerName: WideString; const ServerUserName: WideString; 
                                  const ServerPassword: WideString; 
                                  Flags: DTSSQLServerStorageFlags; const PackageGuid: WideString; 
                                  const PackageVersionGuid: WideString; 
                                  const PackageName: WideString); safecall;
    procedure SaveAs(const NewName: WideString); safecall;
    procedure GetDTSVersionInfo(out VersionMajor: Integer; out VersionMinor: Integer; 
                                out VersionBuild: Integer; out VersionComments: WideString); safecall;
    function Get_LineageOptions: DTSLineageOptions; safecall;
    procedure Set_LineageOptions(pRetVal: DTSLineageOptions); safecall;
    function Get_UseTransaction: WordBool; safecall;
    procedure Set_UseTransaction(pRetVal: WordBool); safecall;
    function Get_TransactionIsolationLevel: DTSIsolationLevel; safecall;
    procedure Set_TransactionIsolationLevel(pRetVal: DTSIsolationLevel); safecall;
    function Get_AutoCommitTransaction: WordBool; safecall;
    procedure Set_AutoCommitTransaction(pRetVal: WordBool); safecall;
    function Get_RepositoryMetadataOptions: DTSRepositoryMetadataOptions; safecall;
    procedure Set_RepositoryMetadataOptions(pRetVal: DTSRepositoryMetadataOptions); safecall;
    function Get_UseOLEDBServiceComponents: WordBool; safecall;
    procedure Set_UseOLEDBServiceComponents(pRetVal: WordBool); safecall;
    function GetLastExecutionLineage(out LineageShort: Integer): WideString; safecall;
    procedure StartPreparationForStepsExecutingOnMainThread; safecall;
    procedure EndPreparationForStepsExecutingOnMainThread; safecall;
    property Parent: IDTSStdObject read Get_Parent;
    property Properties: Properties read Get_Properties;
    property Name: WideString read Get_Name write Set_Name;
    property Steps: Steps read Get_Steps;
    property Tasks: Tasks read Get_Tasks;
    property Connections: Connections read Get_Connections;
    property GlobalVariables: GlobalVariables read Get_GlobalVariables;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -