VBScript: copy probleem

[Verwijderd]

Ik ben vbscript aan het leren en ben dus een beginner!

Wat is de bedoeling:
Ik wil een map met bestanden kopieren (om later eventueel automatische backup's te maken, ik zeg maar iets)
Dus eerst kijk ik of de map bestaat. Die controle heb ik al bijgevoegd want als de map bestond kreeg ik ook een error (7 tem 13)
In de lijnen 15 tem 18 wil ik de bestanden die in de eerste map zitten kopieeren naar die nieuw aangemaakte map.
Daar krijg ik een "toegang geweigerd".
Daarom had ik lijn 16 bijgevoegd om te zien of ik wel het juiste object heb.
Hij schrijft inderdaad het eerste bestand op "g:\scripts\array.vbs"
Bij de volgende lijn komt dan die fout.
Het is alsof hij geen toegang heeft om on die map te schrijven.
Hopelijk is dit een goede uitleg voor jullie om een beginner op weg te helpen?

code:

Dim objFSO, objMap, objBestand, strNieuweMap
strNieuweMap = "g:\testscripts"
'Eerste het FileSystemObject creeren
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Neem de map vanwaar we de bestanden willen kopieren g:\scrips
Set objMap = objFSO.GetFolder("g:\scripts")
'Controleer op het bestaan van de map
If objFSO.FolderExists (strNieuweMap) then
    WScript.Echo "De doelmap " & strNieuweMap & " bestaat reeds" & vbCrLf
else
    WScript.Echo "De doelmap " & strNieuweMap & " wordt aangemaakt" & vbCrLf
    Set strNieuweMap = objFSO.CreateFolder(strNieuweMap)
End if
'Elk bestand wordt nu gekpoieerd
For Each objBestand In objMap.Files
Wscript.echo objBestand & VBCrLf
objBestand.Copy (strNieuweMap)
Next

Ondertussen heb ik g:\scripts vervangen door g:\scripts1 (die een copy is van scripts) omdat ik dacht dat er ergens een bestand open zou zijn. Alle bestandje staan in dezelfde map, inclusief het bestandje die ik uitvoer. En dus op die manier niet meer.
thx

[ Voor 7% gewijzigd door Verwijderd op 19-07-2008 10:32 ]

[Verwijderd]

Opgelost!
Op lijn 2 stond g:\testscripts

dit moest g:\testscripts\ zijn