RUTINA ON ERROR

01/12/2003 - 19:17 por Gustavo Molina | Informe spam
hola a todos. necesito una ayuda.

en mi aplicacion tengo una rutina on error, pero cuando sucede un error
como por ejemplo que no encuentra un tabla al intentar abrirla primero FOX
me muestra un error que no encuentra la base de datos en cuadro de dialogo
y luego mi rutina de error. como hago para que no me aparezca el primer
mensaje, le puse set notify off pero sigue igual.

muchas de antemano
Gustavo Molina.
Tucuman Argentina




-
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa

Preguntas similare

Leer las respuestas

#1 Carlos Rojas
25/12/2003 - 21:01 | Informe spam
intenta esto primero pregunta tu si existe esta tabla
if file("mitabla.dbf")
use mitabla
else
messagebox("No se ha encontrado la tabla")
endif

espero te sirva.
Carlos Rojas

"Gustavo Molina" escribió en el mensaje
news:#
hola a todos. necesito una ayuda.

en mi aplicacion tengo una rutina on error, pero cuando sucede un error
como por ejemplo que no encuentra un tabla al intentar abrirla primero FOX
me muestra un error que no encuentra la base de datos en cuadro de dialogo
y luego mi rutina de error. como hago para que no me aparezca el primer
mensaje, le puse set notify off pero sigue igual.

muchas de antemano
Gustavo Molina.
Tucuman Argentina





PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
Respuesta Responder a este mensaje
#2 Alex Feldstein
25/12/2003 - 22:35 | Informe spam
On Thu, 25 Dec 2003 15:01:01 -0500, "Carlos Rojas"
wrote:

intenta esto primero pregunta tu si existe esta tabla
if file("mitabla.dbf")
use mitabla
else
messagebox("No se ha encontrado la tabla")
endif

espero te sirva.
Carlos Rojas



Agrégale la ruta, ya que File() no usa Path.

if file("c:\datos\mitabla.dbf")
if not used("mitabla")
use mitabla in 0
endif
select mitabla
else
messagebox("No se ha encontrado la tabla")
return .f.
endif


Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(Address scrambled with ROT-13)
How To make good Newsgroups posts
http://dts-l.org/goodpost.htm
RFC 1855: Netiquette Guidelines
http://www.dtcc.edu/cs/rfc1855.html
How To Ask Questions The Smart Way
http://www.catb.org/~esr/faqs/smart-questions.html
Cómo hacer preguntas de manera inteligente:
http://www.sindominio.net/ayuda/pre...entes.html
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida