この前「MSNからレートの取得」を投稿したものです
http://hsp.tv/play/pforum.php?mode=all&num=1404
そして前回の回答をもとにいろいろ試してみたのですがうまくいきません
一番近いと思われるスクプリトを投稿しましたので
それを正しく修正してくださるとありがたいです
特に最初の7行あたりがわかりません
#include "hspsock.as" size=12000 : sdim buf,size : ps="" st="</td><td>":en="</td>" host = "jp.moneycentral.msn.com" path = "/investor/market/rates.asp?Region=1&Compare=7" sockopen 0,host,80:if stat{goto *er1} sockput "GET "+path+" HTTP/1.1\nHost:"+host+"\n\n":if stat{goto *er1} mes "情報をダウンロードします。" repeat size/64-1:await 0 sockget ps,64:if stat{break} b=peek(ps,0):if b=0{er=1:break}else{buf+=ps} loop mes "ダウンロード完了。" if er{ pos_st = instr(buf,0,"1"+st) : pos_st += 10 repeat 53 pos_en=instr(buf,pos_st,en) if (pos_st=-1)|(pos_en=-1){ goto *er3 } rate=double(strmid(buf,pos_st,pos_en)) mes ""+str(rate)+"円です。" pos_st += pos_en+9 loop } else { mes "接続ミス" : goto *er2 } sockclose:stop *er1:mes "接続失敗しました。":sockclose:stop *er2:mes "404とか":sockclose:stop *er3:mes "取得失敗しました。":sockclose:stop
(問題だと思われる)
よろしくお願いします