VBScript Error help

The following is a script i'm using to push updated files over my network. I keep getting an error that says "can't find path". Is there any way that when I run this, I can find out which loop iteration it is failing on? I could go to the reference file and just start changing computer names but if I can somehow ID the fail point, it could be useful in troubleshooting other scripting problems I may encounter. Also, is it possible to have the script skip the errored iteration and move on to the next loop?

[codebox]Const ForReading = 1
Const OverwriteExisting = TRUE

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Computers.txt")

Do Until objFile.AtEndOfStream
strComputer = objFile.ReadLine
strRemoteFile = "\\" & strComputer & "\C$\PathToFolder"
objFSO.CopyFile "C:\transferring.file", strRemoteFile, OverwriteExisting
Loop
[/codebox]

Hello doomgiver.

You could catch and handle the error. Take a look at this article.

For example..

Const ForReading = 1
Const OverwriteExisting = TRUE

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Computers.txt")

Do Until objFile.AtEndOfStream
	strComputer = objFile.ReadLine
	strRemoteFile = "\\" & strComputer & "\C$\PathToFolder"
	On Error Resume Next
	objFSO.CopyFile "C:\transferring.file", strRemoteFile, OverwriteExisting
	If Err.Number<>0 then'Error has occured
		msgbox strComputer & " " & Err.Description
		Err.Clear
	End If
	
	On Error Goto 0
	

Loop

In the example, the computername is just being printed, but you could easily change it to write to a log or take other action.

Hope that helps,
The Panda

Thanks a bunch Panda!!! I'll do some testing... But that looks like it should work!

The error handling works beautifully. Thanks again.

Edited by doomgiver13, 29 March 2010 - 10:55 AM.

No problem .

The Panda