◆重複せず保存

情報

作者名：五十六
引用元：なでしこプログラム掲示板「関数「重複せず保存」」

概要

命令「保存」をちょっとだけ変えた「重複せず保存」です。
右クリで[新規作成(W)]→[テキスト ドキュメント]とかやってると
「新規テキスト ドキュメント (2).txt」とかになりますよね。
　　　　　　　　　(2)　←これ
要するに何が何でも新規保存したい時に使います。

サンプルプログラム

「てすてす」を「{デスクトップ}テスト.txt」に重複せず保存。//テスト.txt
「テステス」を「{デスクトップ}テスト.txt」に重複せず保存。//テスト (1).txt

//本体

●重複せず保存(AをBに|AをBへ)
　　Aを(JYUFUKU(A,B))に保存。

●重複せずファイル移動(AからBへ|AをBに)
　　Aから(JYUFUKU(A,B))へファイル移動。
　　
●重複せずファイルコピー(AからBへ|AをBに)
　　Aから(JYUFUKU(A,B))へファイルコピー。
　　
●JYUFUKU(A,B)
　　Pass=Bからパス抽出。
　　Filename=(Bからファイル名抽出)の文字列ファイル名変換。
　　Kakutyo=Bから拡張子抽出。
　　Name=FilenameのKakutyoを空に単置換。
　　Hosyu=Name。
　　1の間
　　　　「{Pass}{Hosyu}{Kakutyo}」の存在。
　　　　もし、それ＝いいえならば、抜ける。
　　　　Hosyu=「{Name} ({回数})」。
　　「{Pass}{Hosyu}{Kakutyo}」で戻る。

---

---