VB.NET質問ｽﾚ (Part8) - 暇つぶし2ch

VB.NET質問ｽﾚ (Part8) at TECH

461:最凶VB厨房
05/01/09 10:25:39
>>442
HttpWebRequestクラス

Imports System
Imports System.IO
Imports System.Net

Public Class UAHttpAccess
Shared Sub Main(ByVal args As String())
Dim hr As HttpWebRequest = WebRequest.Create("URLﾘﾝｸ(127.0.0.1:10000)")
hr.UserAgent = "SaikyoVBChubo"
Dim wres As WebResponse = hr.GetResponse()
Dim st As Stream = wres.GetResponseStream()
Dim sr As StreamReader = New StreamReader(st)
Dim s As String = sr.ReadToEnd()
Console.WriteLine(s)
End Sub
End Class

次ページ

続きを表示

1を表示