关于vbs 生成静态页面过程中出现的问题
时间：2021-03-08 11:36:37|栏目：VBS|点击： 次
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
