【 スクリプト改造依頼スレ 】(丸投げ) part8
スクリプトを改造したいけど知識不足で自分ではできない人が依頼するスレです。
ひょっとしたら誰かがやってくれるかもしれません。
【 CGI&PHP名 】 詳しく記入する事
【 配布先URL 】 再配布OKなら記入、NGなら作者に聞く事
【 依頼期限 】 常識の範囲内で
【 依頼内容 】 〜を導入したい等
※ まずは再配布禁止か可能かよく調べる事
※ 再配布可能で元サイトが閉鎖している場合各自あぷろだ等にアップロードする事
※ 依頼内容は誰にでもわかりやすく書く事
※ 最後にテンプレがきちんと埋まっているか確認する事
前スレ
【 スクリプト改造依頼スレ】(丸投げ) part7再々
http://hibari.2ch.net/test/read.cgi/php/1222645553/ >>47
<!doctype html><html><head>
<script type="text/javascript">
var lastNode;
function run() {
var url = document.getElementById("url");
getLocation(url.value.split("\r\n"));
}
function copy(node) {
clipboardData.setData("text", node.innerText.substr(4));
if (lastNode) {
lastNode.style.backgroundColor = "#fff";
}
node.style.backgroundColor = "#0f0";
lastNode = node;
}
つづく function getLocation(strURLs) {
WinHttpRequestOption_EnableRedirects = 6;
var strResult = "";
for(i = 0; i < strURLs.length; i++) {
try {
var WinHttpReq = new ActiveXObject("WinHttp.WinHttpRequest.5.1");
WinHttpReq.Open("GET", strURLs[i], false);
WinHttpReq.Option(WinHttpRequestOption_EnableRedirects) = false;
WinHttpReq.Send();
var re = new RegExp("30[12]");
if(re.test(WinHttpReq.Status)) {
var loc = WinHttpReq.GetResponseHeader("Location");
strResult += '<span><button onclick="copy(this.parentNode)">Copy</button>' + loc + '</span>';
}
strResult += "\r\n<br>";
} catch (objError) {
strResult = objError + "\n"
strResult += "WinHTTP returned error: " + (objError.number & 0xFFFF).toString() + "\n\n";
strResult += objError.description;
}
}
document.getElementById("res").innerHTML = strResult;
}
</script>
</head><body><p><textarea id="url" cols="50" rows="15"></textarea><button onclick="run()">Run</button></p><pre id="res"></pre></body></html>
おわり 
