Crear archivo MHT utilizando CDO

Bienvenido y disfruta el nuevo diseño del sitio web.... agradecería me envíes tus comentarios acerca de los cambios realizados

Para descargar cualquier archivo es necesario estar registrado y hacer click en el titulo del archivo a descargar

Aug 22

Visual Fox Pro, Trucos Agregar Comentarios

Un archivo con extensión MHTML es un documento Html que contiene en un único archivo todos los archivos (gráficos, texto...etc) de pagina web.

Para este truco utilizaremos el objeto CDO que viene en Windows.

cStr = ""

Declare Integer ShellExecute In "Shell32.dll" ;
INTEGER HWnd, StringlpVerb, ;
STRING lpFile, String lpParameters, ;
STRING lpDirectory, Long nShowCmd

cArchivo = Sys(2015) + ".mht"
cUrl = " http://www.davphantom.net/modulo.asp"

oMSG = Createobject( "CDO.Message")
oMSG.CreateMHTMLBody(cUrl)
cStr = oMSG.getstream
cStr.SaveToFile(cArchivo, 1)

ShellExecute(0, "Open", cArchivo, "","", 0)

Release oMSG

Si tienes inquietudes, sígueme en Twitter para contactarme.

Seguir a @davamadort

¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?

Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn

El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com

Crear archivo MHT utilizando CDO

¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?

Comentarios: 0

Dejar un comentario

Categorías

Suscríbete vía email

Entradas Recientes

Top de consultas

Archivos