Hi tony, sorry to nag you,
but
Dim testConsecutiveNumbers As New Test("Test Consecutive Numbers", Outputstream)
Call testConsecutiveNumbers.AssertEqual(31, 32) returns "pass"
Call testConsecutiveNumbers.AssertEqual(31, 31) returns "failed"
Best Regards,
Andrew MagermanMag
erman GmbH, Im Marbach 53, 8800 Thalwil, Tel/Fax: +41 43 540 99 67ht
tp://www.magerman.com | Member of www.notesnet.ch