こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

VBSでIEの操作

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

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

こんなプログラムを考えております。
1.IEを起動して自社サイトを開く
2.20回更新する
3.自社サイトの違うページに移動する
4.20回更新する
5.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キーを割り当てるやり方で何か違いがあるのでしょうか?

投稿日時 - 2011-06-11 01:46:05

QNo.6800876

困ってます

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.2

>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
網このへんになると独学だけでは難しいのでは。
ーー
私の言っていることが、見当はずれであれば、質問者にとっては良いのですが。

投稿日時 - 2011-06-11 10:57:30

ANo.1

どんな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にするのは
最初の1回だけで十分です。
余談の件ですが、Refreshメソッドの代わりに
F5キーを押されたように操作するということ
でしょうか?
メソッドがあるのにキーストロークを生成するのは
避けるべきです。

投稿日時 - 2011-06-11 07:41:14

お礼

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

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


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

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




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

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

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


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

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

投稿日時 - 2011-06-13 00:32:46