17/01/2003, 02:27
|
| | | Fecha de Ingreso: noviembre-2002
Mensajes: 52
Antigüedad: 22 años, 5 meses Puntos: 0 | |
| html
Prueba a meter el html en variables como
body = body &"<html>"
body = body &"<body>"
body = body &"</body>"
body = body &"</html>"
y copialo en disco duro de la siguiente manera
Set Archivo = CreateObject("Scripting.FileSystemObject")
Set nombreArchivo = Archivo.CreateTextFile("Ruta del disco mas nombre de archivo.htm")
path = Archivo.GetAbsolutePathName(("Ruta del disco mas nombre de archivo.htm"))
getname = Archivo.GetFileName(path)
nombreArchivo.WriteLine(body)
nombreArchivo.close
espero que te ayude unsaludo |