Visual Basic - dsn

necesito saber como crear una conexion dsn a una base de datos mdb, que se encuentra en un servidor. tank you!

tirá este sub en un modulo y defini la coneccion como global asi:

dim cnbase as adodb.connection

Espero que te sirva

Public Sub conectar()

Set cnBase = New Connection
On Error Resume Next

cnBase.ConnectionString = "DSN=NOMBRE;UID=Admin;PWD=Clave"
cnBase.Open
If (Err.Number <> 0) Then
MsgBox "Error: " + Err.Description
End
End If

End Sub