IE = CreateOLEObj("InternetExplorer.Application") IE.Visible = True IE.Navigate("http://prog-etc.bbs.thebbs.jp/1164265310/")// 掲示板 while True // 接続表示待ち if (! IE.busy) and (IE.readyState=4) then Break sleep(0.1) wend select RANDOM(7) case 0 moji="長すけ「ばかやろ!」" case 1 moji="仲本「長さんのいうとうり」" case 3 moji="加藤「すんずれいしました」" case 4 moji="高木「ブー」" case 5