FTPサーバ向けのアップロードについて、同名ファイルが上書かれることを抑制したい。

Question

FTPサーバ側の所定フォルダへ毎回同じ名前のファイルがアップロードされる仕組みがあります。サーバ側の処理の関係で、FTPによって配置されるファイルは　同名である必要がありますが、当該機能の利用者が複数いる状況を鑑み、上書きを抑制する策を投じたいです。
FtpWebRequest　にそのようなオプションは　あるのでしょうか？

Protected Sub btnFileUpload_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnFileUpload.Click

        If FileUpload1.HasFile Then

            Dim now As DateTime = DateTime.Now
            Dim Path As String = "C:\temp\" & now.ToString("yyyyMMddHHmmss") & "\"
            Dim fileName As String = FileUpload1.PostedFile.FileName
            Dim filePath As String = Path & fileName

            System.IO.Directory.CreateDirectory(Path)
            FileUpload1.SaveAs(filePath)

            'アップロード先のURI
            Dim reqUri As New Uri("ftp://XX.XX.XX.XX/rcv/abcdefg.txt")

            Dim ftpReq As FtpWebRequest = FtpWebRequest.Create(reqUri)

            'アップロードに設定
            ftpReq.Method = WebRequestMethods.Ftp.UploadFile

            'ユーザー名とパスワードを設定
            ftpReq.Credentials = New NetworkCredential("9999999", "hogehoge")

            '要求の完了後に接続を閉じる
            ftpReq.KeepAlive = False

            'ASCIIモードで転送する
            ftpReq.UseBinary = False

            'PASVモードを無効にする
            ftpReq.UsePassive = False

            'ファイルをアップロードするためのStreamを取得
            Using reqStrm As Stream = ftpReq.GetRequestStream()

                'アップロードするファイルを開く
                Using fStrm As New FileStream(filePath, FileMode.Open, FileAccess.Read)
                    'アップロードStreamに書き込む
                    Dim buffer(1023) As Byte
                    While True
                        Dim bSize As Integer = fStrm.Read(buffer, 0, buffer.Length)
                        If bSize = 0 Then
                            Exit While
                        End If
                        reqStrm.Write(buffer, 0, bSize)
                    End While
                End Using

            End Using

            lblMsg.ForeColor = Drawing.Color.Blue
            lblMsg.Text = "ファイルのアップロードが完了しました。"
        End If

    End Sub


End Class

Comments

[退会済みユーザー]

質問がアバウトすぎます。
「そのようなオプション」とはどのようなオプションで、何が指定できて、各指定ごとに既存のどんな動作が具体的にどういう条件でどうなるものですか？
それで実装が正確にできるレベルで具体的に記述してください。

また、FtpWebRequestは以下で解説されています(.NET Framewrok 4.8)。
https://docs.microsoft.com/ja-jp/dotnet/api/system.net.ftpwebrequest?view=netframework-4.8
そのどの辺が不明なのでしょうか？具体的に引用してください。

[saya24]

dameo様　ご支援ありがとうございます。
>「そのようなオプション」とはどのようなオプションで、

ローカルからアップロードされるファイルの同一ファイル名が、サーバの所定フォルダ（仮想jフォルダ）に実在していない場合に限りアップロードを行いたく、同一ファイルが存在していたら、Exceptionを検知する動作はできないか？　というのが希望です。サーバ上のファイルを上書きしたくないの一言ですが、相変わらず　的はずれな回答を致しておりましたら　申し訳ありません。

記事の紹介ありがとうございます。
アップロード前に　当該ファイルのダウンロードを試み、存在していないことを検知したらアップロードへ進めばよい、ということですかね．．．

分かりが悪くすみません。

[退会済みユーザー]

質問の訂正依頼をしたつもりなのですが…
そして、そのコメントにも
・何が指定できるのか？
・各指定ごとに既存のどんな動作に影響するのか？
・各指定ごとに既存の各動作にどういう条件で影響するのか？
・各指定ごとに既存の各動作が各条件でどう変わるのか？
記述されていません。あなたが最終的にやりたいことをいくら書いても仕方ないです。

FtpWebRequestの件では、私は回答をしていません。
当然読んでいるはずのWebページのどこが疑問なのかを聞いているだけです。

Answer 1

FTPは単純な仕組みなので、合わせ技でやるしかない気はします。ご質問から最終的にどうなれば目的が達成できるかは分かりませんが、

• アップロード中のファイルをダウンロードされたくない
• 同名ファイルで同時にアップロードされたくない

このへんでしょうか？

1. アップロード用のバッティングしないユニークなファイル名でアップロード
2. 元ファイルを削除orバックアップ用の名前にリネーム（ここはよく考えてください）
3. アップロードしたファイルを元ファイル名にリネーム

のような手順であれば、とりあえず同時に書き込まれたり、中途半端なファイルをダウンロードされるというのは防げると思います。