Converting Scriptomatic VBS to AU3:

[rudi]

Hi.

I'm just excercising with some conversions of Scriptomatic 2 VBS scripts. Works quite nice.

Two things I don't know:

1.) The examples seem all to start with this line:

On Error Resume Next

This probably means, "if something goes wrong, just ignore it and proceed with the next entry", right? Howto do such a thing in Autoit?

2.) For example in Win32_DiskDrive (and many others from Scriptomatic) there are some entries, that need "preprocessing" before using the values for Echo output:

strCapabilities = Join(objItem.Capabilities, ",")
  WScript.Echo "Capabilities: " & strCapabilities

Q2.1: Howto do so in Autoit?

Q2.2: Howto check, if the next "Object.Something" will need such an action?

Regards, Rudi.

[GEOSoft]

Hi.

I'm just excercising with some conversions of Scriptomatic 2 VBS scripts. Works quite nice.

Two things I don't know:

1.) The examples seem all to start with this line:

On Error Resume Next

This probably means, "if something goes wrong, just ignore it and proceed with the next entry", right? Howto do such a thing in Autoit?

2.) For example in Win32_DiskDrive (and many others from Scriptomatic) there are some entries, that need "preprocessing" before using the values for Echo output:

strCapabilities = Join(objItem.Capabilities, ",")
  WScript.Echo "Capabilities: " & strCapabilities

Q2.1: Howto do so in Autoit?

Q2.2: Howto check, if the next "Object.Something" will need such an action?

Regards, Rudi.

You have to add your own error handling and there are good examples of COM error handlers in the Example scripts.

Why bother when it's already done for you with the AutoIt version of Scriptomatic?

The compiled version is here

AutoIt scriptomatic.

[rudi]

You have to add your own error handling and there are good examples of COM error handlers in the Example scripts.

On my way

Why bother when it's already done for you with the AutoIt version of Scriptomatic?

The compiled version is here

AutoIt scriptomatic.

Great work, impressive! Thanks for that URL.

Anyways, I'd like to know howto do these two:

CODEstrCapabilities = Join(objItem.Capabilities, ",")
  WScript.Echo "Capabilities: " & strCapabilities

Q2.1: Howto do so in Autoit? (that Join...)

Q2.2: Howto check, if the next "Object.Something" will need such an action?

The MSDN Library is describing a lot of such stuff. And I want to write some code to transform these examples to AI3. But this fails, when such a "Join" is required.

Regards, Rudi.

[GEOSoft]

Anyways, I'd like to know howto do these two:

CODEstrCapabilities = Join(objItem.Capabilities, ",")
  WScript.Echo "Capabilities: " & strCapabilities

Q2.1: Howto do so in Autoit? (that Join...)

Q2.2: Howto check, if the next "Object.Something" will need such an action?

The MSDN Library is describing a lot of such stuff. And I want to write some code to transform these examples to AI3. But this fails, when such a "Join" is required.

Regards, Rudi.

#include <array.au3>
Dim $Array[3]
$Array[0] = "Mr."
$Array[1] = "John"
$Array[2] = "Doe"
$sStr = _Join ($array)
MsgBox(0, "Test Echo", "Contents = " & @CRLF & $sStr)

Func _Join($aArray)
   Return _ArraytoString($aArray, " ")
EndFunc

[rudi]

Hi.

#include <array.au3>
$sStr = _Join ($array)

Thanks!

I had searched the Help File of Autoit v3.2.12.1 for "Join" and "_Join", but nothing was listed. (Other functions in ARRAY.AU3 are listed )

So this basically means, that e.g.

Win32_DiskDrive, objItem.Capabilities, the "Capabilities" is an array of values?

I'm going to understand WMI and that object stuff better, slowly.

Regards, Rudi.

[GEOSoft]

Hi.

Thanks!

I had searched the Help File of Autoit v3.2.12.1 for "Join" and "_Join", but nothing was listed. (Other functions in ARRAY.AU3 are listed )

So this basically means, that e.g.

Win32_DiskDrive, objItem.Capabilities, the "Capabilities" is an array of values?

I'm going to understand WMI and that object stuff better, slowly.

Regards, Rudi.

You have it pretty well right. Join() is a concantenation function and as far as I know it onlt works with arrays so how you handle it will depand on how you intend to displat the data. I could just as easily used

Func _Join($aArray)
   Local $sRtn = "Results:" & @CRLF
   For $i = 0 To Ubound($aArray)-1
      $sRtn &= @Tab & $aArray[$i] & @CRLF
   Next
   Return StringStripWS($sRtn, 2)
EndFunc

Echo can be replaced with a MsgBox() or ConsoleWrite() &Etc.