使用WebClient class它正是你要找的。
Public Class Test
Public Shared Sub Main(args() As String)
Dim sURL as String
If args Is Nothing OrElse args.Length = 0 Then
'Throw New ApplicationException("Specify the URI of the resource to retrieve.")
sURL = http://24.173.220.131/carter/currentinmates.aspx"
Else
sURL = args(0)
End If
Dim client As New WebClient()
' Add a user agent header in case the
' requested URI contains a query.
client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705;)")
Dim data As Stream = client.OpenRead(sURL)
Dim reader As New StreamReader(data)
Dim s As String = reader.ReadToEnd()
Console.WriteLine(s)
'Here write the variable `s` to a Text file, eg My.File.Create(s)
data.Close()
reader.Close()
End Sub 'Main
End Class 'Test
不知道CsQuery ...感謝鏈接:) – harag 2012-08-03 09:14:58
非常感謝查理! – user1572855 2012-08-03 18:00:44
@ user1572855如果解決了您的問題,請考慮接受此答案。 – 2013-03-26 22:23:52