Problemas en red domestica

[jmua]

Hola foro.
Tengo una pequeña red domestica con varios PC's compartidos
Mi problema es el siguiente:
En un PC tengo la aplicacion que funciona perfectamente.
Al entrar en la aplicacion lo primero que hago es comprobar si existen los directorios
IN y OUT
Hago lo siguiente:

Meto en una variable el directorio actual

Local OldDir := Curdir()
If !lIsdir('IN')
lMkDir('IN')
Endif
If !lIsdir('OUT')
lMkDir('OUT')
Endif

//Si Compruebo donde estoy desde otro PC me dice: \JMUA-01 me dice: \programas(E)\Turiguiprograma\IN\OUT. Incorrecto

//Si Compruebo donde estoy desde el PC que tiene la aplicacion me dice: TURIGUIPROGRAMA. Esto es correcto

Cambio al anterior directorio
DirChange(OldDir)

//Luego voy a abrir las tablas que estan en otro directorio llamado TABLAS
Dbusearea(.t.,,'tablas\Clientes','Cli',.f.)
If !Neterr()
? "Tablas abiertas...."
Else
? "Error...."
Endif

Si ejecuto la aplicacion desde otro PC me da el error OPEN ERROR DOS 3 o sea que los ficheros no existen
Si elimino la comprobacion y creacion de los directorios IN y OUT funciona bien


Alguien puede decirme el porque de esto

Gracias de antemano

[Patricio Avalos Aguirre]

jmau

primero antes debes de compartir los datos del servidor de archivo

de cualquier computador abres asi los datos

Code: Select all

sele 0
use \\servidor\carpeta\datos index \\servidor\carpeta\indice NEW

Y ASI SUCESIVAMENTE

espero que te sirva..

[sysctrl2]

JMAU
no necesitas mover nada a tu aplicacion ..

Asi como lo realizas es correcto,

para hechar andar el sistema desde otra pcs,

comparte la unidad C del servidor

Y en las demas pcs. creas una unidad logica K:

y despues creas un acceso directo que

llame a tu aplicacion K:\miapp\app.exe

salu2.

[jmua]

Gracias a ambos, les dire que en mi caso no hay ningun servidor, simplemente son PC's compartidos y la aplicacion esta en uno cualquiera
Asi que probare con las dos respuestas a ver que resulta.
Muchas gracias

José Martin Uriarte