' Get the cookie
        loWebResponse = loWebRequest.GetResponse()
        loCookieCollection = loWebResponse.Cookies

        loWebRequest.CookieContainer.Add(loCookieCollection)

        For lnCounter = 0 To loCookieCollection.Count - 1
            lcCookie = loCookieCollection.Item(lnCounter).Name
            If lcCookie = "LevelExtremeSession" Then
                lcCookie = loCookieCollection.Item(lnCounter).Value

                ' Define the cookie
                loMessage.Configuration.Fields.Item(CDO.CdoConfiguration.cdoHTTPCookies).Value = _
                 "LevelExtremeSession=" + lcCookie

            End If
        Next

        ' Go get the page
        loMessage.CreateMHTMLBody("http://www.myurl.com/MyPage.aspx", CDO.CdoMHTMLFlags.cdoSuppressNone, "", "")

        loStream = loMessage.GetStream()

        ' Save to file
        loStream.SaveToFile("D:\Test.mhtml", SaveOptionsEnum.adSaveCreateOverWrite)