07/03/18 05:01:55 9cpA2I4U0
フォルダ内の動画ファイルのコーデック・AVIのバージョン、フレームレートを調査し、
条件に該当するファイルだけを、変換プログラムに送るスクリプト
集めて見ないで溜まっている動画ファイルを、DivX再生機能付きDVDプレイヤーで再生するために開発しました。
言語はuwsc
// ここから
public sinkupass="F:\freeware\真空\SinkuHadouken.exe" // 真空波動研.exe の場所(フルパス) 各自の環境で変更
public avimuxpass="F:\freeware\AVI-Mux_GUI-1.17.7\AVIMux_GUI.exe" // AVIMux_GUI.exe の場所(フルパス) 各自の環境で変更
public toMuxCount
public toMuxFile[100]
srcDir="K:\Down\新しいフォルダ (7)" // 調べるファイルのあるディレクトリ
dstDir="M:\tst" AVIMuxで変換したファイルの収納先
toMuxCount=0
sinkuID=getID("","TSHDK_MAIN")
ifb sinkuID<1 THEN
exec(sinkuPass)
sleep(2)
sinkuID=getID("","TSHDK_MAIN")
endif
filecount=GETDIR( srcDir,"*.avi")
for i=0 to filecount-1
filename=GETDIR_FILES[i]
print filename
checkAviOne(sinkuID,srcDir,dstDir,filename)
next
filecount=GETDIR( srcDir,"*.wmv")
for i=0 to filecount-1
filename=GETDIR_FILES[i]
MediaCoderID=GETID("MediaCoder","#32770")
DROPFILE(MediaCoderID,srcDir,filename)
next
(続く）