先用InternetExplorer.Application打开http://xxx.xxx.xxx/xxx.aspx，然后保存oIE.document.body.outerHTML就可以了！！
例如如下代码细节:
VBScript code:
复制代码代码如下:
Set oIE = CreateObject("InternetExplorer.Application")
oIE.Navigate "http://www.changjiangtimes.com/pdf.aspx"
Do
WScript.Sleep 200
Loop Until Not oIE.Busy And oIE.ReadyState = 4
'下面你可以把它写到文件里面去，Adodb.Stream和Scripting.FileSystemObject都可以
WScript.echo "<HTML>" & oIE.Document.body.OuterHTML & _
"</HTML>"
oIE.Quit
Set oIE = Nothing
