Ayuda Urgente

Tengo la siguiente instrucción SQL
SQL = "TRANSFORM Count(Identificacion.Peligroso) AS CuentaDePeligroso

Identificacion.Localidad FROM Identificacion WHERE
(((Identificacion.Fecha_alta) Between #"&sFecha0&"# And #"&sFecha1&"#))
GROUP BY Identificacion.Localidad PIVOT Identificacion.Peligroso "
Se trata de una consulta de referencias cruzadas en donde las filas
aparecen localidades y en las columnas las palabras SI y NO
La consulta funciona perfectamente cuando encuentra datos en ambas

con las siguientes instrucciones:

<%=(Rs.Fields.Item("NO").Value)%>
<%=(Rs.Fields.Item("SI").Value)%>
El problema lo tengo cuando alguna de las columnas esta vacia y no

ningun dato o no existen resultados
He probado con el siguiente código pero me da error
<%
If IsNull(Rs.Fields.Item("SI").Value) Then
Response.Write("0")
else
=(Rs.Fields.Item("SI").Value)
end if
%>
Como puedo resolver este fallo?
Muchas gracias de antemano

A ver si lo entendí...

Si hay datos, los datos devueltos son SI y/o NO.
Pero si falta alguno o ambos, no son devueltos, por lo tanto no existen esas
columnas en el recordset.
Tendrías que ver primero si la columna existe.
Una forma es con RS.Fields.Count. Si las dos estan eso devuelve 2.
En caso contrario, verificas cual de las dos falta con:
if RS.Fields.Count=1 then
if RS.Fields(0).name = "SI" then
existe el SI
end if
if RS.Fields(0).name = "NO" then
existe el NO
end if
end if

if RS.Fields.Count=0 then
NO HAY NINGUNA
end if

Salu2
MV

"ZMGestion" wrote in message
news:d0svbk$k6l$
> Tengo la siguiente instrucción SQL
> SQL = "TRANSFORM Count(Identificacion.Peligroso) AS CuentaDePeligroso
SELECT
> Identificacion.Localidad FROM Identificacion WHERE
> (((Identificacion.Fecha_alta) Between #"&sFecha0&"# And #"&sFecha1&"#))
> GROUP BY Identificacion.Localidad PIVOT Identificacion.Peligroso "
> Se trata de una consulta de referencias cruzadas en donde las filas
> aparecen localidades y en las columnas las palabras SI y NO
> La consulta funciona perfectamente cuando encuentra datos en ambas
columnas
> con las siguientes instrucciones:
>
> <%=(Rs.Fields.Item("NO").Value)%>
> <%=(Rs.Fields.Item("SI").Value)%>
> El problema lo tengo cuando alguna de las columnas esta vacia y no
devuelve
> ningun dato o no existen resultados
> He probado con el siguiente código pero me da error
> <%
> If IsNull(Rs.Fields.Item("SI").Value) Then
> Response.Write("0")
> else
> =(Rs.Fields.Item("SI").Value)
> end if
> %>
> Como puedo resolver este fallo?
> Muchas gracias de antemano
>
>
>