Si le pongo un If por si esta vacio el campo (que no lo esta), me da el error :
Código:
Error de Microsoft VBScript en tiempo de ejecución error '800a01a8'
Se requiere un objeto: '[string: "Husa Castilla Vieja"]'
/hotelAvailability.asp, línea 43
y el codigo modificado es
Código:
dim i,j,vec_hotelId(20),vec_name(20),vec_address1(20),vec_city(20),vec_latitude(20),vec_longitude(20),vec_shortDescription(20)
for i=0 to 20 - 1 step 1
'if xml.getElementsByTagName("Hotel/hotelId")(i).firstChild.data.length >0 then
'vec_hotelId(i)=xml.getElementsByTagName("Hotel/hotelId")(i).firstChild.data
'End If
if xml.getElementsByTagName("Hotel/name")(i).firstChild.data.length >0 then
vec_name(i)=xml.getElementsByTagName("Hotel/name")(i).firstChild.data
End If
if xml.getElementsByTagName("Hotel/address1")(i).firstChild.data.length >0 then
vec_address1(i)=xml.getElementsByTagName("Hotel/address1")(i).firstChild.data
End If
if xml.getElementsByTagName("Hotel/city")(i).firstChild.data.length >0 then
vec_city(i)=xml.getElementsByTagName("Hotel/city")(i).firstChild.data
End If
if xml.getElementsByTagName("Hotel/latitude")(i).firstChild.data.length >0 then
vec_latitude(i)=xml.getElementsByTagName("Hotel/latitude")(i).firstChild.data
End If
if xml.getElementsByTagName("Hotel/longitude")(i).firstChild.data.length >0 then
vec_longitude(i)=xml.getElementsByTagName("Hotel/longitude")(i).firstChild.data
End If
if xml.getElementsByTagName("Hotel/shortDescription")(i).firstChild.data.length >0 then
vec_shortDescription(i)=xml.getElementsByTagName("Hotel/shortDescription")(i).firstChild.data
End If
next
Esto me esta llevando por la calle de la amargura