亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

溫馨提示×

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

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

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

城口县| 南江县| 华坪县| 迁安市| 庄河市| 关岭| 许昌县| 平山县| 长武县| 沂南县| 文化| 连江县| 曲靖市| 武川县| 来凤县| 五指山市| 广汉市| 油尖旺区| 连云港市| 法库县| 安吉县| 隆回县| 仙桃市| 通城县| 枣庄市| 讷河市| 苏尼特左旗| 洪泽县| 宁晋县| 宜宾县| 安义县| 桃园市| 黄梅县| 泊头市| 浦县| 普陀区| 嘉黎县| 凤阳县| 海晏县| 辽中县| 绍兴市|