vbs是否能够实现如下的:访问某个aspx页面,然后把服务器返回的页面以filestream 的形式保存为html格式,如果可以实现,应该如何来用代码来实现呢?
先用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
先用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