---

Hallo allerseits,
wir möchten mal eine zeitlang wissen, wieviele Anwender unsere Makros überhaupt einsetzen und versuchen das Ganze zu protokollieren. Aber es funktioniert nicht so richtig. Ich kann zwar eine Datei anlegen, bekomme aber meine Parameter nicht so richtig hinein. Wer weiss wie ich z.B. USERNAME, DATUM, HOSTNAME, FILENAME in eine log.txt schreiben kann unter Catia V5 R12 und Win2000?

Vielen Dank.

der beste Ansatz war bisher :

Sub CATMain()
On Error Resume Next

dim fileSystem as FileSystem
set fileSystem = CATIA.FileSystem

'dim userFile as File
'set userFile = fileSystem.CreateFile("c:\temp\CATReport\user_logging.txt", true)

dim text as TextStream
set text = userFile.OpenAsTextStream("ForAppending")

Dim Ausgabe as CDate
Ausgabe = CDate ("01.12.2004 12:00:00")

text.write "aktuelles Logfile" & Chr(10)

------------------
Mit freundlichen Grüssen, meurth

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Versuch mal die Richtung:

Set objEnv = WshShell.Environment("Process")

ComputerName = objEnv("COMPUTERNAME")
msgbox ComputerName

UserName= objEnv("USERNAME")
msgbox UserName

ScriptName = WScript.ScriptName
msgbox ScriptName

Zeit = Now
msgbox Zeit

Axel

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Axel,

vielen Dank für deinen Tip, aber es funktioniert nicht so richtig :
Für die ersten 3 Paramter erhalte ich leere MSG-Boxen und nur beim aktuellen Datum mit Uhrzeit steht was drin.
Als zweites versuche ich das Ganze auch in eine Datei umzuleiten und nicht auf den Bildschirm zu bringen. Hast du vielleicht dazu auch eine Idee? Vielen Dank.

------------------
Mit freundlichen Grüssen, meurth

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Versuchst Du es unter Windows oder Unix ? Welche Makro Art verwendest Du ? Unter Unix kann es sein dass es Probleme gibt. Das Umleiten in eine Datei ist nur noch das kleinset Problem, wenn die msgbox nichst bringt, dann hast Du in der Datei auch nichts.

Axel

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Axel,

ich mache das ganze unter Win2000 und als VBSCRIPT mit der Makroendung CATScript.

------------------
Mit freundlichen Grüssen, meurth

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Soweit ich weiss kann man text-files nur mit CATVBA erstellen, jedoch nicht mit CATScript

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP