0

Windows のローカル ディレクトリ (サーバー上ではなく) から AS/400 IFS にファイルをコピーしたいとします。cmd を使用してこれを行うにはどうすればよいですか? ハード ドライブ マッピングや iSeries ナビゲーターなどの他の方法があることは知っていますが、ここでの目的は、VBA を使用してそのようなコマンドを実行し、誰かがボタンをクリックするとターゲット ファイルが IFS に複製されるようにすることです。cmd で直接 copy コマンドを使用しようとしましたが、ユーザー プロファイルとパスワードが指定されていなかったため失敗しました。cmdでコマンドを使用してこれを達成することは可能ですか? どのように？プロセス中にウィンドウがポップアップして、ユーザー名とパスワードを入力するように求められても問題ありません。

4

2 に答える 2

3

VBAのオプションは次のとおりです。

  • FTP経由でIFSにアップロードします。
  • SMB（ iSeries Netserver ）を介してIFSにアップロードします。
  • データベースにアップロードし、[クライアント]アクセス自動化を使用してIFSにコピーします。

FTPの例

ftpスクリプトファイルを作成して実行できます。これが私が通常バッチファイルでそれを行う方法です：

@echo off
echo open AS400_HOSTNAME > ftp.cmd
echo user AS400_USERNAME AS400_PASSWORD >> ftp.cmd
echo ascii >> ftp.cmd
echo cd AS400_PATH >> ftp.cmd
echo put PC_FILENAME AS400_FILENAME >> ftp.cmd
echo quit >> ftp.cmd
ftp.exe -n -s:ftp.cmd

NetServerの例

ドライブをiSeriesNetserverにマッピングするときに、ユーザー名とパスワードを強制することができます。

NET USE Z: \\as400\share /USER:username password
COPY FILE.TXT Z:\DIR
NET USE Z: /DELETE
于 2012-05-17T17:09:04.733 に答える