Objekt erforderlich...

Hawkings

Erfahrenes Mitglied
Hi @ all

ich habe folgenden Code:
Code:
Sub Copy(e,sizecopy,gCopyFileName,gExeFileName,i)
		Dim lDestinationCopy, lDestinationExe, lCopyFilePath, lCopyFileName, lExeFilePath, lExeFileName
		On Error Resume Next
		For l = 0 To (gCopyFileName-1)
			lCopyFilePath = copyFilePathArr(l) 
			lCopyFileName = copyNameArr(l)
			WScript.Echo "lCopyFilePath : "&lCopyFilePath & vbCr & "lCopyFileName : "&lCopyFileName 
					
			Set gFile = fso.GetFile(lCopyFilePath)		
				If (Err.Number <> 0) Then
					WScript.Echo "Alarm "&Err.Description & " 1 "&lCopyFilePath
				End If			
			lDestinationCopy = gNetDestination&":\"&gPath&"\"&lCopyFileName
			gFile.Copy(lDestinationCopy)
			If (Err.Number <> 0) Then
				WScript.Echo "Alarm "&Err.Description & " 2 " & lCopyFilePath
				Call Log(1,i)
			Else
					Call Log(2,i)
			End If


Hierbei werden aus 2 Arrays, die die Datei mit Pfad und den Dateinamen darstellen, an die Variablen "lCopyFilePath" und "lCopyFileName" übergeben.
Der Error-Code des GetFiles Befehls liefert mir aber immer ein Objekt erforderlich zurück...
woran kann das liegen?! Die Werte der Variablen sind wie folgt:
lCopyFilePath : C:\test\lala lala.txt
lCopyFileName : lala lala.txt

Diese Namen haben Leerzeichen, ich habe dazu auch schon geschaut, dass er sie erkennt, der Pfad existiert...Muss evtl. noch " dazu?! Das dachte ich zumindest anfangs, jedoch erkennt er sie auch so und kopiert sie...bringt jedoch immer folgende Fehlermeldung...:
Alarm Objekt erforderlich 1 C:\Test\lala lala.txt
Alarm Objekt erforderlich 2 C:\Test\lala lala.txt

Kopieren tut er sie trotzdem...warum, und wie kann ich die Fehler beheben...?!

Liebe Grüße
 
Zuletzt bearbeitet:

Neue Beiträge

Zurück