[VBS] programma per estrarre foto da una cartella e incollarle in un'altra

[sandrothor]

ciao a tutti!
avevo bisogno di un programmino che mi estraesse le foto da una cartella contenente tantissime foto e sulla base di una lista di nomi di file contenuta in un file txt, ne potessi copiare un numero limitato in un'altra cartella.

schematizzando
cartella 1: cartella contenente tutte le foto
file in txt: elenco di foto da estrarre da cartella 1 e copiare in cartella 2
cartella 2: cartella di destinazione contenente le foto filtrate.

Per far ciò ho trovato su internet questa istruzione che ho salvato in un file txt

Const ForReading = 1
Const OverwriteExisting = True
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("E:\Users\sscordo\Desktop\tool\sandro\Tmp\lista.txt", ForReading)
Do Until objTextFile.AtEndOfStream
strNextLine = objTextFile.Readline
arrServiceList = Split(strNextLine , ",")
Set objFSO = CreateObject("Scripting.FileSystemObject")
For i = 0 to Ubound(arrServiceList)
objFSO.CopyFile "E:\Users\sscordo\Desktop\test\" & arrServiceList(i) , "E:\Users\sscordo\Desktop\tool\output\", OverwriteExisting
Next
Loop

dove: E:\Users\sscordo\Desktop\tool\sandro\Tmp\lista.txt è il file txt contenete una lista di foto tipo:

1.jpg
2.jpg
3.jpg

Il problema è che posso estrarre un massimo di 82 foto. Come mai?
Grazie mille!
Sandro

[MItaly]

Come da regolamento, ho aggiunto il tag del linguaggio di riferimento e incluso il codice tra tag [code] ... [/code]; in futuro imposta correttamente la discussione fin da subito.

[sandrothor]

ehi... grazie!
... non l'ho fatto solo per ignoranza.
Che linguaggio è?

[MItaly]

Si tratta di VBScript.

Tieni comunque conto che lo spirito di questo forum non è fare mestieri conto terzi, ma risolvere i problemi "insieme" a chi ha fatto la richiesta; francamente mi chiedo se questo sia possibile se non sai neppure di che linguaggio si sta parlando...

[sandrothor]

bhé sto cominciando solo adesso ad approcciare questo mondo... e se mi sono iscritto a questo forum è sopratutto per imparare...e per capire quali sono le mie lacune.
Grazie quindi a quanti mi daranno una mano.. spero di poter ricambiare.