problemas con una fuction

[virla]

hola amigos, tengo un problemita con una fuction
La cosa es asi.
En la fuction debo mandarle dos campos de la db para hacer una busqueda mas rapida.
Ejemplo
Mifuncion(fecha,zona)
Bueno hasta ahí todo bien
Pero necesito que esta fuction me debuelva el resultado de el campo encontrado

Dento de la function tengo algo asi
MiId=res(Id)
MiTit=res(tit)
MiNom=res(nom)
Etc.
Alguien sabe como deberia hacer?

[Shiryu_Libra]

podrias enviarle la conexion, asi seria un execute aparte

function campoadicional(camp1,camp2,cxn)
SQL="select campo from tabla where campo1="& camp1 &" and campo2="&camp2
set rsx=cxn.execute(SQL)
if Err=0 then
if rsx.eof=false then
respuesta=rsx.fields.item("campo").value
else
respuesta="NODATA"
end if
else
respuesta="ERROR"
end if
campoadicional=respuesta
rsx.close
end function

evaluas antes de usar la respuesta

if (campoadicional<>"NODATA" and campoadicional<>"ERROR") then
continuas con tu codigo
else
realizas algun codigo externo
end if

[virla]

ok entiendo, ahora yo guardo varios valores en (utilizando el mismo ejemplo que el tuyo) respuesta=rsx.(id),rsx(nom),rsx(titu)
como puedo hacer para poder despues separar cada una de los campos?

[Adler]

Hola

id = rsx.fields("id")
nom = rsx.fields("nom")
titu = rsx.fields("titu")

respuesta= id & "," & nom & "," & titu

Después haces un Split

division = Split(respuesta, ",")

for i = 0 to UBound(division)
campo(i) = division(i)
next

Suerte

[virla]

muchas gracias lo voy a probar y despues les cuento