阅读维基百科的文字

Question

我正在尝试编写一个脚本来从维基百科页面获取文本并将其读给我。

到目前为止这是有效的：

dim box1
box1 = inputbox("Enter Your Search Term")
URL ="https://en.wikipedia.org/wiki/" & box1
Set ie = CreateObject("InternetExplorer.Application") 
ie.Navigate(URL) 
wscript.sleep 5000
Data = ie.document.getElementById("content").innerText
set sapi = CreateObject("sapi.spvoice")
sapi.Speak Data

但是如何让它从页面中跳过一些东西呢？就像在他读给我的时候跳过某些单词或页面的一部分一样。

Answer 1

本声明：

Data = ie

不起作用，因为ie是一个对象，如果不使用Set关键字，则无法将其分配给变量。更不用说它首先不会为您提供所需的信息。

您需要从<div>标记中提取ID为“content”的内部文本：

Data = ie.document.getElementById("content").innerText