jyswjjgdwtdtj 当前离线
中尉
set ie = CreateObject("internetexplorer.application") ie.navigate "https://xxxx.xxxx/xxxx" Set d=ie.Document'报错,未指定的错误复制代码
czjt1234 当前离线
少校
TOP
Set oIE = CreateObject("InternetExplorer.Application") oIE.Navigate "https://www.baidu.com/" 'oIE.Visible = False Do WScript.Sleep 200 Loop While oIE.Busy Or oIE.ReadyState <> 4 Set d = oIE.Document MsgBox TypeName(d)复制代码