Pfade mit kyrillischen Zechen in eine Text-Datei ausgeben und in VBS einlesen und verarbeiten.

Hallo,

nehmen wir in dem nachfolgenden Beispiel die folgenden beiden Dateien an - 1x auf Deutsch und 1x übersetzt auf Russisch:
Es werden Dateien, die kyrillische Buchstaben in dem Namen enthalten, zur Weiterverarbeitung auf eine Batch-Datei gezogen und losgelassen (empfangene Argumente %* wären dann: "траектория.txt" "Fräsbahn.txt"). Im Batch werden die vollständigen Pfade als Argumente in Variable gesetzt und anschließend jeder Pfad in einer txt-Datei auf separater Zeile ausgegeben (ganz klassisch im ANSI-Textformat). Wenn nun diese Text-Datei geöffnet und betrachtet wird, sind dort die kyrillischen Buchstaben dann nicht mehr 1:1 zu sehen

òðàåêòîðèÿ.txt
Frasbahn.txt

dennoch können diese Pfade vom Batch problemlos weiterverarbeitet werden – z. B. mit den aus der Text-Datei zurückeingelesenen Pfade die beiden Dateien löschen, verschieben und sonstiges…
Anders sieht es leider aus, wenn die Pfade aus der gleichen Text-Datei von einem VB-Script eingelesen und weiterverarbeitet werden: das VB-Script zeigt die eingelesenen Pfade in einem MsgBox zwar so an, wie diese in der Text-Datei zu lesen sind (òðàåêòîðèÿ.txt), kann diese dennoch nicht korrekt weiter verarbeiten - löschen, verschieben u. s. ist nicht möglich.
(Es wird kein Fehler bei der Skript-Ausführung angezeigt.)

Anbei ist ein kleiner Kode-Abschnitt aus der Batch-Datei, auf welche die obigen problematischen Dateien gezogen und losgelassen werden:
Es werden die Pfade in der Datei FullFileName.txt ausgegeben und dort sehen sie dann wie folgt aus:

"D:\Ëè÷íûå íàñòðîéêè\òðàåêòîðèÿ.txt"
"D:\Personliche Einstellungen\Frasbahn.txt"


Die Text-Datei in Unicode abzuspeichern schafft uns hier leider keine Abhilfe - das VB-Skript zeigt die eingelesenen Pfade in einem MsgBox zwar mit anderen Zeichen an, wie diese in der Text-Datei zu sehen sind, kann sie auch hier nicht weiter verarbeiten - löschen, verschieben u. s. ist nicht möglich.

So wie ihr es bereits bemerkt habt, entstehen mit der obigen Methode gleich zwei Schwierigkeiten:
1. Die Codepage muss für jede Sprache umgestellt werden – d. h. in unserem Beispiel, dass schon vor der Ausgabe jedes Dateipfades der richtigen Codepage automatisch erkannt und geschaltet werden muss.
2. Die Pfade werden von dem VB-Skript nicht korrekt verarbeitet.

Auf einer Windows 7 Umgebung mit russischer Ländereinstellung funktioniert das Vorhaben problemlos (wenn unter Systemsteuerung\Zeit, Sprache und Region > Sprache für Unicode- inkompatible Programme das Gebietschema auf Russisch geändert ist).
Das Umstellen auf Russisch ist natürlich keine Lösung – jede Umgebung muss natürlich weiterhin unverändert bleiben (abgesehen davon, dass beim Umschalten jeweils Neustarten erforderlich ist).
Wenn die Verarbeitung eines mit deutschen und russischen Zeichen gemischten Pfades, aufgrund der Beschränkungen der cmd.exe-Architektur, nicht möglich ist (z. B. ein klassischer Beispiel D:\Persönliche Einstellungen\траектория.txt), müssen natürlich alternativere Varianten her, wobei mir persönlich Batch echt lieber wäre.

Über eure Lösungsvorschläge wäre ich euch sehr dankbar!

Gruß
evinben

@echo off &setlocal

:: ACP
>nul chcp 1252

:: Byte Order Mark für UTF-16 LE [Nur einmal an den Anfang der Textdatei setzen!]
if not exist "FullFileName.txt" (  
  (set /p =ÿþ) <nul >"FullFileName.txt"  
)

:: cmd /u für Unicode
for %%d in (%*) do cmd /u /c "echo %%~d>>"FullFileName.txt""  

:: zurück zur OEMCP
>nul chcp 850

:: weiterer Code

Const ForReading = 1
Const NoCreate = False
Const AsUnicode = -1

Dim oFSO, oFile

Set oFSO = CreateObject("Scripting.FileSystemObject")  
Set oFile = oFSO.OpenTextFile("FullFileName.txt",ForReading , NoCreate, AsUnicode)  
WScript.Echo oFile.ReadAll
oFile.Close

(set /p =ÿþ) <nul >"FullFileName.txt"