SQLConfigDataSource(hwndParent: Integer; fRequest: Integer;lpszDriverString: String; lpszAttributes: String): Integer;

調用狀態下使用：

function SQLConfigDataSource(hwndParent: Integer; fRequest: Integer;lpszDriverString: String; lpszAttributes: String): Integer;stdcall;external 'ODBCCP32.DLL';

建立SQLSERVER的ODBC：

SQLConfigDataSource(0, ODBC_ADD_SYS_DSN,'SQL Server','DSN=Record_ODBC'+ chr(0) +'Server=(local)'+ chr(0) +'Database=master'+ chr(0) +'Description=DragonPC SQLServer ODBC Source'+ chr(0));

{　　DSN：你的ODBC數據源名稱。

　　Server：你的數據庫服務器名稱，使用(local)指的是本地計算機安裝的數據庫。注：最新的SQL Server 2000支持一臺計算機運行多個SQL Server服務，這個時候你需要指定SqlSever的InstanceName。

　　Address：指定SQL Server服務器的網絡IP地址。

　　Database：指定默認數據庫名稱。

　　Language：指定默認語言。

　　Description：備注信息。}

建立DBF表ODBC：

SQLConfigDataSource(0, ODBC_ADD_SYS_DSN, 'Microsoft Visual FoxPRo Driver' + CHR(0), 'dsn=SourceTable' + CHR(0) + 'BackgroundFetch=Yes' + CHR(0) + 'Description=descripcion de la conexion' + CHR(0) + 'Exclusive=No' + CHR(0) +sourcedbstr + CHR(0) +'Sourcetype=DBF');

其他均雷同，只是在建立DBF表調試了好長時間，寫出來希望大家免去浪費時間。

注：以上內容只供初學者遇到類似問題參考。