【Perl 】初心者コーナーPart5

このエントリーをはてなブックマークに追加
440 ：337：
えっと、ジャバスクリプトでクッキーに格納された文字を以下のように読み出しているのですが、
文字化けした状態で出てくるのです。
--
<html><head>
<SCRIPT LANGUAGE="JavaScript">
<!--
getname = getCookie("POSTNAME");
if (getname == "") {
　　getname = "";
}

function getCookie(key, tmp1, tmp2, xx1, xx2, xx3) {
　　tmp1 = " " + document.cookie + ";";
　　xx1 = xx2 = 0;
　　len = tmp1.length;
　　while (xx1 < len) {
　　　　xx2 = tmp1.indexOf(";", xx1);
　　　　tmp2 = tmp1.substring(xx1 + 1, xx2);
　　　　xx3 = tmp2.indexOf("=");
　　　　if (tmp2.substring(0, xx3) == key) {
　　　　　　return(unescape(tmp2.substring(xx3 + 1, xx2 - xx1 - 1)));
　　　　}
　　　　xx1 = xx2 + 1;
　　}
　　return("");
}
// -->
</SCRIPT>
</head><body>
<SCRIPT Language="JavaScript">
<!--
mmbb = unescape(getname);
document.write("名前:<input type=text name=postname size=30 value=",mmbb,">");
// -->
</SCRIPT>
</body></html>