FoxPro/Visual FoxPro - ¿Como hago un programa multiusuario?

 
Vista:

¿Como hago un programa multiusuario?

Publicado por Damián (21 intervenciones) el 04/01/2006 02:22:25
Hola: tengo un programita que se usa por 3 usuarios, lo que hice fue instalarlo en una PC que hace de servidor y desde las otras dos creo un acceso directo a ese ejecutable.
¿Está bien eso? Creo que debe estar mal. Uno de los problemas que tengo es que el programa crea un archivo excel y lo edita y cuando otro usuario quiere hacer lo mismo desde otro PC da un mensaje de que no se puede tener acceso al archivo.

Me dijeron que lo que debía hacer es colocar la base de datos en el servidor y en las demás PCs instalar el sistema. Pero no sé como hacer referencia desde los formularios a la base de datos que está en el servidor.
Muchas Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:¿Como hago un programa multiusuario?

Publicado por juan (537 intervenciones) el 04/01/2006 13:29:22
Ese programa fué hecho para red ¿si o no ?

si es si ,lo del acceso directo está bién en las términales

ahora para que edites el libro de excel y te lo asuma el programa
hace lo que sigue:
en tú Servidor Principal ubicaté la planila excel que tiene asociado tú
programa ok.
habre la planilla y ubicas la pestaña guardar como ,en la parte
superior hay una opción llamada herramientas ,ahora ubicas la
opción Unidad de Red.
te saldrá algo como esto :Unidad Z:
Carpeta Examinar (Ubicas el nombre de tú pc)
\\Servidor\Recurso_Compartido
Finalizar <--

Ahora haces lo mismo desde las 2 términales y desde ahí ubicas donde está
la planilla excel de tú servidor.
no tienes que copiar nada a las otras pc.

Suerte :
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:¿Como hago un programa multiusuario?

Publicado por damian (21 intervenciones) el 07/01/2006 16:31:19
Hola: no entiendo la solución propuesta. El archivo excel lo crea el programa, no existe si el programa no está en ejecución. El problema era que cuando un usuario creaba el archivo y otro usuario quería hacer la mismo le aparece un mensaje que no se puede tener acceso al archivo. Lo que yo deseo es que el archivo se cree en la máquina del usuario y no en el servidor.
Gracias por contestar.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:¿Como hago un programa multiusuario?

Publicado por Juan (537 intervenciones) el 08/01/2006 18:49:25
Por eso te preguntaba !!
Ese programa es en realidad monousuario o es de red ??
para ver si te envio algo ..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:¿Como hago un programa multiusuario?

Publicado por jonathan (57 intervenciones) el 09/01/2006 15:12:36
Mandame un ejemplo de tu programa y a lo mejor yo puedo resolver tu problema

Tengo Visual Fox 6.0

Existe una posibilidad de crearlo para Red solo hay que hacer unos pasos, pero me gustaria ver el programa para analizar cual es la mejor opcion


Jonathan Piña Leon
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:¿Como hago un programa multiusuario?

Publicado por bekyna (294 intervenciones) el 09/01/2006 19:29:18
mira te envio este codigo lo que hace es tomar los datos de tu tabla (tu se los adignas y abre una hoja de excel sin nobre, en tu maquina tu debes de guardarlo en la uvbicacion que la necesites.
local Fila
wait'Espere Un Momento Exportando Datos' window nowait
_screen.mousepointer=14
TmpSheet=GetObject('','Excel.Sheet')
XLApp=TmpSheet.Application
XLApp.visible=.T.
XLApp.workbooks.add()
XLSheet=XLApp.ActiveSheet
XLSheet.Cells(2,2)="Cédula"
XLSheet.Cells(2,2).font.bold=.T.
XLSheet.Cells(2,2).font.size="12"
XLSheet.Cells(2,2).font.name="Arial"
XLSheet.Cells(2,3)="Nombre"
XLSheet.Cells(2,3).font.bold=.T.
XLSheet.Cells(2,3).font.size="12"
XLSheet.Cells(2,3).font.name="Arial"
XLSheet.Cells(2,4)="Apellido"
XLSheet.Cells(2,4).font.bold=.T.
XLSheet.Cells(2,4).font.size="12"
XLSheet.Cells(2,4).font.name="Arial"
sele 1
Fila=4
scan
XLSheet.Cells(Fila,2)=alltrim(cedula)
XLSheet.Cells(Fila,3)=alltrim(nombre)
XLSheet.Cells(Fila,4)=alltrim(apellido)
Fila=Fila+1
endscan

Si necesitas consejo para modificar tu programa en red, escribeme a tu cuenta y te puedo dar algunos consejos...

saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar