如題,用vbs實作,獲得提示資訊“bbb”
用vba實作也可以
頁面代碼
<html>
<head>
<title>simple</title>
</head>
<body>
aaa
<script language="javascript" type="text/javascript">
alert("bbb");
</script>
</body>
</html>
uj5u.com熱心網友回復:
用VBS的,基本就別想了……除非你專門弄個AcitveX DLL 給VBS代碼創建物件,并呼叫獲取訊息內容的介面。

對于不同的瀏覽器,這種alert( )的訊息,它的“表現行為”不一樣,
有些是用“視窗”的,有一些直接嵌網頁內的“提示條”(比如Opera好像就是這樣,在body上方)。
就算是用“視窗”彈出顯示,其它的非IE內核的瀏覽器,恐怕也不好識別是否為“訊息提示”。
如果僅限IE(不過,現在很少人喜歡用IE了吧)及IE內核的瀏覽器,
可以按“視窗類名”識別一下是否為訊息(可能的情況下再加上“標題內容”)。
就算如此:需要進行全域的訊息HOOK,要用到 SetWindowsHookEx( ) 這個API 。
HOOK所有的視窗創建訊息,識別到是“訊息”就取其訊息文本就行了。

uj5u.com熱心網友回復:
HOOK不會用
想用sell獲得視窗物件,但貌似這樣只能獲取到主視窗的物件,有什么方法得到alert視窗物件然后取得訊息框呢。
Set shell = CreateObject("Shell.Application")
For i = 0 To shell.Windows.Count - 1
Set window = shell.Windows(i)
title = Empty
On Error Resume Next
title = window.document.title
On Error Goto 0
If title <> Empty Then
If InStr("simple", title) = 1 Then
'主視窗的物件
msgbox(window)
Exit For
End If
End If
Next
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/40379.html
標籤:VBA
上一篇:WORD VBA在Word的表格中插入圖片,圖片移位問題
下一篇:獲取TreeView內容的問題
