>
This is very nice, but I am still working with VFP 6.0. Thank you very much for your suggestion.>
>You can still do this using VFP 6 but it is not as elegant, using code like this:
>
>
>LOCAL llError, lcOnError
>lcOnError = ON( 'ERROR' )
>ON ERROR llError = .T.
>loOutlook = CREATEOBJECT( 'outlook.application' )
>IF NOT EMPTY( lcOnError )
> ON ERROR &lcOnError
>ELSE
> ON ERROR
>ENDIF
>IF llError
> AERROR( laError )
> IF laError[ 1, 1 ] = 1733
> *** class definition not found
> MESSAGEBOX( [Outlook is not registered on this computer] )
> ENDIF
>ENDIF
>
Thank you very much for your help!
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham