Sehr ärgerliche Änderung des Fehlercodes "ErrEvaluateError"

[koehlerbv]

Bis Version 8 warfen syntaktische inkorrekte Formeln bei der Verarbeitung durch die LotusScript-Funktion "Evaluate" den Fehler mit der Nummer 1024. Seit Version 8 (aktuell aufgefallen bei 8.0.2) den Fehler 221. Wer bisher ErrorHandler für das Abfangen falscher @Function-Syntax mit Err = 1024 verwendete,  fällt daher auf die Nase (bzw. bekommt nur die Standard-Meldung seines ErrorHandlers). Sehr unschön ...

Diesen Fehler müsste man allerdings bei allen vorigen Versionen beklagen: Err = 1024 war undokumentiert, während die Konstante
Public Const ErrEvaluateError             = 221
(definiert in lserr.lss) gar nicht verwendet wurde ... Das hat man mit R8 nun "gerade gezogen". Besser wäre wohl gewesen, Err = 1024 auf "ErrEvaluateError" zu legen.

Wer R8 und eine Vorgängerversion am Laufen hat, probiere einfach folgenden Code:

Code

Sub Click (Source As Button)
	
	Dim vResult As Variant
	Dim szFormula As String
	
	On Error Goto ErrorRoutine
	
	szFormula = "@UserNam"
	vResult = Evaluate (szFormula)
	Messagebox vResult (0)
		
	Exit Sub
	
ErrorRoutine:
	Messagebox Err
	Exit Sub
End Sub

Meine Queries in der KBase mit "1024 AND 221" oder "ErrEvaluateError" brachten keine Ergebnisse.

HTH,
Bernhard