ActiveX AS/400 Objects - Command

• ActiveX AS/400 Objects - Command

• Use this class to execute native AS/400 commands. No command syntax or security checking is performed within this class and is left to the application programs and operating systems.

• Contains read/write properties:

 

Name		Type		Description
ApplicationName	String		Used within logs and messages. Not required.
AutoMessages	Boolean		Set True to halt and display error messages. Default = false
SystemName	String		Name of AS/400 system. Defaults if blank.
Tag	String		User within logs and messages. Not required.

 

• Contains read-only properties:

 

Name	Type	Description
Message	String	Most recent diagnostic message generated.
RC	Long	Most recent CA/400 dll return code.
Started	Boolean	Denotes connection with SystemName.

 

• Contains method returning a result:

 

Name	Type	Description
Run	Boolean	Call to execute the command passed as a required parameter. Returns True if completed normally. Windows operating system is halted until execution completes.

 

• VB, VBA Command example:

Dim oCMD As ActiveX_AS400.Command

Set oCMD = new ActiveX_AS400.Command

If not oCMD.Run("pwrdwnsys *immed") Then

MsgBox oCMD.Message

End If

2003 - Chouinard & Myhre, Inc.