Reindexar tablas vfp en sistema multiusuario
Soy nuevo en esto. Estoy desarrollando un sistema me a salido todo bien, el problema que tengo es que al crea un form para reindex tablas no he encontrado la forma de detectar si otro pc tiene la tablas abiertas para generar este proceso, ya que al estar las tablas abiertas me da el error de archivo en uso he controlado el error, pero la idea es anticiparse a este, en resumen quisiera saber como puedo saber si las tablas están abierta en otro pc
1 respuesta
Respuesta de bjmar
1
Puedes utilizar la función USED() de esta manera
IF .not. USED("Tabla")
* Abrir tabla en modo exclusivo
Use tabla exclusive
* empacar
pack
* reindexar
reindex
else
MessageBox("La tabla esta abierta no se puede reindexar")
Endif
IF .not. USED("Tabla")
* Abrir tabla en modo exclusivo
Use tabla exclusive
* empacar
pack
* reindexar
reindex
else
MessageBox("La tabla esta abierta no se puede reindexar")
Endif
