Guardar pagina asp con formato html
buenas, quiero hacer un vinculo dentro de una pagina asp que guarde dicha pagina con foramto html??
como lo hago?? agradeceria ejemplo
como lo hago?? agradeceria ejemplo
Primero bajate una DLL de http://www.dynu.com. La versión de 30 dias SOLO funciona 30 dias y lo de desregistrar y volver a registrar, no funciona ...
Esta DLL captura cualquier página y te devuelve un String ( en formato HTM ).
Yo lo utilizo y funciona sin problemas. Debes crear el archivo .HTM en disco haciendo los Write de ese String, como si fuera un archivo cualquiera.
Ejemplo :
Dim path, fso, f, myhttp
Set fso = Server.CreateObject("Scripting.FileSystemObject")
path =DirectorioDondeGrabarSalidaHTM
'Creamos el fichero y si existe lo sobreescribimos
Set f = fso.CreateTextFile(path,true)
'Generamos la pagina y la guardamos en el fichero
set myhttp = Server.CreateObject("Dynu.HTTP")
dim url
url="http://www.pagina.asp"
dim port
port=80 'Por defecto
myhttp.SetServer("localhost") 'Obligatorio
myhttp.SetPort(port) 'Port de la URL ( debes detectarlo de la propia URL )
myhttp.SetURL(url)
myhttp.GetUrl()
dim salida
salida=myhttp.GetUrl()
f.Write salida
f.close
Suerte.
A.
Esta DLL captura cualquier página y te devuelve un String ( en formato HTM ).
Yo lo utilizo y funciona sin problemas. Debes crear el archivo .HTM en disco haciendo los Write de ese String, como si fuera un archivo cualquiera.
Ejemplo :
Dim path, fso, f, myhttp
Set fso = Server.CreateObject("Scripting.FileSystemObject")
path =DirectorioDondeGrabarSalidaHTM
'Creamos el fichero y si existe lo sobreescribimos
Set f = fso.CreateTextFile(path,true)
'Generamos la pagina y la guardamos en el fichero
set myhttp = Server.CreateObject("Dynu.HTTP")
dim url
url="http://www.pagina.asp"
dim port
port=80 'Por defecto
myhttp.SetServer("localhost") 'Obligatorio
myhttp.SetPort(port) 'Port de la URL ( debes detectarlo de la propia URL )
myhttp.SetURL(url)
myhttp.GetUrl()
dim salida
salida=myhttp.GetUrl()
f.Write salida
f.close
Suerte.
A.