- PR -

2つ異なるFTPオブジェクトでOpenLog

1
投稿者投稿内容
にぃにぃ
ベテラン
会議室デビュー日: 2006/10/19
投稿数: 70
投稿日時: 2008-03-06 09:27
BASP21を使用して２つのＦＴＰオブジェクトを作成し、異なるディレクトリ先
(異なるＩＤ／ＰＷＤ要）のファイルをＧＥＴする処理ですが、
OpenLogをつかって同じログファイルにログを書込みたいのです。
２つの異なるディレクトリ先のファイルは正常にＧＥＴできますが、
同じファイルにログを書き込む設定をするとエラーとなります。

Set ftp1=CreateObject("basp21.FTP")
Set ftp2=CreateObject("basp21.FTP2)

rc1 = ftp1.OpenLog(FtpLogFileName, 1)
rc2 = ftp2.OpenLog(FtplogFileName, 1)←ここで０以外（異常）が返って来ます

以下は正常に動作します。rc2・・行をコメントアウトすることで
回避していますが、ログを出したいところです。。。
お手数ですが、ご教授お願いできますでしょうか。
にぃにぃ
ベテラン
会議室デビュー日: 2006/10/19
投稿数: 70
投稿日時: 2008-03-06 11:32
すいません。コードの追記ミスがありましたので、訂正します。

Set ftp1=CreateObject("basp21.FTP1")
Set ftp2=CreateObject("basp21.FTP2")

rc1 = ftp1.OpenLog(FtpLogFileName, 1)
rc2 = ftp2.OpenLog(FtplogFileName, 1)←ここで０以外（異常）が返って来ます
にぃにぃ
ベテラン
会議室デビュー日: 2006/10/19
投稿数: 70
投稿日時: 2008-03-06 11:32
すいません。コードの追記ミスがありましたので、訂正します。

Set ftp1=CreateObject("basp21.FTP1")
Set ftp2=CreateObject("basp21.FTP2")

rc1 = ftp1.OpenLog(FtpLogFileName, 1)
rc2 = ftp2.OpenLog(FtplogFileName, 1)←ここで０以外（異常）が返って来ます
1

スキルアップ／キャリアアップ（JOB@IT）