Using the
File System Object
to
Create a Directory
:
Code:
Highlight
<% createFolder(Server.Mappath("./" & "Test")) function createFolder(strFolderNamePath) dim fso, folderNamePath set fso = Server.CreateObject("Scripting.FileSystemObject") if not fso.folderexists(strFolderNamePath) then set folderNamePath = fso.CreateFolder(strFolderNamePath) set fso = nothing else response.write "Sorry - that folder already exisits" set fso = nothing end if end function %>