Я пытаюсь создать веб-страницу в классическом ASP, чтобы проверить статус ряда URL-адресов.
Мой код выглядит следующим образом:
Function TestSite(sURL)
UserAgent = "Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.1)"
Set poster = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0")
poster.open "GET", sURL, false
poster.setRequestHeader "User-Agent",UserAgent
poster.send
If poster.status = 200 Then
TestSite = poster.responseText
Else
' ## ERROR ## '
TestSite = ""
End If
Set poster = Nothing
End Function
Все URL-адреса представляют собой HTTPS с нестандартными номерами портов (например, https://somedomain.com:4433/restofurl а>)
Когда я запускаю URL-адреса в веб-браузере, они загружаются просто отлично, но когда я помещаю их через вышеуказанную функцию, я получаю:
A connection with the server could not be established
Я проверил свою функцию со следующими вариантами: 1) незащищенный URL-адрес — работает нормально 2) безопасный URL-адрес без указания порта — работает нормально 3) защищенный URL-адрес с указанием порта 443 — работает нормально 4) безопасный URL-адрес, указывающий порт 443 на целевом сервере - ЭТО работает нормально
Исходя из этого, я настолько уверен, насколько это возможно, что мой код правильный. Есть ли у кого-нибудь предложения по дальнейшему устранению неполадок?