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
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