ado连接字符串

function PromptDataSource(ParentHandle: THandle; InitialString: WideString): WideString;

procedure CreateUDLFile(const FileName, ProviderName, DataSourceName: WideString);

function DataLinkDir: string;

procedure GetProviderNames(Names: TStrings);

function PromptDataSource(ParentHandle: THandle; InitialString: WideString): WideString;

function PromptDataLinkFile(ParentHandle: THandle; InitialFile: WideString): WideString;

function GetDataLinkFiles(FileNames: TStrings; Directory: string = ''): Integer;