Kevin,
Try something like this:

lcTextToInsert = "-- " + TTOC(DATETIME()) + " KM --"
lnLen = LEN(lcTextToInsert)
WITH _screen.ActiveForm.oleRTF
	.text = .text + CHR(13)+CHR(10) + lcTextToInsert
	.selStart=LEN(.text) - lnLen
	.selLength=lnLen
	.selColor = 255
ENDWITH

HTH
>Craig,
>
>I also want to do this. I want to insert a date/time stamp with a users
>initials in red like this:
>
>
> -- 10/09/01 09:00 KM --
>
>
>I'd be grateful for any help you can provide.
>
>TIA
>
>Kevin