HSPTV!掲示板

タイトルのとおりです
テキストのダウンロードまでは成功するのですが、URLが取得できません；；
どうすればいいか教えてください

	#include "hspinet.as"
	#include "mod_regexp.as"
	
	netinit;初期化
	if stat : dialog "ネット接続できません。終了します" : end;エラー

	neturl "http://xxxx.org/";アドレス指定

	fileName = "xxxx.txt"
*fileGet
	netload fileName
	gosub *txtChange
	gosub *urlGet
	stop
	
*txtChange;Downloadしたtextの改行コードを変換
	notesel getText
	noteload fileName
	mes "Download完了"
	getText = replace(getText,"\\n|\\r","\r\n")
	notesave fileName
	mes "変換完了"
	return
	
*urlGet
	notesel getText
	noteload fileName
	noteget hUrl,1
	hUrl = match(hUrl,"http://.?")
	mes "URL取得"
	mes "URL : " + hUrl
	return

そのテキストっていうのはどんな内容ですか？
URLだけが記述されているんでしょうか。
テキストの内容をおしえてもらえませんか？

改行コード変換はいらないかもしれないです。

hUrl = match(hUrl,"http://.?")
とのことですが、「http://.?」では、
「http://」
「http://g」
「http://y」
などにしかマッチしません。
「http://.+」か「http://.*」のほうがいいんではないでしょうか。

もしもＵＲＬの次が空白、など区切りがあるのなら、
「http://[^ ]*」のほうがいいかもしれませんね。
("http://[^(区切り)]*")

ところで、なぜこんなにも正規表現を使おうとするんでしょうか。

テキストは、これを使うつもりでいます
http://ggtea.org/autoxmas.txt

改行コード変換は、ダウンロードしたファイルを開くとなぜか一行になってしまっているので
2行目を取得したいので必要でした

あと、コードを以下のように変えたのですが、2行目の取得の時点で失敗しているようです；；
実行したら空白になってしまいました

*urlGet
	notesel getText
	noteload fileName
	noteget hUrl,1
	mes hUrl
	hUrl = match(hUrl,"http://.*")
	mes "URL取得"
	mes "URL : " + hUrl
	return

改行コード変換に失敗してました
一行ごとに空白が入ってしまっていました

	getText = replace(getText,"\\n|\\r","\r\n")

を

	getText = replace(getText,"\\n|\\r","\n")

にしたら出来ました
ありがとうございました