GetFolder question

[credo]

I have some ASP code sitting on a web server that gets the current directory that the asp file sits in:

pathStr = request.servervariables("PATH_TRANSLATED&quot
scriptStr = Replace(request.servervariables("SCRIPT_NAME&quot, "/", "\&quot
Dim nameArr
nameArr = Array()
nameArr = Split(scriptStr, "\&quot
scriptStr = nameArr(UBound(nameArr))
currentDir = Replace(pathStr, scriptStr, "&quot

Set Folder = FSO.GetFolder(currentDir)

I want to get the path of a subdirectory within this directory. eg. Say the subfolders name was Fred.

... could i use
Set Folder = FSO.GetFolder(currentDir+"\Fred&quot

if not, how would I reference this path ?

thanks in advance,
Credo

 

[LesleyW]

Yes that looks right to me

 

[Ovatvvon]

If that is not working, instead of using "+", use "&" like:

Set Folder = FSO.GetFolder(currentDir & "\Fred&quot


Hope this helps... -Ovatvvon :-Q