Solved

How to convert html page to mhtml

Posted on 2006-11-18
9
416 Views
Last Modified: 2008-01-09
Does anyone have any thoughts on converting html to mhtml?

I have a html page that I need to get converted into mhtml.  This is be
be done through code dynamically.

Thanks :)
0
Comment
Question by:swansonplace
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 7
  • 2
9 Comments
 
LVL 6

Expert Comment

by:iscode
ID: 17972283
0
 

Author Comment

by:swansonplace
ID: 17972315
Thanks.  I am not up on asp.net, and I am in a bit of a time crunch.  Do
you know of anything in classic asp.
0
 
LVL 6

Expert Comment

by:iscode
ID: 17972356
you cant do it in asp I belive
0
Creating Instructional Tutorials  

For Any Use & On Any Platform

Contextual Guidance at the moment of need helps your employees/users adopt software o& achieve even the most complex tasks instantly. Boost knowledge retention, software adoption & employee engagement with easy solution.

 
LVL 6

Expert Comment

by:iscode
ID: 17972369
If you need a converter exe file to run on you computer
then download from here
http://www.mirrorservice.org/sites/download.sourceforge.net/pub/sourceforge/h/ht/html2mht/
 
0
 
LVL 6

Expert Comment

by:iscode
ID: 17972480
but you can also do that in your browser save as
0
 
LVL 6

Expert Comment

by:iscode
ID: 17972542
after a thought I think you can do this with CDO CreateMHTMLBody Method
I have not tried it
0
 
LVL 6

Accepted Solution

by:
iscode earned 500 total points
ID: 17972562

<%
    SMTPServer = "server.mysite.com"  
    cdoURL = "http://schemas.microsoft.com/cdo/configuration/
 
    MHTMLBody = "http://www.mysite.com/yourhtml.html" 
 
    Set cdoM = CreateObject("CDO.Message")  
    Set cdoC = CreateObject("CDO.Configuration")  
    Set cdoF = cdoC.Fields  
 
    With cdoF  
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2  
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = SMTPServer
      .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False  
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60  
        .Update  
    End With  
 
    With cdoM  
        Set .Configuration = cdoC  
         
        .CreateMHTMLBody MHTMLBody
        .From = Request("sender")  
        .To = Request("receiver")  
        .Subject = Request("subject")  
        .TextBody = Request("body")
        .Send  
    End With  
 
    Set cdoM = Nothing  
    Set cdoS = Nothing  
    Set cdoF = Nothing  
%>


0
 

Author Comment

by:swansonplace
ID: 17972683
THANK YOU.  I will take a look at it.
0
 
LVL 6

Expert Comment

by:iscode
ID: 17972722
Your welcome swansonplace
glad I could help

iscode
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
I was asked about the differences between classic ASP and ASP.NET, so let me put them down here, for reference: Let's make the introductions... Classic ASP was launched by Microsoft in 1998 and dynamically generate web pages upon user interact…
In this video, viewers will be given step by step instructions on adjusting mouse, pointer and cursor visibility in Microsoft Windows 10. The video seeks to educate those who are struggling with the new Windows 10 Graphical User Interface. Change Cu…
This is my first video review of Microsoft Bookings, I will be doing a part two with a bit more information, but wanted to get this out to you folks.

623 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question