E' necessario avere configurato una fonte dati ODBC.
Dim wrkODBC As Workspace
Dim conODBC As Connection
'Crea l'oggetto Workspace di ODBCDirect.
Set wrkODBC = CreateWorkspace("NewODBCWorkspace", "admin", "", dbUseODBC)
Set conODBC = wrkODBC.OpenConnection("Temp", dbDriverNoPrompt, , "ODBC;UID=;PWD=;DSN=db1")
bye