我提供一段代码
功能: 保存指定URL的内容到html页
语言:VB.NET
环境:Visual Studio 2005
关键字:ASP.NET 生成 静态页 html
Dim errorMsg As String '声明保存错误信息的变量
Dim URL As String '声明保存网址的变量
URL = "
http://www.cndev.org" '需要保存的网址
errorMsg = ""
Try
Dim wReq As System.Net.WebRequest
Dim wResp As System.Net.WebResponse
wReq = System.Net.WebRequest.Create(URL) '创建请求实例
wResp = wReq.GetResponse() '获取Response
Dim reader As System.IO.StreamReader = New System.IO.StreamReader(wResp.GetResponseStream, System.Text.Encoding.Default) '创建StreamReader实例,并设置源字符编码为默认
Dim writer As System.IO.StreamWriter = New System.IO.StreamWriter("F:\a.htm", False, System.Text.Encoding.GetEncoding("gb2312")) '创建StreamWriter实例 ,并设置目标字符编码为gb2312
'Response.Write(reader.ReadToEnd)
writer.Write(reader.ReadToEnd) '写入文件
writer.Flush() ' 将缓存内容写入文件
writer.Dispose() '释放实例
reader.Dispose() '释放实例
Catch ex As Exception
errorMsg = ex.Message
End Try