VBSにて正常動作しなくなりました。

Question

以下のスクリプトが従来環境では正常に動作していたのですが

新しい環境で動作しない事象が発生してしまいました。

対処方法をご教示願えませんでしょうか。

（対象スクリプト）

Dim oDOM, nRet, sURI
 Set oDOM = CreateObject("MSXML.DOMDocument")
 oDOM.Async = False
 sURI = "http://・・・・・・・・"
 nRet = oDOM.load(sURI)
 If nRet <> True Then
  Exit Function
 End If

（動作していた環境）

OS：Windows７以前（IE８）

（動作しなくなってしまった環境）

OS：Windows７以前（IE１０からIE８へダウングレード）

Answer 1

とりあえず、どこでどんなエラーが出ているかを突き止めてください。

今回のコードでいえば、COM関連の操作をしたあとにErr.NumberやErr.Descriptionを参照してエラーが発生していないか確認してください。

Answer 2

junjun_admin さん、投稿ありがとうございます。

トラブルシューティングのアドバイスとして、かるあ さんの返信に[回答としてマーク] させていただきました。

もし質問を続ける場合は遠慮なく[回答としてのマークの解除]をして確認した内容をお知らせいただくと、質問の解決に役立つ情報が集まりやすくなると思います。

それでは今後ともＭＳＤＮ フォーラムをお役立てください。

---

日本マイクロソフト株式会社　フォーラム オペレーター　星 睦美