[SML 7664] HTMLの取得がうまくできません

[久保田 吉彦]

こんにちは、東京電機大学の久保田と申します。

自家製ニコ生アラートのようなものをVisualWorksで作成しよう 
と思い、下記のプログラムでニコニコ生放送のページの情報を取得しよ 
うとしました。

| anURL readStream writeStream |
anURL := JunURL named: 'http://live.nicovideo.jp/recent? 
p=1&tab=common' .
JunControlUtility
	assert:[readStream := anURL readStream.
			writeStream := 'nico.html' asFilename writeStream]
	do:[[readStream atEnd not] whileTrue:
			[writeStream nextPutAll:(JunStringUtility getLine: readStream)]]
	ensure:[writeStream close.
			readStream close].

困っているのはWebブラウザでURLを開いたときに取得でき 
るHTMLと異なった情報を持ってきてしまうことです。
nico.htmlを開くと'エラーが発生しました'と書かれた 
ページが表示されます。

いまのところ同じURLのHTMLを取得するプログラムを 
JavaとPythonで書いてみましたが、こちらでは期待した情報が得 
られました。

プログラムのどこがいけないのでしょうか?
ご存知の方教えていただけませんでしょうか。

久保田吉彦
東京電機大学 情報環境学部 情報環境学科