Consulta SQL

On Sun, 24 Oct 2004 06:42:03 -0500, "HardSoft SA"
wrote:

Hola:

Como puedo saber si esta consulta arroje verdadero o falso osea si lo
encuentra o no
sqlexec(Nmysql,"Select * from Usuarios where usuario=?wusers","Users")

si no lo encuentra mandarle un messagebox de que no existe y que intente de
nuevo

Wilbert

Revisa el valor devuelto por la función SQLEXEC() -1 si te da error
Revisa la cantidad de registros que llegan al cursor "Users" cn la
función RECCOUNT(). Si es cero, no ha encontrado nada.

nRes=sqlexec(Nmysql,"Select * from Usuarios where
usuario=?wusers","Users")
if nRes < 0
* error
* return .f.
endif

if reccount() = 0
* no hay regitros que cumplan la condición
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 munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net

Hola Wilbert

Una forma de saber si hay datos: es saber si se creó el cursor de salida
"Users"


Cerrar el cursor de salida

if used("Users")
use
endif

SQLEXEC

if !used("Users")
messagebox "tu mensaje"
endif

Suerte...

José Guillermo
DCE1 VFP
Rep. Dominicana

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

PortalFox - NNTP Forum Gatewa

Gracias, si lo estaba haciendo con el Reccount() pense q lo estaba haciendo
mal

De todas maneras Gracias

Esto del Lenguaje SQL es un cambio radical, estoy de apocos pero firme.


"Alex Feldstein" escribió en el mensaje
news:

On Sun, 24 Oct 2004 06:42:03 -0500, "HardSoft SA"
wrote:

>Hola:
>
>Como puedo saber si esta consulta arroje verdadero o falso osea si lo
>encuentra o no
>sqlexec(Nmysql,"Select * from Usuarios where usuario=?wusers","Users")
>
>si no lo encuentra mandarle un messagebox de que no existe y que intente

de

>nuevo

Wilbert

Revisa el valor devuelto por la función SQLEXEC() -1 si te da error
Revisa la cantidad de registros que llegan al cursor "Users" cn la
función RECCOUNT(). Si es cero, no ha encontrado nada.

nRes=sqlexec(Nmysql,"Select * from Usuarios where
usuario=?wusers","Users")
if nRes < 0
* error
* return .f.
endif

if reccount() = 0
* no hay regitros que cumplan la condición
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 munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net