中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VBS如何讀網頁

發布時間:2021-10-08 14:01:38 來源:億速云 閱讀:110 作者:小新 欄目:開發技術

這篇文章給大家分享的是有關VBS如何讀網頁的內容。小編覺得挺實用的,因此分享給大家做個參考,一起跟隨小編過來看看吧。

直接將下面的代碼保存為test.vbs雙擊運行就可,如果不能使用,請看自己的電腦是否vbs被禁用。

代碼如下:


strURL = InputBox("請輸入要讀的網址", "朗讀網頁", "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 '速度:-10,10 0
objVoice.Volume = 100 '聲音:0,100 100
objVoice.Speak strContent

感謝各位的閱讀!關于“VBS如何讀網頁”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,讓大家可以學到更多知識,如果覺得文章不錯,可以把它分享出去讓更多的人看到吧!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

vbs
AI

札达县| 隆昌县| 安溪县| 湖南省| 萨迦县| 东兴市| 南召县| 抚松县| 青龙| 蒙自县| 印江| 衡阳市| 且末县| 项城市| 迁西县| 定安县| 阜宁县| 惠水县| 松桃| 平泉县| 松原市| 宝丰县| 栾川县| 苍溪县| 灵山县| 徐闻县| 广昌县| 宿松县| 临漳县| 盐山县| 保定市| 昌都县| 兴义市| 北海市| 宝应县| 乌鲁木齐市| 和政县| 宣威市| 辽宁省| 沐川县| 肥东县|