HTTPREQUESTオブジェクトでタイムアウトを設定するには？ (ID:84453)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 HTTPREQUESTを使用してHTMLデータを取得しようとしています。 下記のコードで、sendで取得要求した際に、ページによっては結果が返ってこず、そのままフリーズしてしまいます。 Source-------------------------------------------------------------- Dim objRequest As Object Dim sHTML As String Set objRequest = CreateObject("MSXML2.XMLHTTP.3.0") objRequest.open "GET", sURL, False objRequest.send '←ここでフリーズ sHTML = objRequest.responseText -------------------------------------------------------------------- フリーズしないような良い対策はありませんでしょうか？