Evaluar una consulta...

Hola amigos, al igual que todos los demás estoy iniciandome en gambas2 y estoy haciendo una apliación para guardar, actualizar y borrar registros de mysql ahora bien; mi duda es:

Como hago para evaluar una consulta?
Especificamente como sé si en datos (variable de tipo Result) tengo algo?

Este es el código:
consulta = "SELECT * FROM datos WHERE usuario='" & TextBox1.Text & "' AND pass='" & TextBox2.Text & "' AND area='" & ComboBox1.text & "'"
datos = con.EXEC(consulta)

De antemano gracias...
saludos

Hola:

Yo tambien soy muy novato en Gambas pero por lo que he leido por ahí creo que tienes que mirarte las propiedades:

datos.available (puedes montarte un bucle con todos los resultados usando también datos.movenext)
datos.count
datos.fields
datos.length
...

en gambas pones, tras el dim datos as result, datos. y aparecerán todas las posibilidades.... luego te toca probar.

Salud!!

hola, para saber si un objeto result tiene algun registro, puedes

a) consultar si es avaiable, si no lo es es que no ha tenido efecto la consulta

b) mirar si result.count = 0 si veras que ningun registro cumple con la condición.

no obstante, revisa las comillas de la consulta, creo que estan mal y busca informacion para la sustitucion de
parametros, es mas facil decir ("WHERE campo = &1 ORDER BY &1", txtbox1.text, txtbox2.text)

Espero haber sido de ayuda.

amigo, con un simple if puedes verificar si traes algo de el sql que indiques, ejemplo

resultado=(SQL)
if resultado.avaliable=true then
************ **************** '*aquí indicaras lo que vas a realizar si traes algun valor de la consulta
else
messaje.error("No se encontró valor alguno") '******aqui enviará un mensaje de error cuando no encuentre nada en la base de datos
end if

'****** o si quieres mostrar lo que trajo la consulta sql en la variable resultado solo inserta resultado en un textbox de la siguiente manera
textbox1.text=resultado

espero y te sirva
la sintaxis es esplicativa debes organizarla deacuerdo a tu necesidad...

podes hacer asi tambien

dim temp as variant

resultado=(SQL)

temp =resultado.count

if resultado.count = 0 then

message.error("No se encontró valor alguno")

else
messaGe.info("conteo dio ' & temp & '")

end if