Visual Basic - Bachiller Industrial y Perito en Informática y Com

Necesito ayuda urgente por favor:

Yo creé una aplicación en VB6 pero no puedo trabajarla en red ya que el sistema me pide el path origen que está en la maquina adaptada como servidor y este sistema lo debo instalar el 4/01/2006 para que trabajen 16 computadoras, Que Puedo Hacer?????

Donde tengas las ubicaciones absolutas reemplazalo por App.Path o por "\\Servidor\Recurso", tendrías que aclarar un poco más donde aparecen los errores.

Puedes enviarme un ejemplo o corrigeme este por favor
yo trabajo de esta forma

dim db as database
dim rs as recordset

private sub form1_load()
const spathbase as string = "C:\eschogar\Control de notas\notas1.mdb"
set db = opendatabase(spathbase)
......
....
end sub

Si me Puedes ayudar muchas gracias

El problema esta en:

const spathbase as string = "C:\eschogar\Control de notas\notas1.mdb"

Dado que no es una constante en "C:\" que es local. Debería ser por ejemplo:

const spathbase as string = "\\NombreServidor\C\Control de notas\notas1.mdb"

o:

const spathbase as string = "\\NombreServidor\Recurso\Control de notas\notas1.mdb"