[ruby-list:39603] Re: 気象庁の．．． Re: uriってどう使うんでしょうか

oyaです。
OSがMeだとうまくデータを取得できるのですが、XPでは、取得できません。
調べてみるとXPでは、次のデータが送られてきます。
両方ともIE6を使っているのですが、なぜでしょうか？
どう変更すればいいんでしょうか？
************************
<!--

function SymError()
{
  return true;
}

window.onerror = SymError;

var SymRealWinOpen = window.open;

function SymWinOpen(url, name, attributes)
{
  return (new Object());
}

window.open = SymWinOpen;

//-->
JavaScriptが予想と違うので中止
******************************

確認用に修正したプログラム
#*****************************
#!ruby -Ks
require 'ie_lib'


require 'phi'
include  Phi 


# HTML要素を特定する情報
TargetFrame_index = 2 # 情報選択セレクタの存在するフレームのインデックス
AreaSelect_index  = 0 # 地域セレクタ
CitySelect_index  = 1 # 都市セレクタ
DataType_index    = 2 # データ
YearSelect_index  = 3 # 年
MonthSelect_index = 4 # 月
DateSelect_index  = 5 # 日
SearchButton_index = 0 # 検索ボタン
# 選択条件
SelectArea = "大阪府"     # 地域指定
SelectCity = "大阪"         # 都市指定
DateType = "１ヶ月の毎日の値" # データタイプ指定
DateArray = ["2003", "03", "01"]  # 表示データの日付

ie = IE.new
ie.navigate("http://www.data.kishou.go.jp/")
target_frame = ie.Document.frames(TargetFrame_index)
select_list = target_frame.document.body.tags("SELECT")
# 地域の選択
area_select = select_list[AreaSelect_index]
area_select.text = SelectArea
area_select.fireEvent("onchange")
ie.wait_stable()

target_frame = ie.Document.frames(TargetFrame_index)
select_list = target_frame.document.body.tags("SELECT")
# 都市名の選択
selecter = select_list[CitySelect_index]
selecter.text = SelectCity
selecter.fireEvent("onchange")
# データ指定
selecter = select_list[DataType_index]
selecter.text = DateType
selecter.fireEvent("onchange")
# 年
selecter = select_list[YearSelect_index]
selecter.text = DateArray[0]
selecter.fireEvent("onchange")
# 月
selecter = select_list[MonthSelect_index]
selecter.text = DateArray[1]
selecter.fireEvent("onchange")
# 日
#selecter = select_list[DateSelect_index]
#selecter.text = DateArray[2]
#selecter.fireEvent("onchange")

# JavaScriptの変更
script_tag = ie.document.frames[2].document.tags("SCRIPT")[0]
script_str_arr = script_tag.text.split("\n")

#確認用出力
i = 0
while script_str_arr[i] != nil
print script_str_arr[i]
print ("\n")
i = i + 1
end

if script_str_arr[738] =~ /window\.open/
  # JavaScriptを書き換える
  script_str_arr[738] = "\t\twindow.location.href = loc;" 
  script_tag.raw.text = script_str_arr.join("\n")  
else
  puts "JavaScriptが予想と違うので中止"
  exit
end

# 検索ボタンクリック
area_list = target_frame.document.body.tags("AREA")
area_list[SearchButton_index].click
sleep 3
ie.wait_stable

# データの取り出し
TableFrame_index = 1
Table_index = 2
frame = ie.Document.frames[TargetFrame_index]
data_frame = frame.Document.Frames[TableFrame_index]
table_tag = data_frame.Document.tags("TABLE")[Table_index]
table_tag.tags("TR").each {|tr_tag|
  data_list = []
  tr_tag.tags("TD").each {|td_tag|
    data_list.push td_tag.innerText
  }
  puts "#{data_list.join(',')}"
}



form.show
Phi.mainloop
#************************