try Dim req = System.Net.WebRequest.Create("http://www.yijiansoft.net:81/srqcx.htm") 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
加好友 
发短信
Post By：2018/1/21 22:15:00 [显示全部帖子]
