程序名：ICSharpCode.SharpZipLib.dll 在网络搜索下，很多地方下载。

Dim HttRequest As HttpWebRequest = Nothing
Dim HttpResponse As HttpWebResponse = Nothing
Dim strRes As String = ""
Dim ms As GZipInputStream
Dim sr As IO.StreamReader

'创建请求，省略。。。

HttpResponse = HttRequest.GetResponse
ms = New GZipInputStream(HttpResponse.GetResponseStream)
sr = New IO.StreamReader(ms, System.Text.Encoding.GetEncoding("big5"))
strRes = sr.ReadToEnd

发表于 @ 2006年04月14日 22:14:00|评论(loading...)