
10/04/2002, 08:20
|
 | | | Fecha de Ingreso: mayo-2001 Ubicación: Madrid
Mensajes: 933
Antigüedad: 24 años Puntos: 0 | |
Re: Urgente !!!!:Como guardar un codigo asp a html... Hola:
Cuando yo tuve que hacer eso mismo, iba escribiendo toda la salida Html en un fichero de texto.
Aquí tienes un ejemplo:
<%@ Language=VBScript%><%
Response.Expires = -5000
Dim oFso, oArche
Set oFso = CreateObject("Scripting.FileSystemObject" ;)
Set oArchE = oFso.CreateTextFile(Server.MapPath("Salida.ht m"), True)
oArchE.WriteLine "<html>"
oArchE.WriteLine "<head>"
oArchE.WriteLine "<meta name='GENERATOR' content='Microsoft FrontPage 4.0'>"
oArchE.WriteLine "<title>Victor del Burgo</title>"
oArchE.WriteLine "<style>"
oArchE.WriteLine " body { font-size: 11px; font-family: Verdana }"
oArchE.WriteLine " td { font-size: 11px; font-family: Verdana }"
oArchE.WriteLine "</style>"
oArchE.WriteLine "</head>"
oArchE.WriteLine "<body>"
oArchE.WriteLine ""
For n = 1 To 6
oArchE.WriteLine "<font size='" & n & "'>Victor del Burgo</font><p>"
Next
oArchE.WriteLine ""
oArchE.WriteLine "</body>"
oArchE.WriteLine "</html>"
oArchE.Close: Set oArchE = Nothing
Set oFso = Nothing
Response.Redirect "Salida.htm"%>
Espero te sirva. Un saludo. :)
<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red"></a> |