FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour redefinir metodo Execute... como?
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

redefinir metodo Execute... como?

Posted: Fri Mar 06, 2009 11:44 AM
hola.
Necesito aniadir al methodo Execute que se utiliza en este código un comando mas, simplemente para que me detenga la ejecucion para poder mostrar un cartel de control interno mio.
Cómo lo hago?

Code (fw): Select all Collapse
 cCmdSql:= "USE " + AllTrim(oApp:cDataBase)
 TRY
    // a este metodo que sigue "execute"
     oApp:oCon:Execute(cCmdSql)
  CATCH oError
       MsgStop("Base de datos no disponible", oApp:cAplicacion)
       RETURN (.F.)
   END


en si no se como REDEFINIR el metodo Execute para poder agregarle comandos...
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Carlos Mora
Posts: 989
Joined: Thu Nov 24, 2005 03:01 PM

Re: redefinir metodo Execute... como?

Posted: Fri Mar 06, 2009 12:42 PM

Para que lo detenga en que momento?
Explicame un poco más porque no he podido entender bien que querés hacer, creo que tengo una pista.

Saludos
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
“If you think education is expensive, try ignorance"
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

Re: redefinir metodo Execute... como?

Posted: Fri Mar 06, 2009 08:49 PM
Gracias Carlos,
Code (fw): Select all Collapse
     cCmdSql:= "USE " + AllTrim(oApp:cDataBase)
     TRY
        // a este metodo que sigue "execute"
         oApp:oCon:Execute(cCmdSql)
      CATCH oError
           MsgStop("Base de datos no disponible", oApp:cAplicacion)
           RETURN (.F.)
       END


La idea es que cuando se ejecute el metodo EXECUTE me aparezca en pantalla la cadena que pase en cCmdSql, por ahora es simple pero estoy pensando hacer otros controles dentro de ese metodo Execute. Esto me facilitaria la prueba de los programas ya que en vez de hacer esto:
Code (fw): Select all Collapse
oApp:oCon:Execute(cCmdSql)
msgbox(cCmdSql)


Directamente haria
Code (fw): Select all Collapse
oApp:oCon:Execute(cCmdSql)

y el metodo solo me mostraria la cadena.


Espero haber sido claro.
Gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Carlos Mora
Posts: 989
Joined: Thu Nov 24, 2005 03:01 PM

Re: redefinir metodo Execute... como?

Posted: Tue Mar 10, 2009 02:55 PM

Hola Goos,

en lugar de msginfo podés usar dbwin32.exe, buscalo en el foro. Tambien posteé unos comandos para facilitar la tarea, evitar los msgInfo y cosas por el estilo

viewtopic.php?f=6t=12952

No merece la pena redefinir un método para algo tan trivial, y en particular si se trata de un ActiveX, esta medio complicado.

Un saludo

PD: Te he visto preguntando en foros que no son de FW ;) ¡Internet es un pañuelo!

&

Saludos
Carlos Mora
http://harbouradvisor.blogspot.com/
StackOverflow http://stackoverflow.com/users/549761/carlos-mora
“If you think education is expensive, try ignorance"
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

Re: redefinir metodo Execute... como?

Posted: Tue Mar 10, 2009 10:39 PM

gracias,
ytilizo de por si un debug en mis programas del estilo que mostras ahi. pero lo que necesito es saber donde esta
ese método para poder modificarlo y que ese msginfo o al utlizar el debug lo pueda incluir en ese metodo para
no tener que ponerlo cada vez ...

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Lautaro
Posts: 337
Joined: Fri Oct 07, 2005 02:44 PM

Re: redefinir metodo Execute... como?

Posted: Wed Mar 11, 2009 12:56 AM

Una consulta,

oApp:oCon <-- ¿ Que clase de objeto es ?, si es una coneccion ado, el metodo execute es parte del objeto ado y el harbour solo invoca el metodo, pero no contiene codigo para el.

Si es un odbc ahi deberias poder modificarlo en la clase todbc ya que ese es un metodo que invoca a la fucion sqlexecute, si mi memoria no me falla.

Atte.,

Lautaro Moreira

Hola,

Soy un Contador que por necesidad aprendio a programar y se quedo programando.
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

Re: redefinir metodo Execute... como?

Posted: Wed Mar 11, 2009 10:39 PM

Si es ADO. Gracias por la aclaración.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion

Static archive · New replies & topics via GitHub Discussions