PC5250/CA400

12.ＰＣ クライアントから AS/400コマンドを実行するには？

PCクライアントから AS/400 のコマンドを起動するには様々な方法があるが、
決して容易な方法がないのが実情である。

Pcomm の場合

EHLLAPI によって起動する。

クライアントアクセスの場合

RUNRMTCMD を使用する。使用法の詳細はクライアントアクセスのヘルプの｢着信リモードコマンド｣を参照

ＦＴＰの場合

rcmd を使用する。 

   FTP -s:
   open 192.168.1.1
   QSECOFR
   QSECOFR
   quote rcmd DSPLIBL *PRINT
   quit

Chicago の場合

QCmdEexc メソッドを VisualBasicから使用 

Dim As400  As Object
Set As400 = CreateObject("ExcelServer.AS400")
As400.QCmdEexc("DSPLIBL *PRINT")