Je vous crée un alias ODBC par programme, pour cela j'utilise la méthode RegisterDatabase de DBEngine.
Je vous connaîtrai comment entré le LastUser et le mot de passe de la connexion dans les attributes, parce que par défaut le LastUser prend la valeur de la session ouverte sur l'ordinateur.
syntaxe :
strAttributes = "Database=" & Nombd.Text & _
vbCr & "Description=" & description.Text & _
vbCr & "OemToAnsi=No" & _
vbCr & "Server=" & Server.Text