Код по своей сути верный (ИМХО, с асп не сильно дружу, но что-то понимаю). Может, стоит с относительными путями попробовать? Или косые черты он неправильно понимает... попробуй эти варианты:
Код:
Dim fso, f, fc, fld, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(”C:/Inetpub/wwwroot/pr/”)
Set fc = f.SubFolders
fc.Add ("t")
Код:
Dim fso, f, fc, fld, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(”./”)
Set fc = f.SubFolders
fc.Add ("t")