検索条件
全2件
(1/1ページ)
ReadFile = "F:\みんなのうた_02281654.MPG" OutPutFile = "F:\test.avi" ID = Exec("c:\online\aviutl\aviutl.exe") //バッチのクリア ClkItem(ID, "ファイル\バッチ出力") ClkItem(GetID("バッチ出力"), "すべて削除") if GetID("OK") then ClkItem(GetID("AviUtl"), "OK") ClkItem(GetID("バッチ出力"), "閉じる") ////////ここからループ //読み込み ClkItem(ID, "ファイル\開く (Ctrl+O)") SendStr(GetID("ファイルを開く"), ReadFile, 1, TRUE) ClkItem(GetID("ファイルを開く"), "開く") while ClkItem(ID, "ファイル\AVI出力 (Ctrl+S)") <> TRUE Sleep(1) wend SendStr(GetID("名前を付けて保存"), OutPutFile, 1, TRUE) ClkItem(GetID("名前を付けて保存"), "バッチ登録") //同名のファイルが存在したら強制上書き if GetID("はい") then ClkItem(GetID("名前を付けて保存"), "はい") ////////ここまでループ ClkItem(ID, "ファイル\バッチ出力") ClkItem(GetID("バッチ出力"), "開始") Sleep(1) while GetID("バッチ出力") <> -1 Sleep(1) wend Sleep(1) ClkItem(ID, "終了")