fejl '800a0046' VBScript-kørselsfejl

Har nogen set denne her før - den begynder ærligt talt at irretere mig.

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a0046'
Tilladelse nægtet

/mappe/sub.asp, linje 63

Her er koden (Er en inkluderingsfil)

Sub FSOtilbudslet

Set fso = CreateObject("Scripting.FileSystemObject")
        if Billed1 <> "-" and Billed1 <> "paavej.gif" then
        fso.Deletefile(Server.Mappath("/Mappe/Billeder/" & Billed1))
        End if       
        if Billed2 <> "-" then
        fso.Deletefile(Server.Mappath("/Mappe/Billeder/" & Billed2))
        End if       
        if Billed3 <> "-" then
        fso.Deletefile(Server.Mappath("/Mappe/Billeder/" & Billed3))
        End if           
        if Billed4 <> "-" then
        fso.Deletefile(Server.Mappath("/Mappe/Billeder/" & Billed4))
        End if   
           
        Set fso = Nothing   
End sub