主题：服务器返回错误

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=122848&skin=0

 

 单号有揽收的是可以返回数据,没有揽收的就返回报务器555错误,我问了阿里这个错误没有扣费,让我注释掉非200的错误,怎么获取返回错误代码

用这种方式

 

try
    Dim url As String = "http://ali-deliver.showapi.com/showapi_expInfo?com=yuantong&nu=80085155255564664"
    Dim rqst As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(url)
    rqst.Method = "GET"
    rqst.Headers.Add("Authorization","APPCODE " & "278b315cabac4df9a39478de0a8321ad")
    Dim rsps As System.Net.HttpWebResponse = rqst.GetResponse
    Dim stm As System.IO.Stream = rsps.GetResponseStream()
    Dim reader As New System.IO.StreamReader(stm,encoding.utf8)
    Dim str As String = reader.ReadToEnd
    stm.Dispose()
    msgbox(str)
catch ex As exception
    msgbox("出错")
End try

 

不慢吧？和之前的代码相比，差不多的。可能慢1、2秒。