The provider-specific property set DBPROPSET_ADSDBINIT can be accessed from ADO connection objects. For details and valid values for each property, see Provider-Specific Initialization Properties. The following is the mapping between the "friendly" property name and the property ID.
Property ID |
Property Name |
ADSPROP_INIT_CHAR_TYPE |
Advantage Character Data Type |
ADSPROP_INIT_ENCRYPTION_PASSWORD |
Advantage Encryption Password |
ADSPROP_INIT_FILTER_OPTIONS |
Advantage Filter Options |
ADSPROP_INIT_INCREMENT_USERCOUNT |
Increment User Count |
ADSPROP_INIT_LOCK_MODE |
Advantage Locking Mode |
ADSPROP_INIT_SECURITY_MODE |
Advantage Security Mode |
ADSPROP_INIT_SERVER_TYPE |
Advantage Server Type |
ADSPROP_INIT_SHOW_DELETED |
Show Deleted Records in DBF Tables with Advantage |
ADSPROP_INIT_TABLE_TYPE |
Advantage Table Type |
ADSPROP_INIT_TRIM_TRAILING_SPACES |
Trim Trailing Spaces |
ADSPROP_INIT_USE_NULLS |
Use NULL values in DBF Tables with Advantage |
ADSPROP_INIT_STORED_PROCEDURE_CONNECTION |
Stored Procedure Connection |
ADSPROP_INIT_COMPRESSION |
Advantage Compression |
After a connection has been made to the Advantage OLE DB provider, the value for these properties can be retrieved from the connection properties collection. In addition, as an alternative to specifying the values in the connection string, the initialization properties can be set prior to connecting. For example:
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Provider = "Advantage.OLEDB.1"
cn.Properties.Item("Data Source") = "\\server\volume\path"
cn.Properties.Item("Advantage Server Type") = "ADS_REMOTE_SERVER"
cn.Properties.Item("Advantage Table Type") = "ADS_ADT"
cn.Open