目的は、指定Webページで"1234"という単語の存否チェックです。

WinActorノートにWebページ全体を貼り付けて、正規表現でブロック検索すればできそうですが、VBScriptでコードを書いた方が処理が速そうなので、検討したいと考えています。

検索対象文字列の中の検索文字列"1234"の存否チェックは下記コードでできると推定しますが、下記コードをどう改造すれば、指定Webページで"1234"という単語の存否チェックができるでしょうか？
ファイルシステムオブジェクトを操作できればできそうな気がしますが、詳しくは知りませんので、VBScriptに詳しい方ご指南をお願いいたします。
 
 
ーーーーーーー
Dim lngPos '検索結果 (検索文字列あり=1, なし=0)
Dim strString '検索対象文字列
Dim strSearch '検索文字列
 
lngPos = 0 '変数初期化
 
strString = "1234KLkjak"
strSearch = "1234"
If InStr(strString, strSearch) > 0 Then lngPos = 1
End If