VBSでIEの操作

質問

私は3年以上前にC言語とJAVAを仕事の研修で1年ほど受けた程度です。
それ以来全くプログラミングをしてません。
VB・VBSは使ったことがありません。

今の仕事場で業務で使うことを目的としております。
OSはXPを想定しています。

こんなプログラムを考えております。
１．IEを起動して自社サイトを開く
２．20回更新する
３．自社サイトの違うページに移動する
４．20回更新する
５．IEを終了させる。

自分で調べてここまでできたのですが…
ie.Visible = Trueの次にFOR文を使用するとエラーになってしまいました。

use_ie
Sub use_ie()
Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://www.google.co.jp/"
ie.Visible = True

WScript.sleep(1000)
ie.Refresh
”↑ここを20回繰り返したいです。

ie.Navigate "http://www.yahoo.co.jp/"
ie.Visible = True

”↑ここも同様に20回繰り返したいです。

End Sub

以上
初心者で大変申し訳ございませんがご教授お願いいたします。

あと
予断ですが更新の処理をie.RefreshとF5キーを割り当てるやり方で何か違いがあるのでしょうか？

回答No.2

imogasi

>20回更新する
更新するとは、どういうことですか。
私もテスト環境がなくて、かつ不勉強でよくわからないが、自社のサイトは自社サーバーの所定のところにあるのではないですか。そこのHTML（CSS)を変えないとダメという問題では無いですか。
IEはブラウザで主にHTML文を画面に表示したりするソフトでしょう。
そのためにはVB/VBSではなくて、VBの系統であるにしても、それなりのソフトを使うのではないですか。
http://www.site-cooler.com/kwl/asp/や
ASP.NET
http://aspnet.keicode.com/aspnet/simplest-aspnet-page.php
網このへんになると独学だけでは難しいのでは。
ーー
私の言っていることが、見当はずれであれば、質問者にとっては良いのですが。

回答No.1

nda23

どんなFor文を記述したのか示してください。
それと、VBSの先頭にOprion Explicit文を
置き、未定義シンボルが使用できないよう
すべきです。

Option Explicit
use_ie
Sub use_ie()
Dim ie '変数を定義する
Set ie = CreateObject(～

Dim C
For C = 1 To 20
　　ie.Refresh
Next

ieのvisibleプロロパティをTrueにするのは
最初の１回だけで十分です。
余談の件ですが、Refreshメソッドの代わりに
F5キーを押されたように操作するということ
でしょうか？
メソッドがあるのにキーストロークを生成するのは
避けるべきです。

お礼

ご返信ありがとうございます。

土日が忙しい営業職なため、ご返信遅くなり申し訳ございません。

>>どんなFor文を記述したのか示してください。
色々と試したので、あまり覚えてないのですが、
ie.Visible = True

ここにFOR文の条件を入れました。
WScript.sleep(1000)
ie.Refresh

色々とご指摘ありがとうございます。
正直半分も理解できませんでした（汗）
すみません。

実は今の仕事は不動産の営業職なんです。
毎日売り上げのノルマが凄くて…

本当は全部理解して勉強したいのですが、
仕事でVBSを使うのは多分これだけになると思います。

もし、お手数でなければそのまま実行できるプログラムを
記入していただけないでしょうか？

お忙しいところすみませんがよろしくお願いいたします。