Testertools Forum

1. bradymc
   Member

   Reputation:68

    

   I will post any usefull tips as I run across.

   The new RecordRowCount as announced in the update notes is actually "RecordSetRowCount" here is a typical use for it.

   db = OpenRecordSet("Name of data sheet")
   Var = RecordSetRowCount(db)

   It works great!

   ================================================
   "WaitForExists" also works good. Example:

   <Lg = Window("Scr Name").EditBox("editbox3").WaitForExists(NNN)
   If Lg = "False" then>

   Notice it returns either "True" or "False"
   I requested an "IfExists" Statement but they said to use this instead.

   ===============================================
   The CheckExists" looks like this now:
   <Window("Scr Name").EditBox("editbox3").CheckExists(True, "")>
   If the window does not exist the run is terminated. Change the True to False and it gives a warning only.

   ===============================================
   To get data from and object here is one way using the latest version:

   <Num = Window("Scr Name").HTMLLink("Data").Property("Inner Text")>

   The HTMLLink is the Control type.
   ===============================================

   Than's about it for now.

   Good Luck!

   Thought for the day: "ARRAYS ARE COOL!"

   Posted 1 year ago #

2. bradymc
   Member

   Reputation:68

    

   I discovered that it is possible to synchronize with the IE avatar in the upper righthand corner to know when a process is finished. I use the "control order" parameter since it is different for the active & inactive state.

   Perhaps someone can use this.

   Posted 1 year ago #

3. bradymc
   Member

   Reputation:68

    

   I discovered that it is possible to synchronize with the IE avatar in the upper righthand corner to know when a process is finished. I use the "control order" parameter since it is different for the active & inactive state.

   Perhaps someone can use this.

   Posted 1 year ago #

4. bradymc
   Member

   Reputation:68

    

   recently discovered that it is possible to initiate 2 or more instances of the same datasheet at the same time within one script. It makes it easier to collect and compare data in Excel spreadsheets. For example:

   db = OpenRecordSet("Datasheet1")
   db1 = OpenRecordSet("Datasheet1")
   db2 = OpenRecordSet("Datasheet1")
   db3 = OpenRecordSet("Datasheet1")

   They all function independently.

   Posted 1 year ago #

5. bradymc
   Member

   Reputation:68

    

   Here's a useful little bit of code, at least for me it is.

   Say you want to set a dropdown box to a specific item. I use a "Function" to convert a key number to the list item like:
   Code:

   If num = 1 then
      item = "Hello"
   Elseif num = 2 then
      item = "Goodbye"
   End If

   This will allow running your main script from a driver spreadsheet(Data-Driven) approach.

   Then the variable "item" can be passed to this snipit:

   Code:

   LBText = Window(Screen).ListBox(LB1).Property("Inner Text")        ' Get ListBox Items
   L = Length(LBText)   ' Find the lenght of ListBox items list
   L = L + 1      
   L1 = Length(item)    ' L1 is the length of the item you want to select
   doIt = 0      ' doIt is just a flag
   for i = 1 to L   ' The "For/Next" loop will compare the item to the item list to see if it is contained within it and sets the "doIt" flag if it finds it.
    If i + L1 <= L Then
     FndText = Mid(LBText, i, L1)
     If FndText = item then
      doIt = 1
      Exit For
     End If
    End If   
   Next
   if doIt = 1 Then...

   This seems to be an effective way of doing an "Instring" function, which is not available in QAWP. Though the new "Parse" function is also very useful.

   I hope this might help someone.

   Posted 1 year ago #

RSS feed for this topic

Reply »

You must log in to post.