首页 > 解决方案 > 如何将 IE 中的 ID 值保存到 VBScript 中的变量中?

问题描述

我想编写一个程序,在消息框中输出来自网站“https://10minutemail.net/”的电子邮件。不幸的是,我找不到任何允许我将 ID 存储在变量中的代码。

我已经尝试过了,但没有任何结果:

Dim email
email = ""
set webbrowser = createobject("internetexplorer.application")
webbrowser.statusbar = false
webbrowser.menubar = false
webbrowser.toolbar = false
webbrowser.visible = false
webbrowser.navigate("10minutemail.net") 
email = webbrowser.document.all.item("fe_text")

wscript.echo(email)

代码运行时出现错误:[未知错误][1]。[1]:https://i.stack.imgur.com/m1yHF.png

如何解决?

标签: emailvariablesinternet-explorervbscriptinternet-explorer-11

解决方案


Vbscript 使用此方法使用 HTML DOMgetElementById来获取 HTML 代码源页面中的特定元素

因此,在您的情况下,您可以尝试使用以下代码:

Option Explicit
Dim IE,Email_Value
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.navigate "https://10minutemail.net/"
Do While (IE.Busy)
    WScript.Sleep 100
Loop 

Email_Value = IE.document.getElementByID("fe_text").Value
wscript.echo(Email_Value)
IE.Quit()

推荐阅读