Evaluate string formula

venkat_venkamolla

New member
Joined
Apr 6, 2005
Messages
1
Programming Experience
3-5
Can anybody provide light on this problem:

I am evaluating the string, If I enter wrong string its giving me JIT debugging message as:

----message start---
An exception 'Runtime Error' has occured in Script.
However, a debugger that cannot handle the exception type is already attached to the process.
----message end---

So can anybody advice me how can I overcome this message.

my piece of code is:
---------------------

vs_str=5+2(abs(3-1.2))+3*2
If vs_str <> String.Empty Then

Try

SetErrorMode(SEM_NOALIGNMENTFAULTEXCEPT)

Dim srptctr AsNew MSScriptControl.ScriptControl()

srptctr.Language = "VBScript"

If Len(vs_str) > 0 Then

Dim vs_FormulaStr AsString = Trim(vs_str)

Dim vi_Result AsString = srptctr.Eval(vs_FormulaStr)

endIf

Catch ex As Exception

vb_Result =
False

Finally

SetErrorMode(0)

EndTry

Else

vb_Result = False

EndIf

-----
In the above code my control is going to exception block. I just want to avoid showing the JIT message.

thanks in advance
 
Back
Top