May be, the next code is the solution for the problem above:
function MSXML4IsRegistred( )
OBJECT objDOMDoc;
begin
set objDOMDoc = CreateObject ( "msxml4.DOMDocument" );
if( IsObject( objDOMDoc ) ) then
MessageBox( "msxml4.DOMDocument created.", INFORMATION );
return TRUE;
else
MessageBox( "msxml4.DOMDocument NOT created.", SEVERE );
return FALSE;
endif;
end;
Why it doesn't work?