|
■No103124 (魔界の仮面弁士 さん) に返信
魔界の仮面弁士 さん多岐わたり回答・助言ありがとうございます。
色々と試しすぎて、コードにちょっと自身がありませんが、エラーが沢山発生
しましたので、ここから分かることが見つかればと思っています。
おんぶにだっこのようなことになってしまいましたが、さっぱり突破口がありません。
皆さんお忙しいと思いますが宜しくお願います。
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
１．個々の回答についての対応
２．FluentFtpのコードを書いてみましたが・・・
３．FtpWebRequesでの再試み
４．コマンドプロンプトのFtpの結果
５．その他の質問
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
１．個々の回答について
>> VB.netは初心者ですが、いま、Dobon.netサイトのコードを参考にFTPのアップロードを作成しています。
>あちらの掲示板では無く、wankuma での質問なんですね。まぁ、こちらへの投稿でも問題は無いです。
>現時点では、原因がコードなのかサーバーなのかライブラリなのかも分からないですしね。
→質問はこのサイトしか思いつかなかったので、問題があったならごめんなさい。
>その他の FTP クライアントツール(WinSCP とか)から
>接続する分には、特に問題が出ていない感じでしょうか?
→ FTPツール(FFFTP）では、問題無く動作しています
>FtpWebRequest には幾つかの問題があり、新規開発での利用は推奨されていないそうです。
→ネットにもそのようなことが書かれていましたので、FluentFTPでコーディングしてみましたが、
安定した動作がえられませんでした。後述参照
>> 因みに、Ftpは、FC2のFTPで、PASVモードらしいのですが、
>> 大雑把な説明で申し訳ないのですがどなたかわかる方、お教えください、宜しくお願います
>FC2 の契約を結んでいないので、細かい事は分かりませんが、
>サーバー側でアクセスログをとることは可能でしょうか?
>https://help.fc2.com/lite/manual/group229/3632
→フリーのFc2.comの為、見つけられませんでした。またスキル以上の為、トレースやログ解析は
皆目検討が付きませんので、ちょっと保留です。
>> 'PASVモードを無効にする
>Windows Firewall あるいはルーター側で塞がれているポートは無いでしょうか。
>データ転送に使われるポートの割り当て範囲も確認してみてください。
>https://yurakawa.hatenablog.jp/entry/2017/09/04/202518
→スキル以上の為、ちょっと保留です
>セキュリティソフトが原因で通信がブロックされ、タイムアウト扱いになることはしばしばありますので、
>お使いのセキュリティソフトに何か通知が来ていないかも確認してみた方が良いかも。
→スキル以上の為、ちょっと保留です。この辺の理解があると、解決も近いと思うのですが淋しい
>System.Net.FtpWebRequest を使って、FC2 のサイトに
>ファイルをアップロードする記事を見つけました。
>https://scorpion140309.blog.fc2.com/blog-entry-205.html
>ftp://example.com/dir/file.txt では失敗したので、
>ftp://example.com//dir/file.txt だと成功したとか、
>ftp://example.com/var/www/html/dir/file.txt が必要なケースがあるとか、
>アスキーモードの代わりにバイナリモードでの転送を試したら安定した
>といった情報が記載されています。
→全て試みましたが、
Dim ftpReq As System.Net.FtpWebRequest = CType(System.Net.WebRequest.Create(u), System.Net.FtpWebRequest) の行で
エラーになります。
>C# ではありますが、検証用のソースコードも公開されていますね。
>https://scorpion140309.github.io/arc/C_Sharp/FTP_test_170629a_src.zip
→C#は勉強不足で、壁が高いでした
２．FluentFtpのコードを書いてみましたが・・・
正常動作する場合もあるのですが、エラーになることが多いです。
また、PASV等の設定がありませんが無視して良いのか気になります。
参考のサイトから作成した結果になりますが
2.1 エラー箇所１でのエラー内容
例外がスローされました: 'System.TimeoutException' (FluentFTP.dll の中)
errTimed out trying to connect!
2.2 エラー箇所２でのエラー内容
例外がスローされました: 'FluentFTP.Exceptions.FtpException' (FluentFTP.dll の中)
errError while uploading the file to the server. See InnerException for more info.
気になるサイトがありました。
https://atmarkit.itmedia.co.jp/bbs/phpBB/viewtopic.php?topic=39466&forum=7&start=8
以下FluentFtpのコード
Dim var_Host As String = "Servertest.web.fc2.com"
Dim var_Username As String = "Usertest"
Dim var_Password As String = "Passwordtest"
Dim var_ServerTestDirectory1 As String = "/Log"
Dim var_ServerTestDirectory2 As String = "C:\temp\temp.txt"
Dim var_ServerTestDirectory3 As String = "/Log/temp.txt"
' FTP クライアントの作成
Dim client As New FtpClient(var_Host)
'ログイン認証の指定をしない場合は、"anonymous" が使われる。
client.Credentials = New NetworkCredential(var_Username, var_Password)
Try
' サーバーへの接続を開始
client.Connect()
If client.IsConnected Then
For Each item As FtpListItem In client.GetListing("/Log") 'エラー箇所１
Console.Write(item.FullName & vbCrLf)
Next
If IO.File.Exists(var_ServerTestDirectory2) Then
'MsgBox("Upload")
Dim ftpstatus = client.UploadFile(var_ServerTestDirectory2, 'エラー箇所２
var_ServerTestDirectory3)
MsgBox("OK" & vbCrLf)
End If
End If
Catch ex As Exception
Console.Write("err" & ex.Message)
Finally
' 切断。またね！
client.Disconnect()
'破棄（切断も行う）。
client.Dispose()
MsgBox("Disconnect")
End Try
３．FtpWebRequesでの再試み
3.1不安定なコード部分
'FtpWebResponseを取得
Dim ftpRes As System.Net.FtpWebResponse = CType(ftpReq.GetResponse(), System.Net.FtpWebResponse)
【エラー結果】
例外がスローされました: 'System.Net.WebException' (System.dll の中)
リモート サーバーがエラーを返しました: 227 Entering Passive Mode (xxx,xxx,xx,xx,xxx,x).
・気になるサイトの記事がありました。
https://atmarkit.itmedia.co.jp/bbs/phpBB/viewtopic.php?topic=39466&forum=7&start=8
引用
「ループ開始時にNetworkCredentialインスタンスを一つ作成し、
それをすべてのFTPWebRequestで共有するようにするのが正しい方法です。」
→実行したところ問題が解決したらしいですが、何処をどうしたのかが全くわかりません。
認証の問題と感じたのですが具体的に説明をいただければ幸いです。
以下FtpWebRequesのコード（抜粋）
'FtpWebRequestの作成
Dim ftpReq As System.Net.FtpWebRequest = CType(System.Net.WebRequest.Create(u), System.Net.FtpWebRequest)
'ログインユーザー名とパスワードを設定
ftpReq.Credentials = New System.Net.NetworkCredential(var_Username, var_Password)
'MethodにWebRequestMethods.Ftp.DownloadFile("RETR")を設定
ftpReq.Method = System.Net.WebRequestMethods.Ftp.DownloadFile
'要求の完了後に接続を閉じる
ftpReq.KeepAlive = False
'ASCIIモードで転送する
ftpReq.UseBinary = False
'PASSIVEモードを無効にする
ftpReq.UsePassive = True
'FtpWebResponseを取得
Dim ftpRes As System.Net.FtpWebResponse = CType(ftpReq.GetResponse(), System.Net.FtpWebResponse)
'ファイルをダウンロードするためのStreamを取得
Dim resStrm As System.IO.Stream = ftpRes.GetResponseStream()
'ダウンロードしたファイルを書き込むためのFileStreamを作成
Dim fs As New System.IO.FileStream(
upFile, System.IO.FileMode.Create, System.IO.FileAccess.Write)
'ダウンロードしたデータを書き込む
Dim buffer(1023) As Byte
While True
Dim readSize As Integer = resStrm.Read(buffer, 0, buffer.Length)
If readSize = 0 Then
Exit While
End If
fs.Write(buffer, 0, readSize)
End While
fs.Close()
resStrm.Close()
'FTPサーバーから送信されたステータスを表示
Console.WriteLine("{0}: {1}", ftpRes.StatusCode, ftpRes.StatusDescription)
'閉じる
ftpRes.Close()
MsgBox("OK")
Err:
Console.Write(Err.Description)
End Sub
４．FTPの操作内容
4.1 dirコマンド実行でタイムアウトになる
こんな現象からわかることはありますか？
以下コマンド実行例
C:\Windows\system32>ftp
：
ログイン部分は割愛
：
230 User acadheart logged in
ftp> lcd C:\temp
ローカル ディレクトリは現在 C:\temp です。
ftp> !dir
ドライブ C のボリューム ラベルは Windows です
ボリューム シリアル番号は E657-6947 です
C:\temp のディレクトリ
2024/05/27 17:11 <DIR> .
2024/05/27 17:11 <DIR> ..
0 個のファイル 0 バイト
2 個のディレクトリ 230,915,448,832 バイトの空き領域
ftp> dir
200 PORT command successful
425 Unable to build data connection: Connection timed out 'タイムアウトされた リストが表示されない
５．その他の質問
実行形式の希望は、EXEファイルのみで動作することなのですが、Fluentftpを使用したの場合は、
Fluentftp.dllとセットとなると思います。EXEに組み込む事は可能なのでしょうか？
|
Ftpのアップロード
/初心者 (24/05/22(Wed) 17:28) #103121 