- 548 名前：デフォルトの名無しさん [2006/04/08(土) 23:14:29 ]
- Set xh = CreateObject("MSXML2.XMLHTTP")
On Error Resume Next
If Err <> 0 Then
Err.Clear
Set xh = CreateObject("Microsoft.XMLHTTP")
End If
xh.Open "GET", Url, False
xh.Send
If Err <> 0 Then Exit Function
上記Scriptでxh.Sendを実行してから次のステップに進むまで4秒くらい（URLはyahooやInfoseekなどどのサイトでも）
かかりますがみなさんもそのくらい、時間がかかりますか？
OSはWinXPです。
