@ Бобби Джек: Лучшее, что я могу придумать, - это импортировать файл, который содержит все необходимые для форматирования / другие данные, например,
Set oFS = Server.CreateObject("Scripting.FileSystemObject")
Set oF = oFS.OpenTextFile(Server.MapPath("somefile.html"), 1)
sText = oF.ReadAll
oF.Close
Set oF = Nothing
Set oFS = Nothing
А затем заменив внутри него «переменные», которые разделены некоторыми символами, например ::
sText = Replace(sText, "##var1##", var1)
sText = Replace(sText, "##var2##", var2)
sText = Replace(sText, "##var10##", var10)
sText
затем можно сохранить в другой файл или вывести на экран.