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 " + CStr(Object)) End If End SubSub Main() Call ObjSearch(Aliases.Sys.processCMD.CMDClass) End Sub</code>Will get a "An exception occurred in the "Unit1" unit at line 5:VBScript don't support Cstr"

Hi Daniel,Eval() does not perform any conversion but takes an input string and passes it to the runtime engine and returns a result. As VBScript is interpreting language, this means that the passed string will be parsed by the runtime engine in the current execution context and executed."in the current execution context" means that all components of the string must evaluate to variables, objects, functions, etc. that are available at the point where Eval() is called.E.g., in order for theSet obj = Eval("ObjFind(""abcd"", i)")call to succeed, ObjFind() function must be defined and be accessible, it must return a reference to the object and i variable must be defined.

Hi Bai,Log.Message("Not found Object " + Object.FullName)should work...

Thx for you reply, now the log message is "You are trying to call the "FullName" method or property of the "CMDClass" object that does not exist.Not found Object Non-existent object 17:18:37 "As you can see, Aliases.Sys.processCMD.CMDClass is a name after name-mapping，What I need is to give warning message which contain "Object's name-mapping name" when object not exist.In a word, how can I convert Object type to string type in Testcomplete7.5 via VB script.

Hi Bai,All variables in script languages are of OleVariant type (with possible sub-type differentiation as string, integer, etc.). Thus no type conversion in scripting languages is possible.In your case you should use the WaitAliasChild function (see TC help for more details) and code like this (untested, off top of my head):If (Aliases.Sys.processCMD.WaitAliasChild("CMDClass", 200).Exists) Then Log.Message Aliases.Sys.processCMD.CMDClass.FullNameElse Log.Warning "CMDClass child was not found"End If

Hi Bai,When an object is not found during test execution, TestComplete posts the corresponding error to the test log. The Remarks pane for this message should contain the name of the object that is not found. Does not this information enough for you?

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

20 Replies

TanyaYatskovska
Alumni
13 years ago

Hi Trung,

Something like this:

...

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

...

Sub RunModel(key1,key2,key3,ObjectName)

Call Run3Key(key1,key2,key3)

If Not ObjectName.Exists Then

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

End If

End Sub
hantrung_truong
Occasional Contributor
13 years ago
Thanks for your quick response Tanya. However, I still receive the error:

An error occurred while accessing the "MappedName" method or property of the "pnl_Error" object.

The object or one of its parent objects was not found.

The problem is that the object does not exist, so the "MappedName" property is invalid.

Do you have any other ideas about this?

Thanks
TanyaYatskovska
Alumni
13 years ago

Hi Trung,

The MappedName property returns the mapped name of the object you are working with. It's used on the line where the error text is posted to the Test Log. You can use any other property (or even only a predefined string) to post the informative message. I suggest that you set a breakpoint on the problematic line and evaluate the object to identify what property you can use.
hantrung_truong
Occasional Contributor
13 years ago
Thanks Tanya. Now I figure out the root cause is that I couldn't convert an object to a string. From my researches, I used CStr(object_name) to covert the object to string. Unfortunately, it doesn't work. Could you please give me advice on how to convert an object to a string.

Thanks
Ravik
Super Contributor
13 years ago
Hi All, You can convert object value and type by using

aqConvert.VarToStr

aqConvert give the several method to convert object, based on your need you can convert it. please try and let us know you feedback. .... .. also If You get any Error of VB like Object Required, Object not found and any Exception you can by pass it by using ON Error Resume Next ..........Ravik
hantrung_truong
Occasional Contributor
13 years ago
Thanks all.

As I understand the problem deeper, it is resolved now. What I was facing is that I tried to convert a mapped name to a string using CStr and it is impossible.

Example:

'---Don't care if the object exists or not, just log the mapped aliases as a string

'---I wanted to see a string "Aliases.pageLogin.txt_Username" in the log

Log.Message(CStr(Aliases.pageLogin.txt_Username))

'--Now, I have to make it as Tanya suggested, but this is only for the existed objects.

Log.Message(Aliases.pageLogin.txt_Username.MappedName)

Actually, it would be great if the script with CStr works.

Thanks.
dbattaglia
Contributor
12 years ago
Hallo,

I have a clarifying question about David's answer #7 in this thread.

How/why does the Eval() function convert the string into an object reference?

Reading the MSDN definition of this function, it sounds like Eval is a sort of interrogation function, not a conversion function.

Thanks in advance!

Daniel
dbattaglia
Contributor
12 years ago
Can someone at SmartBear answer my question from last week please?

Thanks!
dbattaglia
Contributor
12 years ago
Wow, thanks a bunch Alexei!

Is there documentation on this somewhere that I could read?

In other words, how did you figure all that out?

Thanks again.

Daniel
AlexKaras
Community Hero
12 years ago
Hi Daniel,

> In other words, how did you figure all that out?

Mostly from the MSDN (and maybe a little bit from the further experience).

Glad that my explanation helped...

Forum Discussion

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

20 Replies

Recent Discussions

Trial license

Testcomplete issue with Java17 ( Javax Swing applications)

Can not open "Mapped Objects" and "Aliases" window at the same time

Related Content

Surpressing warnings?

OCR Checkpoint posting a warning

Converting UTC TimeDate in an Excel file