create folder

jeg fatter det ikke..

jeg kan sagtens læse mappens navn og sti og jeg ved ikke hvad...

men følgende script HÆNGER bare... kommer ikke engang med en fejl..

nogne gode forslag?

newfolderpath = server.mappath("tester\")
newfolderpath=newfolderpath&"\"&record("kundeid")
set filesys=CreateObject("Scripting.FileSystemObject")
If Not filesys.FolderExists(newfolderpath) Then
  Set newfolder = filesys.CreateFolder(newfolderpath)
Response.Write("A new folder has been created at: " & newfolderpath)
End If