DoEvents

VBSでDoEventsは使えないのでしょうか？

***************************
Dim ObjIE
dim i
Set ObjIE = CreateObject("InternetExplorer.Application")

ObjIE.Navigate "http://oshiete.goo.ne.jp/"
ObjIE.Visible = True

Do While ObjIE.Busy = True
DoEvents
Loop
Do While ObjIE.Document.ReadyState <> "complete"
DoEvents
Loop

Set ObjIE = Nothing
***************************
だと、エラーになりました。

Wscript.sleep 3000
ならエラーにならずにコードは動きました。

VBAならDoEventsは使えるのに
VBSで使えない理由を教えてください。

No.1 ベストアンサー 回答者： VT250F 回答日時： 2013/01/10 22:37

vbsのDoEventsはSleepで代用できるから問題ないと言うことで、

vbsの仕様から除外されたのでしょう。

他にも On Error でラベルが使えませんし、
APIを呼べませんし、色々と不便な所があります。

見るとIEを操作しているようですね。
自分もVBSでIEに自動で入力してエンターを押すようなVBSを作成して、
便利に使っていますが、Windows Updateで
ある日突然エラーになり、その回避方法にまた新たな手法が必要になったりしました。
出来ないものや、ないものは回避策をいくつか研究するとよいでしょう。

この回答へのお礼

代用するものがある場合、使えなくなるのですか。
どちらを使えるようにしてくれてもいいのに・・・
vbsは色々制限があるのですね。
Windows Updateでエラーになる事もあるのですか。
そのことも踏まえて対策を練ろうと思います。

お礼日時：2013/01/11 19:43