2017-08-04 38 views
0
Try 
    Dim url = "something" 
    Dim request = WebRequest.Create(url) 
    request.Credentials = CredentialCache.DefaultCredentials 
    Dim httpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse) 
    Dim dataStream = httpWebResponse.GetResponseStream() 
    If dataStream Is Nothing Then 
     Return "" 
    End If 
    Dim reader = New StreamReader(dataStream) 
    Return reader.ReadToEnd() 
Catch ex As WebException 
    Return "" 
End Try 

上面的代码工作在本地主机,但在服务器它不工作,并抛出异常。System.Net.WebException”发生在System.dll中,但在用户代码中没有处理

System.Net.WebException”发生在System.dll中,但在用户代码中

+0

的异常被抛出给调用者,从异常 –

+0

检查的消息我得到这个消息“无法连接到远程服务器”从Excepion。 –

+0

我假设你使用代理服务器连接。检查您的代理设置。如果是的话,创建一个WebProxy对象并将其分配给httpwebrequest –

回答

0

你重新抛出异常的Catch后未办理 。 删除Throw

Try 
    Dim url = "something" 
    Dim request = WebRequest.Create(url) 
    request.Credentials = CredentialCache.DefaultCredentials 
    Dim httpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse) 
    Dim dataStream = httpWebResponse.GetResponseStream() 
    If dataStream Is Nothing Then 
     Return "" 
    End If 
    Dim reader = New StreamReader(dataStream) 
    Return reader.ReadToEnd() 
Catch ex As WebException 
    Return "" 
End Try 
+0

谢谢,但那种异常的原因是什么,我可以停止调用catch。 –

+0

我想这是你打电话的网址的连接问题。您的代码没有问题。 – MatSnow

+0

相同的网址在我的系统中工作.. –

相关问题