($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
PCOMMでAS/400に接続した場合 goroyoshi さん [ 4月24日(金) 16時15分 ]
PCOMMのTCP/IPのTELNET5250でAS/400に接続設定をした場合に
AS/400側で接続に来たパソコンのIPアドレスを確認する方法はありますでしょうか？

セッションIDが同じにして他のＩＰアドレスのパソコンからの接続を防げないかと考えており
良い方法はないかと模索中です。

よろしくお願いいたします。
RE:PCOMMでAS/400に接続した場合 柴田　政広 さん [ 4月28日(火) 9時14分 ]
たぶん　クアトロさんで拾ったソースだったと思うけど・・・

　　　　　　　　　PGM　　　　　　　　PARM(&IP)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&DEV_INFO)　TYPE(*CHAR)　LEN(1121)　　　　　　　　　　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&VAR_LEN)　TYPE(*DEC)　LEN(4　0)　VALUE(1121)　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&FORMAT_NAM)　TYPE(*CHAR)　LEN(8)　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&DEV_NAM)　TYPE(*CHAR)　LEN(10)　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&ERR_CD)　TYPE(*CHAR)　LEN(32)　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　DCL　　　　　　　　VAR(&IP)　TYPE(*CHAR)　LEN(15)　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　MONMSG　　　　　MSGID(CPF0000)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　RTVJOBA　　　　JOB(&DEV_NAM)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　CHGVAR　　　　　VAR(&FORMAT_NAM)　VALUE('DEVD0600')　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　CALL　　　　　　　PGM(QDCRDEVD)　PARM((&DEV_INFO)　(&VAR_LEN)　+　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　　　　　(&FORMAT_NAM)　(&DEV_NAM)　(&ERR_CD))　　　　　　　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　CHGVAR　　　　　VAR(&IP)　VALUE(%SST(&DEV_INFO　877　15))　　　　　　　　　　　　　　　　　
　　/*　　　　　SNDPGMMSG　　MSG(&IP)　　　　*/　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　ENDPGM　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

初期プログラムの中で実行して　登録のIPアドレス以外なら　SIGNOFF　する・・・とか

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目