sitio web dinámico asp cómo generar un sitio web estático html

'/*Nombre del archivo de parámetros (con extensión y ruta absoluta o relativa)

'/*Contenido del archivo de código

Función CreaterFile(archivo,código)

dim MyFile

Establecer fso = CreateObject("scripting.fso.CreateObject("scriptystemobject")

Establecer MyFile = fso.CreateTextFile(Server.mapPath(archivo), True)

MyFile.WriteLine(código)

MyFile.WriteLine(código)WriteLine(código)

MyFile.Close

set MyFile=nothing

Función final

La idea de generación estática es:

1 Qué se generará La página se guarda en la base de datos y la parte de datos de visualización dinámica en la plantilla se reemplaza con símbolos especiales para distinguirla.

2. y ábralo en la tabla correspondiente. Por ejemplo, desea generar una página estática de noticias. Los símbolos especiales son ($title$, $addtime$, $content$). p>3, Reemplace caracteres especiales en la plantilla (por ejemplo, mystr=el contenido de su plantilla)

mystr = replace(mystr,"$title$",rs("title"))

mystr = reemplazar(mystr,"$addtime$",rs("addtime"))

mystr = reemplazar(mystr," $content$",rs("content"))

Por lo tanto, después de procesar la plantilla, escriba mystr en el archivo,

Llame a la función: createFile("mynews.html",mystr)