Hi,
und außerdem:
CONST ForAppending = 8
(...)
SET BookFile = FO.OpenTextFile(strPhysExistFile, 2, False)
Dass die 8 fürs Anhängen zuständig ist, ist sehr richtig. Aber wenn Du die Datei nicht so öffnest, lässt sich da auch nix reinschreiben. Richtig wäre also:
SET BookFile = FO.OpenTextFile(strPhysExistFile, 8)
oder - da Du die Konstante schon gesetzt hast - in Deinem Fall:
SET BookFile = FO.OpenTextFile(strPhysExistFile, ForAppending)
(False kann weg, da Du ja keine neue Datei erzeugst)
Grüße,
Utz