Make HTML File

This script will make a HTML file

CodeFunctionName
What is this?

Public

Not Tested

Original Work
<%
Const ForReading = 1, ForWriting = 2, ForAppending = 8
dim strFileName, objFSO, objMenuPage
Set objFSO = CreateObject("Scripting.FileSystemObject")
strFileName = "c:\temp\MyFile2.htm"
Set objMenuPage = objFSO.createtextFile(strFileName, forWriting, True) 'overwrite
'write the HTML page
objMenuPage.WriteLine " <HTML > <head > <title >Test Creating file </title > </title > </head >"
objMenuPage.WriteLine " <BODY > <P > <B >List of files available </B > </P >"
objMenuPage.WriteLine Now() //Write out the time Use all VBScript functions!
objMenuPage.WriteLine " </body > </html >"

objMenuPage.Close
% >

Views 4,435

Downloads 1,448

CodeID
DB ID

JeffSmith
26
Revisions

v1.0

Monday
April
23
2018