Comment detail

LL Golf Hole 1 - tinyurl.comを使ってURLを短縮する (Nested Flatten)

This comment is reply for 9194 egtra: MSXMLのXmlHttpRequest...(LL Golf Hole 1 - tinyurl.comを使ってURLを短縮する). Go to thread root.

参考までに、同じものをJavaScriptで投稿しておきます。WSHで実行するように作っているので、これを試すには拡張子jsを付けて保存したファイルを直接実行してください。Windowsでない方にはごめんなさい。
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
function GetTinyUrlString(url)
{
    var xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
    xmlhttp.open("GET", "http://tinyurl.com/api-create.php?url=" + url);
    xmlhttp.send();
    var result = xmlhttp.responseText;
    if (result.toLowerCase() == "error")
    {
        throw "Tinyurl returns error";
    }
    return result;
}

WScript.Echo(GetTinyUrlString("http://ll.jus.or.jp/2008/info/xgihyo"))

Index

Feed

Other

Link

Pathtraq

loading...