如何發送鼠標了使用VBScript

到的div我有簡單的VBScript，做下一步行動：如何發送鼠標了使用VBScript

打開瀏覽器
填寫輸入（登錄名，密碼等）

有該按鈕（看起來像）在頁面上發送信息。此按鈕的Click事件不起作用，因爲它是GWT按鈕。我想發送到這個按鈕的MouseUp事件。

如何使用VBScript來做到這一點？

Function Main 
Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_") 
IE.Visible = True 
IE.Navigate "http://example.com" 
With IE.Document 
    .getElementByID("login").value = "Login" 
    .getElementByID("password").value = "Password" 
    'It doesn't work 
    .getElementByID("div-button").MouseUp 
End With 
End Function

來源

2012-04-08 Nelia

可能使用fireEvent方法觸發事件。

.getElementByID("div-button").fireEvent "onmouseup"

來源

2012-04-09 00:04:50

不，我不能，也許GWT的工作壞在IE中，也許在IE 9 fireEvent不起作用 – Nelia 2012-04-09 07:20:36

我解決我的問題，通過使用

Function Main 
' ... 
Dim objShell 
Set objShell = CreateObject("WScript.Shell") 
objShell.SendKeys "{TAB}" 
objShell.SendKeys "{TAB}" 
objShell.SendKeys "{ENTER}" 
End Function

來源

2012-04-13 08:38:36 Nelia

如何發送鼠標了使用VBScript

回答

相關問題