Close an HTA when the user presses the 'Esc' key

Question

Close an HTA when the user presses the 'Esc' key

5.7k views Asked by David Gard At 23 June 2015 at 14:11

I'm trying to capture key presses so that I can close my HTA when the user presses the Esc key.

I have confirmed that the onKeyUp event works (I also capture the length of an input), and also that the example below is not working (by adding a MsgBox which is not fired).

What am I missing here?

Sub window_onKeyUp()

    If window.event.keyCode = 27 Then
        Call CloseHTA()
    End If

End Sub

Original Q&A

There are 2 answers

Hackoo On 23 June 2015 at 14:36

You can try like this :

<html>
<script language="VBScript">
    Sub TestKey()
        intKeyCode = Window.Event.Keycode
        If intKeyCode = 27 Then Call CloseHTA()
    End Sub
    Sub CloseHTA()
        self.close
    End Sub
</script>

<body onkeyup="TestKey">
</body>
</html>

**Bond** · Accepted Answer · 2015-06-23 14:28:46

This works for me.

<script language="VBScript">
    Sub TestKey()
        intKeyCode = Window.Event.Keycode
        If intKeyCode = 27 Then Window.Close
    End Sub
</script>

<body onkeyup="TestKey">
</body>

Edit:

Alternatively, you can use Document_OnKeyUp() if you want to include your code after the <body> tag.

<body>
</body>

<script language="VBScript">
    Sub Document_OnKeyUp()
        intKeyCode = Window.Event.Keycode
        If intKeyCode = 27 Then Window.Close
    End Sub
</script>

TechQA.

Close an HTA when the user presses the 'Esc' key

There are 2 answers

Related Questions in VBSCRIPT

Related Questions in HTA

Related Questions in ONKEYUP

Popular Questions

Popular Tags

Trending Questions