Network Security Internet Technology Development Database Servers Mobile Phone Android Software Apple Software Computer Software News IT Information

In addition to Weibo, there is also WeChat

Please pay attention

WeChat public account

Shulou

How to read web pages by VBS

2025-02-24 Update From: SLTechnology News&Howtos shulou NAV: SLTechnology News&Howtos > Development >

Share

Shulou(Shulou.com)06/03 Report--

This article is about how VBS reads web pages. The editor thinks it is very practical, so share it with you as a reference and follow the editor to have a look.

Just save the following code as test.vbs and double-click to run it. If you can't use it, please see if vbs is disabled on your computer.

The code is as follows:

StrURL = InputBox ("Please enter the URL to read", "read the web page", "https://www.jb51.net/index.htm")"

If strURL = "" Then

Wscript.quit

End If

Set ie = WScript.CreateObject ("InternetExplorer.Application")

Ie.visible = True

Ie.navigate strURL

Do

Wscript.Sleep 200

Loop Until ie.ReadyState = 4

StrContent = ie.document.body.innerText

Set objVoice = CreateObject ("SAPI.SpVoice")

Set objVoice.Voice = objVoice.GetVoices ("Name=Microsoft Simplified Chinese") .Item (0)

ObjVoice.Rate = 5 'Speed:-10pm 100

ObjVoice.Volume = 100' Sound: 0100

ObjVoice.Speak strContent

Thank you for reading! This is the end of the article on "how to read the web page on VBS". I hope the above content can be of some help to you, so that you can learn more knowledge. if you think the article is good, you can share it for more people to see!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.

Views: 0

*The comments in the above article only represent the author's personal views and do not represent the views and positions of this website. If you have more insights, please feel free to contribute and share.

Share To

Development

Wechat

© 2024 shulou.com SLNews company. All rights reserved.

12
Report