VBscript fejl: "Microsoft VBScript runtime error '800a01a8'

Hej :)

Får denne fejl på et asp galleri jeg prøver at lave... men kan ikke lige finde ud af hvad det er der går galt..

Fejlen lyder:

"Microsoft VBScript runtime error '800a01a8'
Object required: '[string: "F:\inetpub\vhosts\an"]'

/albumstest.asp, line 22"


Linierne omkring linie 22 ser ud således:

20:  Dim fsFolderChk, strGalleryPath
21: 
22:  Set strGalleryPath = "F:\inetpub\vhosts\an\httpdocs\gallery\" & request.querystring("gallery")
23: 
24:  Set fsFolderChk=Server.CreateObject("Scripting.FileSystemObject")
25: 
26:  IF fsFolderChk.FolderExists(strGalleryPath) = FALSE Then
27:
28:  Response.Write("<script language=""JavaScript"">alert('Galleriet: " & request.querystring("gallery") & ", kunne ikke findes!');" & vbCrLf)
29:  Response.Write("self.document.location.href='albumstest.asp'; </script>")
30:       
31:  END IF   
32:           
33:  for each x in fo.SubFolders


Håber der er nogen der kan hjælpe.. jeg er lidt lost..