skriptfehler

hi ich führe eine .vbs datei aus und es kommt immer folgender fehler:
Zeile:10
Zeichen:1
Fehler: Erlaubnis verweigert.
Code:800A0046
trifft aber nur seit 2 wochen auf.

dateiinhalt:
dim objFSO

set objFSO = CreateObject("Scripting.FileSystemObject")

'objFSO.deletefolder "D:\Backups\Firefox Profil"'
'objFSO.createfolder "D:\Backups\Firefox Profil"'


'Firefox Profil sichern'
objFSO.copyfolder "C:\Users\Kanarya\AppData\Roaming\Mozilla\Firefox\Profiles\ejigytm0.default", "D:\Backups\Firefox Profil\ejigytm0.default "+cstr(date())


'Favoriten sichern'
objFSO.deletefolder "D:\Backups\Favoriten"
objFSO.copyfolder "C:\Users\Kanarya\Favorites", "D:\Backups\Favoriten"



set objFSO = nothing
wscript.quit


system:
win7 x64
intel q8400
gtx460