Visual Basic - Acceder a un BD en Red

Hola, kisiera saber como puedo acceder a una Base de datos que se encuentra en una red de area local dentro del servidor, el servidor se llama "Principal" y el cliente desde donde la trataria de abrir se llama "Almacen", me pudieran como puedo aplicar el codigo y que objeto aplico para poder ver la informacion de la base de datos que se encuentra en el servidor.

Que tengan un buen dia y gracias

\' Suponiendo que la base de datos se llamara MiBase
\' y la tabla MiTabla

Dim BaseDatos as Database, TablaBaseDatos as Recordset

En el Form_Load()

Set BaseDatos= OpenDatabase(\"\\\\Principal\\MiBase.mdb\")
Set TablaBaseDatos=BaseDatos.OpenRecordset(_
\"MiTabla\", DbOpenTable)

\' Si la Base se encuentra en una carpete del servidor, por ejemplo, \' MiCarpeta:
Set BaseDatos= OpenDatabase(\"\\\\Principal\\MiCarpeta\\MiBase.mdb\")

Puesto así, da igual desde que cliente lo llames. No necesitas el nombre del cliente para nada. A partir de ahí, puede efectuar las consultas que necesites.

Un Saludo.

Pedro

Perdona pero en el mensaje anterior había errores con las barras

Set BaseDatos= OpenDatabase("\\Principal\MiBase.mdb")
Set TablaBaseDatos=BaseDatos.OpenRecordset(_
"MiTabla", DbOpenTable)

Si la Base se encuentra en una carpete del servidor, por ejemplo, MiCarpeta:
Set BaseDatos= OpenDatabase("\\Principal\MiCarpeta\MiBase.mdb")

Si en el formulario tienes un control Data, por ejemplo Data1:

Data1.DatabaseName = "\Principal\MiBase.mdb"

Así podrás añadir, editar, borrar etc.

Saludos.

Pedro

Otra vez error con las barras (doble barra \\ para indicar que es el
servidor) :

Data1.DatabaseName = "\\Principal\MiBase.mdb"

Disculpa pero es muy tarde y estoy medio dormido.
Pedro.