>>* Form refresh, triggered by a timer
>>
>>Local cLogDir As String, cPrefix As String, cFile As String, cSource As String
>>
>>cLogDir = [Logs\]
>>
>>If Thisform.Optiongroup1.Option1.Value = 1
>>	cPrefix = cLogDir + [RMT54]
>>Else
>>	cPrefix = cLogDir + [RMT54RunErrors]
>>Endif
>>
>>cFile = cPrefix + Dtos(Date()) + [.Log]
>>
>>If Not File(cFile)
>>	cFile = cPrefix + Dtos(Date()-1) + [.Log]
>>Endif
>>
>>If File(cFile)
>>	cSource = Filetostr(cFile)
>>Else
>>	cSource = [There has been no activity for, at the very least, 24 hours...]
>>Endif
>>
>>Thisform.AddProperty('cSource',cSource)
>>
>>With Thisform.Pages1._Page1.Tekst       && the Edixbox
>>	.ControlSource = Thisform.cSource
>>	.Value = Thisform.cSource
>>EndWith
>>
>>* Now it would be nice if there was a way to display
>>* the last "page" of Thisform.cSource (I hope this is understandable)
>>
>>

>With Thisform.Pages1._Page1.Tekst       && the Editbox
>	.ControlSource = Thisform.cSource
>	.Value         = Thisform.cSource
>        .SelStart      = LEN(Thisform.cSource)
>EndWith
>