else
directory.createdirectory(pathtoroot)
dim indexfile as new streamwriter(pathtoroot + "\index.htm", false, system.text.encoding.ascii)
indexfile.write("<html><body><br><br><br><br><center><h2><font name='verdana'>welcome to <font color='green'> " + websitename + "</font></font></h2></center></body></html>")
indexfile.close()
end if
end sub
end class
public class website
public sub new(byval objdirectoryentry as directoryentry)
site = objdirectoryentry
logfileflags = new logextfileflags(objdirectoryentry)
end sub
private site as directoryentry
private logfileflags as logextfileflags
