Notice: This website is an unofficial Microsoft Knowledge Base (hereinafter KB) archive and is intended to provide a reliable access to deleted content from Microsoft KB. All KB articles are owned by Microsoft Corporation. Read full disclaimer for more details.

How To Programmatically Close a Visual Basic ActiveX Document


View products that this article applies to.

Summary

In some situations, you may want to programmatically close the Internet Explorer window that hosts your Microsoft Visual Basic ActiveX document. This article demonstrates a mechanism that can accomplish this.

↑ Back to the top


More information

The CloseWindow sub procedure in the following code sample uses the SendMessage function to send a SC_CLOSE message to the Internet Explorer window, which immediately closes the Internet Explorer instance.

Keep in mind that the recommended method to close a Visual Basic document is to navigate the Internet Explorer instance away from the Visual Basic document to another resource.

Step-by-Steps Example

  1. Create a new ActiveX Document DLL project in Visual Basic.
  2. On the Project menu, click References, select Microsoft Internet Controls, and then click OK.
  3. Paste the following code into the User Document code window:
    Option Explicit
    
    
    Private Declare Function SendMessage _
              Lib "user32" Alias "SendMessageA" _
              (ByVal hwnd As Long, _
              ByVal wMsg As Long, _
              ByVal wParam As Long, _
              lParam As Long) _
              As Long
    
    
    Private Sub CloseWindow()
        
        Dim Handle As Long
        Dim ie As InternetExplorer
        
        Const NILL = 0&
        Const WM_SYSCOMMAND = &H112
        Const SC_CLOSE = &HF060&
        
        Set ie = UserDocument.Parent
        
        '   Send the message.
        Handle = SendMessage(ie.hwnd, WM_SYSCOMMAND, SC_CLOSE, NILL)
    
    End Sub
    					
  4. Call the CloseWindow procedure whenever you want to close the Internet Explorer window.

↑ Back to the top


References

For additional information, click the article number below to view the article in the Microsoft Knowledge Base:
177238 How To Hyperlink in UserDocuments
For more information about developing Web-based solutions for Microsoft Internet Explorer, visit the following Microsoft Web sites:

↑ Back to the top


Keywords: kbhowto, kbactivedocs, KB293086

↑ Back to the top

Article Info
Article ID : 293086
Revision : 3
Created on : 5/11/2006
Published on : 5/11/2006
Exists online : False
Views : 494