JuliusC
26 de Junio del 2004

Tengo un problema:
En una base de datos tengo un cojunto de instrucciones. Por ejemplo el id_instrucc es igual a 1 y en el campo condicion tengo almacenado (Edad=17 And Sexo='M') .


Mi código es el siguiente:


Public Edad, Sexo, xcondi
Edad=17
Sexo='M'

dim dat as new ADODB.Recordset
dat.Open "Select * from intrucciones where id_instruc=" & val(text1.text), Adodc1.connectionstrig, , adOpenDynamic, adLockOptimistic
if not dat.Eof
xcondi= dat!condicion 'AQUI TOMA EL VALOR "(Edad=17 And Sexo='M')"
end if
if xcondi then 'AQUI MARCA ERROR 13 ¡¡ NO COINCIDEN LOS TIPOS !!
[hace algo]
else
[Hace otra cosa]
endif

* Entiendo que marca error porque xcondi está tomando el valor de una cadena y no la está evaluando, pero entonces como le puedo hacer ???

**Cuando le asigno directamente dentro del programa: xcondi = ( Edad = 17 And Sexo = "A" )
si funciona, es decir, si evalua la condición pero necesito hacerlo de la otra manera...

ALGUIEN PUEDE AYUDARME??? POR FAVOR!!!

Victor Licea
26 de Junio del 2004

Xcondi toma valor de string y lo quieres evaluar como boolean, separa los campos y evalualos de manera directa.

Estas declarando sexo y edad y le asignas valores, pero nunca los usas, no será que tu validacion deberá ser asi:

dat!.edad=edad and dat!.sexo=sexo