5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

パソコンテレビ「GyaO(ギャオ)」総合スレ 33

36 :名無しさん@お腹いっぱい。:2006/04/16(日) 01:21:42
// GyaO_WriteList.js (2005/04/09)
// やってくれること
//  複数の asx.php のアドレスを受け取って rtsp:// のアドレスのリストを作成する
// 使い方
//  wscript.exe Gyao_WriteList.js "asx.phpのアドレス1" "アドレス2" ...
//  成功するとデスクトップ上に GyaO.lst ってファイルが出来るので
//  GASで [ファイル] [LIST読込] とやる
// GEの外部コマンド
//  表示名: なんでもいい
//  実行ファイル: wscript.exe
//  引数: Gyao_WriteList.js {PlayListUri}
//  でもってリストビューで複数選択して右クリックから外部コマンドを実行

var listFile = WScript.CreateObject("WScript.Shell").SpecialFolders("Desktop") + "\\GyaO.lst";
if(WScript.Arguments.Count()==0){
WScript.Echo("引数に asx.php のアドレスを指定しろ (複数可)");
WScript.Quit();
}
var regexp = new RegExp("HREF=\"([^\"]+gyaovod[^\"]+)\"", "m");
try{
var txtStream = new ActiveXObject("Scripting.FileSystemObject").OpenTextFile(listFile,2,true);
var xmlhttp = new ActiveXObject("MSXML2.XMLHTTP");
for(var i=0; i<WScript.Arguments.Count(); i++){
var playlistUrl = WScript.Arguments.Item(i);
xmlhttp.open("GET", playlistUrl, false);
xmlhttp.send("");
var videoUrl = xmlhttp.responseText.match(regexp)[1];
txtStream.WriteLine(videoUrl);
}
}catch(e){WScript.Echo("例外: "+e.message);
}finally{if(txtStream!=null) txtStream.Close();}

219 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.02 2018/11/22 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)