erro ao Deletar arquivo com FSO

esta dando erro ao deletar pasta

meu código

cria = Request.QueryString("pasta")IF cria <> "" THEN IF FSO.FolderExists(Server.MapPath(path) & "\" & cria) = FALSE THEN Session("erro") = 3 Response.Redirect("index.asp") ELSE SET gria_pasta = FSO.DeleteFolder (Server.MapPath(path) & "/" & cria, FALSE) SET gria_pasta = NOTHING Session("erro") = 4 Response.Redirect("index.asp") END IFEND IF

erro

Objeto necessário: 'DeleteFolder(...)'/contraf/adm_public/del.asp, line 10

linha 10 é essa qui

SET gria_pasta = FSO.DeleteFolder (Server.MapPath(path) & "/" & cria, FALSE)

alegum pode me ajudar?

ele esta chamando no lugar certo porque quando volto ele já deleto o arquivo!