Display Data in a New Window

Sample HTML function that displays information in a new Internet Explorer window.

VBScript Code


Sub RunScript
    Set objIE = CreateObject("InternetExplorer.Application")
    objIE.Navigate("about:blank")
    objIE.ToolBar = 0
    objIE.StatusBar = 0
    Set objDoc = objIE.Document.Body
    strHTML = "This information is displayed in a separate window."
    objDoc.InnerHTML = strHTML
    objIE.Visible = True
End Sub