'(500) internal server error' as webexception

[PeterK]

I get "(500) Internal server error" on line 1 only with
http://www.futuresource.com as URL (below).
What could ne the reason and how to overcome it?
TIA

Dim returnValue As Stream
Dim HttpWRqst As HttpWebRequest
Dim HttpWResp As HttpWebResponse
HttpWRqst = CType(WebRequest.Create("http://www.futuresource.com"),
HttpWebRequest)
HttpWRqst.MaximumAutomaticRedirections = 24
HttpWRqst.MaximumResponseHeadersLength = 24
Try
HttpWResp = CType(HttpWRqst.GetResponse(), HttpWebResponse)
'line 1
returnValue = HttpWResp.GetResponseStream()
Catch webex As WebException
MsgBox(webex.Message, MsgBoxStyle.Critical, "WebRequest: " &
urlMarket)
End Try