Hvad er der galt her?

Kode:

        ' Her slettes filen inden record'en slettes
        Set File = CreateObject("Scripting.FileSystemObject")
        ImagePath = Server.MapPath("galleryimg")
        ImagePath = ImagePath & "\" & (rsGallery.Fields.Item("imgfilename").Value)
        ' Tjekker om filen findes - og hvis true så sletter den
        If fileExists(ImagePath) Then
        File.DeleteFile(ImagePath)
        End If

Linjen:
        ImagePath = ImagePath & "\" & (rsGallery.Fields.Item("imgfilename").Value)

melder flg. fejl:

Microsoft VBScript runtime error '800a01a8'

Object required: ''

/gallery/doSelect.asp, line 80