VBからIEを立ち上げる

Internet Explorerを立ち上げてYahooのページを出してみる。

VB2008からInternet Explorer(IE)を立ち上げることで、

Internet ExplorerをVBから動かすことができる。

たとえば

IEを立ち上げて、Yahooのトップページ行く
そして
検索窓に、「ほしのあき」と入力する
それから
検索ボタンをおして
ほしのあき　の検索結果を見るなどができる。

ここでは

Internet Explorerを立ち上げて
Yahooを呼び出すまでの動作です

 

        '####  IE を作成
        Dim objIE as Object

        objIE = CreateObject("InternetExplorer.application")
        objIE.visible = True

        Dim URL as String = "http://www.yahoo.co.jp"

        objIE.Navigate(URL)

        'ここから下のDoEventsは
        'IEがYahooの画面を読み込み終わったかどうか判断しています
        'でも、正確になかなか取れません

        Do While objIE.Busy
            DoEvents()
        Loop

        Do While (objIE.document.readyState <> "complete")
            DoEvents()
        Loop

        Do While objIE.readyState <> "4"
            DoEvents()
        Loop

        Sleep(1000)

VB2008 Express Editionの(Visual Basic)インストール

Visual Basic 2008 Express Edition をまずインストールします。

Visual Studio 2008からVisual Basic2008を選んでインストールしました。

注意点としては、ハードディスクに空き容量がかなりないと大きいということですね。

インストールの仕方はインストールの仕方にありますが、Cドライブが私に５Ｇ程度しか空きが無かったので、Ｅドライブ（通常Ｄ）にインストールしようとしたのですが、どうもWindowsが入っているドライブにインストールするようで、結局ＣドライブのよけいなものをＥに移動してからインストールするという手間がかかりました。

メッセージに添ってＯＫしていけば、インストールは完了します。

そのときにSQLServerも

SQL Server Express は Windows アプリケーションや Web アプリケーションで必要となるデータベースの機能を提供します。簡易なデータ ドリブン アプリケーションを作成するために設計された、使いやすい無償とのこと。

せっかく１０Ｇ程度あけたので、これもいっしょにインストールして置きました。

VB6と比べて、少しというか結構重いかなあとVB2008を開いてみて思いましたね。

VB2008関連の書籍を本屋さんで探したのですが、私の住む山梨ではMicroSoftの公式のリファレンスしかなくて、それにはXMLのことが買いたていなくてまだ購入していません。

最初に作ろうと思っているのは、単にサイトがインデックスされたかどうかを確認するだけの小さなプログラムを作ろうと思っています。

ではまた。