Jw_cad 情報交換室

Jw_cad 情報交換室－その３ New

　JWW についての情報交換の場としてお使いください
初心者の方などのご相談は Jw_cad 相談室－その２をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください

2009年9月以前の発言は過去ログのページからご覧ください。

それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。

┃ ┃ ┃ ┃ ┃ ┃ ┃ ┃ ┃

503 / 1500 ←次へ　｜　前へ→

Re:ファイル名中の図面番号を全部ずらす

haribo - 23/5/16(火) 17:01 -

▼卯之介さん：

コメントを頂きありがとうございます。

バッチファイルについては私自身が
あまり詳しくないので不正確な点が
あるかもしれませんが、下記の理解で
良いでしょうか。

このスクリプトを利用することで、
連番を考慮したファイル名でリネーム
することができるということですよね。

ちなみに、私自身も図面番号がズレて
しまうことがあり、その時は下記の通り
運用しています。

【私の運用】
　・ファイルマネジャ(ファイラ?)として
　　Free Commanderというツールを別途
　　インストールして使用している。
　　(Windows標準のエクスプローラは使用しない)

　・このFree Commanderの標準機能を使用して、
　　JWCADのファイルをリネームする。
　　(多くの変数があり、連番をつけることが可能)

　・Free Commanderの説明は下記が参考に
　　なるかと思います。
　　　https://www.vector.co.jp/soft/winnt/util/se504503.html

>>　　　【例】
>>　　　　・変更前
>>　　　　　　A10_平面図_1階.jww
>>　　　　　　A11_平面図_基準階.jww
>>
>>　　　　・変更後
>>　　　　　　A10_平面図_1階.jww
>>　　　　　　A11_平面図_2階.jww　←★追加
>>　　　　　　A12_平面図_3階.jww
>
>「inc.bat」を実行し、"11"を入力すると11以降を1増やします。
>拡張子jww、図面番号はファイル名の2文字目と3文字目に整数で書かれている場合の決め打ちのスクリプトです。図面と同じフォルダに置いて実行してください。
>
>【inc.bat】
>set /p inc="挿入する番号を入力してください... "
>dir /b /O:-N *.jww >dir.txt
>
>jgawk -f inc.awk dir.txt %inc%
>
>【inc.awk】
>BEGIN{
>inc=ARGV[2];ARGV[2]=""
>}
>
>{
>pre = substr($0,1,1)
>num = substr($0,2,2)+0
>sfx = substr($0,4)
>
>if(inc<=num){
> num++
> rename=sprintf("ren %s %s%02d%s\n",$0,pre,num,sfx)
> system(rename)
> }
>}
>
>--------
>以下は番号を削除して間を詰めるスクリプトです。
>
>【dec.bat】
>set /p dec="削除する番号を入力してください... "
>dir /b /O:N *.jww >dir.txt
>
>jgawk -f dec.awk dir.txt %dec%
>
>【dec.awk】
>BEGIN{
>dec=ARGV[2];ARGV[2]=""
>}
>
>{
>pre = substr($0,1,1)
>num = substr($0,2,2)+0
>sfx = substr($0,4)
>
>if(dec<num){
> num--
> rename=sprintf("ren %s %s%02d%s\n",$0,pre,num,sfx)
> system(rename)
> }
>}