06/04/20 17:27:36 NuKgg3tF
「愛の」ならこれで大丈夫。
// ファイル名: gya
o.wsf 引数: なし または GyaOのプレイリストURL
<job id='gas'><script language='JavaScript'>
// **** 設定 ここから **** (引数にプレイリストURLを指定する場合はgasDirectoryのみ設定すればよい)
// GASのあるフォルダ(バックスラッシュは二重の'\\'で表記)
var gasDirectory = "C:\\Program Files\\GetASFStream"; // ビットレート: bit0000001 で 384kbps, bit0000002 で 768kbps
var gyaoBitRate = 'bit0000002';
// ユーザーID: GyaOのサイト内でアドレス欄に javascript:window.alert(document.cookie); と入力してEnter → Cookie_UserIdのあとにある数値
var gyaoUserID = 'XXXXXXXXXX';
// **** 設定 ここまで ****
</script><script language='VBScript'>
Function vbInputBox(message, title, default) vbInputBox = InputBox(message, title, default)
End Function </script><script language='JavaScript'> if (WScript.Arguments.Count() == 0) {
var c = vbInputBox('コンテンツIDを入力してください。', 'コンテンツ情報の入力', 'cntXXXXXXX');
if (c != null && c != '' && c != 'cntXXXXXXX') {
var playlistUrl = 'URLﾘﾝｸ(www.gyao.jp)' + c + '&userNo=' + gyaoUserID + '&rateId=' + gyaoBitRate;
} else {WScript.Echo('必要な情報が設定されませんでした。');WScript.Quit();}
} else {var playlistUrl = WScript.Arguments.Item(0);} var regexp = new RegExp("HREF=\"([^\"]+gyaovod[^\"]+)\"", "m"); try { var xmlhttp = new ActiveXObject('Microsoft.XMLHTTP'); xmlhttp.open('GET', playlistUrl, false);xmlhttp.send('');
var videoUrl = xmlhttp.responseText.match(regexp)[1]; var shell = WScript.CreateObject('WScript.Shell');
shell.CurrentDirectory = gasDirectory; shell.Run('StreamGet.exe' + ' ' + videoUrl);
} catch (e) {WScript.Echo('処理中にエラーが発生しました。:' + e.message);}
</script></job>