HTA - 如何通過點擊按鈕觸發查找對話框？

我想知道如何使用提交按鈕從打開的HTA窗口中觸發查找對話框？

如果我手動輸入Ctrl F，這會觸發該框，所以我希望它可以通過按鈕實現。HTA - 如何通過點擊按鈕觸發查找對話框？

以下是我嘗試過使用的vbscript代碼，類似於我以前使用的excel VBA子代碼，但它不起作用。

Sub SubSearch 

Set IE = CreateObject("InternetExplorer.Application") 
IE.Dialogs(IEDialogFind).Show 

End Sub

我也試過使用sendkeys "^F"，這也不起作用。

如果有一種將盒子嵌入到HTA會話中的方法，這也可以，但否則，只需觸發對話框！

來源

2015-07-03 Barkered

是你能得到這個用我的回答如下工作？ – Bond

你好......本週我正在度假，但會盡快回復你！ :) – Barkered

SendKeys應該工作。下面是一個使用SendKeys顯示Find對話框一個簡單的HTA：

<html> 
<head> 
    <title>HTA Test</title> 
    <HTA:APPLICATION> 
</head> 

<body> 
<button onclick="ShowFind()">Click me</button> 
</body> 

<script language="VBScript"> 
    Sub ShowFind() 
     CreateObject("WScript.Shell").SendKeys "^f" 
    End Sub 
</script> 
</html>

來源

2015-07-03 15:48:22 Bond

你好，我正在運行一個外部的VBscript，並從HTA調用它（不知道爲什麼我這樣做，現在我正在考慮它！） - 你的方法做了詭計，我猜它只是沒有不喜歡從HTA應用程序外部控制它...感謝您的幫助！ – Barkered

HTA - 如何通過點擊按鈕觸發查找對話框？

回答

相關問題