Try something like this:
FUNCTION Error(nError, cMethod, nLine)
COMreturnerror(cMethod+' err#='+str(nError,5)+'
line='+str(nline,6)+' '+message(),_VFP.ServerName)

>>I can offer some general advice - make sure you've upgraded to SP5. Your error sounds like one of the old ones that used to happen. Also, make sure you're using COMRETURNERROR in your error handler. ALOT of people aren't using this with the result that errors will take down COM (not good...)
>>>Hi all!
>>>
>>>There is an error happening on the ASP service (WINDOWS 2000) whenever I run a VFP COM this could go undetected but when I check the event viewer log I found tons of errors generated by the same object and specifically when I call a function that retrives a record object generated by SCATTER NAME command...
>>>
>>>the error reads as follow:
>>>
>>>Error: Script Engine Exception. A ScriptEngine threw expection 'C0000005' in 'IActiveScript::SetScriptState()' from 'CActiveScriptEngine::ResetToUninitialized()'..
>>>
>>>If someone knows about it and can help me I'll be thankful...
>>>
>>>
>>>regards
> ...ok
>
>Just one thing, how you implement COMRETURNERROR() function...
>
>
>Thanks