VBSで便利なプログラムを作れスレ 2 (853ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

16(1): 2018/10/14(日)22:40:08.22 ID:jaACV9Z5(6/7)調 AAS
>>14

35 名前：デフォルトの名無しさん[] 投稿日：2018/10/06(土) 23:14:35.47 ID:D/QKYSoz
>>34
https://image.space.rakuten.co.jp/lg01/93/0000210793/37/img21d226e09rt3b3.jpeg

---

152(1): 2018/10/28(日)19:45:45.22 ID:7A/ftR2X(1/10)調 AAS
>>151
荒らすなクズ

---

166: 2018/10/28(日)21:44:05.22 ID:W0ffeEpC(8/11)調 AAS
>>164
荒らすなピラフ

---

201(1): 2018/11/03(土)10:57:43.22 ID:qByGMNwm(7/14)調 AAS
それとはまったく関係ないんだけどプログラミング中に聴く音楽でおすすめ教えて

---

598(1): 2019/07/27(土)14:48:21.22 ID:Yj8eiwcB(3/4)調 AAS
　 　　　 　　 　＿＿＿_
　　　　　　 ／ ＼　　／＼　 ｷﾘｯ
.　　　　　／　（ー） 　（ー）＼
　　　　／　　 ⌒（__人__）⌒ ＼　　　『文字列に丁度いい具合にグリッチを入れて超かっこいい文字列を作るプログラム』
　　　　|　　 　　　|r┬-|　　　　|
　　　　 ＼　　　　 `ー'´　　 ／
　　　　ノ　　　　　　　　　　 　＼
　 ／´　　　　　　　　　　　　 　　ヽ
　|　　　　ｌ　　　　　　　　　　　　　　＼
　ヽ　　　 -一''''''"~~｀`'ー--､　　　-一'''''''ー-､.
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒))

---

832: 2022/12/12(月)12:24:10.22 ID:GkD26MT/(1)調 AAS
とりあえずこれで小数点以下のwavファイルの長さ取れたわ、ffprobe.exe必須

Dim sCmd, Exec, result
sCmd = ws.CurrentDirectory & "\" & "ffprobe.exe -loglevel quiet -show_streams " & ws.CurrentDirectory & "\" & "hoge.wav"
Set Exec = ws.Exec("cmd /c " & sCmd & " 2>&1 | findstr -i duration=")
result = Split(Replace(Exec.StdOut.ReadAll, vbCrLf, ""), "=")
WScript.Echo result(1)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.041s