ODBC_SQLDataSources

4D - Documentation   Français   English   German   4D ODBC PRO, Command Theme List   4D ODBC PRO, Command Alphabetical List   Back   Previous   Next

version 2004


ODBC_SQLDataSources (direction; serverName; description) Longint

ParameterTypeDescription
directionLongintWhich data source the Driver Manager returns
information for
serverNameTextData source name
descriptionTextDescription of the driver associated with the data
source
Function resultLongintReturns the result of the MS ODBC API function
SQLDataSources

Description

The ODBC_SQLDataSources command returns information about the User and System data sources defined in the Driver Manager.

The direction parameter defines how to fetch the data sources and can be one of the following values:

ConstantDescription
SQL_FETCH_NEXTFetch the next data source name in the list
SQL_FETCH_FIRSTFetch from the beginning of the list
SQL_FETCH_FIRST_USERFetch the first User data sources
SQL_FETCH_FIRST_SYSTEM Fetch the first System data sources

serverName is the name of the data source, such as "MS Access Database."

description is the description of the driver associated with the data source, like "Microsoft Access Driver (*.mdb)."

For more information, please see the SQLDataSources function in the MS ODBC API at http://msdn.microsoft.com/library/en-us/odbc/htm/odbcsqldatasources.asp.

Function Results

SQL_SUCCESS, SQL_SUCCESS_WITH_INFO, SQL_NO_DATA, SQL_ERROR, or SQL_INVALID_HANDLE.

Example

The following method retrieves all the data sources and their descriptions and puts them into two arrays:

   ARRAY TEXT(arServer;0)
   ARRAY TEXT(arDescription;0)
   $result:=ODBC_SQLDataSources (SQL_FETCH_FIRST ;vServer;vDescription)
   If ($result=SQL_SUCCESS )  `If it's successful, there might be other data sources
      Repeat 
         APPEND TO ARRAY(arServer;vServer)  `add server name to end of the array
         APPEND TO ARRAY(arDescription;vDescription)  `add description to end of the array
         $result:=ODBC_SQLDataSources (SQL_FETCH_NEXT ;vServer;vDescription)
      Until ($result=SQL_NO_DATA )    `loop until no data is retrieved by the command
   End if 

4D - Documentation   Français   English   German   4D ODBC PRO, Command Theme List   4D ODBC PRO, Command Alphabetical List   Back   Previous   Next