Saving a Web Page Into A Single File

Tuesday Feb 18th 2003 by Onega Onega
Share:

See how to painlessly save a whole web page -- including pictures and text -- in to one file.

Do you ever want to save a web page into one single file, including pictures and text? You can use IE SaveAs command, but the drawback is obvious, the Save As dialog is always shown up for security reason. There is a complicated work around to avoid the Save As dialog (see Automated IE SaveAs MHTML). Here I show you an easy way to do it:
#import "c:\program files\common files\system\ado\msado15.dll" _
        no_namespace rename("EOF", "EndOfFile")
#import  no_namespace rename("EOF", "EndOfFile")

...

void SaveWholePage(LPCTSTR page_url,LPCTSTR save_filename)
{
   CoInitialize(NULL);
   {
      IMessagePtr       iMsg(__uuidof(Message));
      IConfigurationPtr iConf(__uuidof(Configuration));
      iMsg->Configuration = iConf;
      try
      {
         iMsg->CreateMHTMLBody(
            page_url, 
            cdoSuppressNone,
            "domain\\username",
            "password");
      }
      catch(_com_error err)
      {
         // handle exception
      }   
      _StreamPtr pStream=iMsg->GetStream();
      pStream->SaveToFile( save_filename,
                           adSaveCreateOverWrite);
   }
   CoUninitialize();
}

Sample Usage:

SaveWholePage("http://www.zaobao.com/gj/zg002_050203.html",
              "test.mht");

Sample program is not provided, since you can create it on your own and copy & paste the above code snippet into your project.

Share:
Home
Mobile Site | Full Site
Copyright 2017 © QuinStreet Inc. All Rights Reserved