Home/ Questions/Q 6984161
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-27T18:30:50+00:00

In my HTA, I hold it it open if an error occurred, and close

  • 0

In my HTA, I hold it it open if an error occurred, and close it if everything was successful. At the start, I have the sysmenu property set to no because I do not want the user to close the HTA until it’s finished. At the end, I want them to be able to click on the close button. Here’s what I typed up to try to achieve this, but it doesn’t seem to work? I suspect there is something I need to do to get the HTA to refresh it’s windows properties?

Please note that any solution that completely reloads the window and/or makes the script execute again is not acceptable

If Not bHoldOpen Then
    Call window.close
Else
    Dim tagHTA
    Set tagHTA = document.getElementsByTagName("hta:application").item(0)
    Call tagHTA.setAttribute("sysmenu","yes")
End If
Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    You cannot change it at runtime, its only available in the HTA: block as its value is used to determine how the physical window is to be initially created.

    I thought you could produce a warning using the onBeforeUnload event & call cancelBubble to abort the close, but I tried it in IE8 and it still seems bugged; http://support.microsoft.com/kb/946214.

    It would probably be simpler and easier for the user to comprehend if you were yo just unhide a “Close” button when the process completed.

    • 0