Detectar que falta archivo DBT o FPT ?

Detectar que falta archivo DBT o FPT ?

Postby GUSPRE » Fri Oct 17, 2008 8:06 pm

Estimados Amigos del Foro, quisiera saber como hacer para cuando estoy en proceso de apertura de una DBF detectar que la misma contiene campos memos, de tal manera de que si falta el archivo DBT o FPT no salga del sistema

Codigo que uso:

USE TABLA NEW SHARED
IF NETERROR()
MSGINFO("EN USO POR OTRO") // DETECTAR AQUI QUE EL ERROR DEVUELTO ES PORQUE FALTA EL ARCHIVO DBT O FPT ASOCIADO
ENDIF

Gracias de Atemano..
Saludos,
GUSTAVO PREDIGER
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby carlos vargas » Fri Oct 17, 2008 8:50 pm

LOCAL oErr

TRY
USE TABLA NEW SHARED

CATCH oErr
/*aca dar tratamiento al error*/
?oErr:description, oErr:error

END

salu2
carlos vargas
Salu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
User avatar
carlos vargas
 
Posts: 1686
Joined: Tue Oct 11, 2005 5:01 pm
Location: Nicaragua

Postby GUSPRE » Fri Oct 17, 2008 10:05 pm

Estimado Carlos,
MUCHAS GRACIAS ASI LO HARE. :D
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby joseluisysturiz » Sat Oct 18, 2008 3:42 am

Tengo esta rutinita,
FUNCTION verifica() // VERIFICA SI EXISTE ALGUN TIPO DE ARCHIVO

IF !FILE(".CDX") // cambiar aca por cual quier extension...("*.DBT"), etc
.
.
.
.
.

RETURN NIL // VERIFICA SI EXISTE ALGUN TIPO DE ARCHIVO
Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 74 guests