Veri çekme

Bir sitem için başka bir siteden MSXML ile veri çekiyorum. (rss'den veri çekmek gibi). Diğer sitede server sorunu oluştuğunda veriyi çekemediğim için asıl sitede de sorun oluyor ve açılmıyor. Bunu nasıl kontrol edebilirim. Yani eğer diğer siteye ulaşamazsa veri çekme işlemini sonlandırsın.

<%
CEKILECEK=" rss adresin "


Set rssOku = Server.CreateObject("MSXML2.FreeThreadedDOMDocumen t")
rssOku.async = False

rssOku.setProperty "ServerHTTPRequest", True
rssOku.Load CEKILECEK

If rssOku.parseError.errorCode <> 0 Then
Response.Write "<b>Hata:</b> " & rssOku.parseError.reason &"<br>"
Response.Write "<b>Satır:</b> " & rssOku.parseError.line &"<br>"
Response.Write "<b>Açıklama:</b> " & rssOku.parseError.srcText
End If

Set ObjeListesi = rssOku.getElementsByTagName("item")
Set rssOku = Nothing


For Each Obje In ObjeListesi
response.write Obje.childNodes(0).Text
Next

Set ObjeListesi = Nothing

%>