ASP Create Folder and Subfolder Question

[theflyingminst]

Hi, I got myself tangled in a web here..

I am trying to create a folder and a sub-folder at the same time using FileSystemObject.

The problem is that I am creating the first folder based on a variable (strUserName).. and I need to create a sub-folder within whatever that variable is..

Am I in big trouble here or is there a solution to this one?

The code below just makes the "sub-folder" outside the folder I need it in..

Thanks!


'Create an instance of the FileSystemObject
'Dim objFSO
'Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

'Create folder
'If Not objFSO.FolderExists("e:\kunden\homepages\21\ d104772\mysite\members\uploads\" & strUserName & "sub-folder") then
'objFSO.CreateFolder("e:\kunden\homepages\21\d104772\mendimusic\members\uploads\" & strUserName & "sub-folder")
'End If

[yamaharuss]

You need to create your folder first, then your subfolder

'Create an instance of the FileSystemObject
'Dim objFSO
'Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

'Create folder
'If Not objFSO.FolderExists("e:\kunden\homepages\21\ d104772\mysite\members\uploads\" & strUserName & "sub-folder") then
'objFSO.CreateFolder("e:\kunden\homepages\21\d104772\mendimusic\members\uploads\" & strUserName)
'objFSO.CreateFolder("e:\kunden\homepages\21\d104772\mendimusic\members\uploads\" & strUserName & "\sub-folder")
'End If

[theflyingminst]

Thanks so much for responding.

I changed the code to what you did and it yielded the same results as before.

.. To tell you the truth (yes I'm sorta developing this on the fly) I think what I'd much rather happen (if this is possible) is just copy an entire folder with all of it's files and folders to a newly created folder with the copy command. I was trying to cruch that one too, but couldn't figure out how to do it.

Also, I found this information on this website (http://www.aspnut.com/news/detail.asp?id=16):

-------
Dim oFSO

' create FileSystemObject
Set oFSO=Server.CreateObject("Scripting.FileSystemObject")
' check if folder exists
If Not oFSO.FolderExists(Server.MapPath("/data/abc")) Then
' do something
End If

Using code such as this, you could easily create a procedure to
automatically create folders that don't already exist when a file is being
saved. You can have this code repeated (recursively) to create a folder
structure of any depth.
---------

..it looks like a good theory but I wouldn't know where to start..

[yamaharuss]

You still need to create the new directory to which an existing directory will be copied before attempting a copy.

[theflyingminst]

K, thanks so much! I'll give 'er a shot.

[niente0]

I use this recursive function: :)

function createpath(mypath)
set fsob=Server.CreateObject("Scripting.FileSystemObject")
if fsob.FolderExists(mypath)=false and len(mypath)>3 then
createpath(mid(mypath,1,instrrev(mypath,"\")-1))
fsob.CreateFolder(mypath)
end if
set fsob=nothing
end function