Forum Discussion

hao_bai's avatar
hao_bai
Occasional Contributor
16 years ago

How can I convert Object to string and print the error warning message directly via VB?

How can I convert Object to string and print the error warning message directly via VB? <code> Sub ObjSearch(Object)     If Not Object.Exists Then     Log.Message("Not found Object " + CS...
Dmitry_Nikolaev's avatar
Dmitry_Nikolaev
Icon for Staff rankStaff
16 years ago

Hi Bai,





You can pass the name of the needed object and evaluate it after that.

...

RunModel("F","D","U", "Aliases.Sys.scenarioA.Toolbar")

...

Sub RunModel(key1,key2,key3,ObjectName)

  Set obj = Eval(ObjectName)

  Call Run3Key(key1,key2,key3)     

  If Not obj.Exists Then 

    Runner.Halt("Run " & ObjectName & " Failed...")   

  End If  

End Sub