换一种方式
try
Dim req = System.Net.WebRequest.Create("http://foxupdate.mbldt.com/MHClientUpdate/update123.txt")
Dim pos = req.GetResponse
Dim stm As System.IO.Stream = pos.GetResponseStream()
Dim reader As New System.IO.StreamReader(stm)
Dim str As String = reader.ReadToEnd
pos.Close
stm.Close
reader.close
msgbox(str)
catch ex As exception
msgbox("出错")
msgbox(ex.message)
End try