si, solo tienes que crear una variable del tipo conexion, por ejemplo:
Dim db as conection
set db.open "Provider=" & sProvider & ";Server=" & sServer & ";Database=" & sDatabase & ";uid=" & suid & ";pwd=" & spwd & ";Current Language=" & sCurrentLanguage & ";"