取得したソースの日本語(全角文字)が「?」で表現されてしまっています。
これを正しい全角文字に変換するにはどうすればいいのでしょうか?
newcom HTTP, "MSXML2.XMLHTTP" if varuse(HTTP) = 0 : dialog "失敗": end url = "http://yokohama.cool.ne.jp/chokuto/urawaza/com/shell.html" HTTP->"Open" "GET", url, 0 HTTP->"Send" NowState = 1 repeat 10 * 30 ;timeout 30秒 wait 10 if HTTP("readyState") = 4 : break loop if HTTP("readyState") = 4 { strResult = HTTP("responseText") }else{ HTTP->"Abort" } mesbox strResult, 640,480