![820x312 820x312]()
杏ちゃんカワイイ…コメディセンス良いし 声力もなかなか
殺陣はもう少しだけど
『ごちそうさん』では好きにはならなかったのに
時代劇で好きになっちゃった…ホワン♥
----------------------------------------------
今の現場に、未経験の若い人が入った
デザイナーではなく、システム関連要員
未経験…まぁ 誰しも『最初』は未経験なので
色々説明するのですが…
まぁ
デザイナーさんは、メールの『全ては』読んでいないとか
例えば
こんな記事があります(実際はメールでの例えでしたが)
![Website_image00300203_205527_2 Website_image00300203_205527_2]()
-----
デザイナーさんは、『システム関連のメールは』この程度しか読んで無いよ…といった感じ…苦笑
![Website_image00300203_205537_2 Website_image00300203_205537_2]()
そう…
デザイナーさんって『字(特に長文)』を『絵』としてインプットしてんじゃないかな?
と
思う時『あるある』です。
文系、理系で言う『斜め読み力』低めの人が多いしね…
(あっ、みんなが『そうだ』とは言わないです…笑)
----------------------------------
仕事の話しで、こんな説明をしました
例えば
フォルダ名に日付けを付ける処理を依頼されたとします
![Website_image00300203_204616 Website_image00300203_204616]()
普通は…普通に日付けを付ける処理を作ります
![Website_image00300203_204952 Website_image00300203_204952]()
でも
その処理は『どんな時』に『どんな風に』必要か?を
見せてもらえば
実際は
『元になるフォルダ』を『コピー』してから
![Website_image00300203_202316 Website_image00300203_202316]()
とか
すでに『日付け』が付いていたりとか
![Website_image00300203_210621 Website_image00300203_210621]()
そのような状態からの処理になるので
例外処理も数限りなくあるで
エラー処理や処理の分岐はホドホドで良いですが
その『実際』にあうように設計が必要って事です。とか…説明した
![Website_image00300203_204655 Website_image00300203_204655]()
![Website_image00300203_210755 Website_image00300203_210755]()
フォルダ名に日付けを付ける
(Finderスクリプトメニュー用)
業務用に書いた物はそのままは外に出せない契約なので
簡易版
フォルダのリネームに限定しているがkindの所の戻り値が『書類』なら
別の分岐を作ればファイルでもいける
settheFileNameSepto"_"
settheNowTimeto (mydoDateAndTIme(current date)) astext
tellapplication"Finder"
setlistSelectObjtoselectionaslist
endtell
setnumListLineto (countoflistSelectObj) asnumber
setnumLineto 1 asnumber
repeatnumListLinetimes
setaliasDataListLineto (itemnumLineoflistSelectObj) asreference
setobjKindtokindofaliasDataListLine
ifobjKindis"フォルダ" then
tellapplication"Finder"
settheFolderNametonameofaliasDataListLineastext
setnumCntFolderNametothelengthoftheFolderName
settheCopyFolderto (characters (numCntFolderName - 1) thrunumCntFolderNameoftheFolderName) astext
iftheCopyFolderis" 2" then
try
settheFolderNameto (characters 1 thru (numCntFolderName - 2) oftheFolderName) astext
setnumCntFolderNameto (numCntFolderName - 2) asnumber
endtry
endif
settheCopyFolderto (character (numCntFolderName - 8) oftheFolderName) astext
iftheCopyFolderis"_" then
settheDateNumberto (characters (numCntFolderName - 7) thrunumCntFolderNameoftheFolderName) astext
try
settheDateNumbertotheDateNumberasnumber
try
settheFolderNameto (characters 1 thru (numCntFolderName - 9) oftheFolderName) astext
endtry
onerror
endtry
endif
settheNewFolderNameto (theFolderName& theFileNameSep& theNowTime) astext
try
setnameofaliasDataListLinetotheNewFolderName
endtry
endtell
endif
setnumLinetonumLine + 1 asnumber
endrepeat
todoDateAndTIme(theDate)
setyto (yearoftheDate)
setmtomymonthNumStr(monthoftheDate)
setdtodayoftheDate
sethmstotimeoftheDate
sethhtohofsec2hms(hms)
setmmtomofsec2hms(hms)
setsstosofsec2hms(hms)
return (yastext) & myzero1(m) & myzero1(d)
enddoDateAndTIme
tomonthNumStr(theMonth)
setmonListto {January, February, March, April, May, June, July, August, September, October, November, December}
repeatwithifrom 1 to 12
ifitemiofmonLististheMonththenexitrepeat
endrepeat
returni
endmonthNumStr
tosec2hms(sec)
setretto {h:0, m:0, s:0}
sethofrettosecdivhours
setmofretto (sec - (hofret) * hours) divminutes
setsofrettosecmodminutes
returnret
endsec2hms
tozero1(n)
ifn< 10 then
return"0" & n
else
returnnastext
endif
endzero1
「rename-folder-plus-date.zip」をダウンロード
「rename-folder-plus-date.rtf」をダウンロード