64歳パソコン教師の日記 NO.877 (2002.8.01)


 今日から8月、気分がウキウキしますね。間もなく甲子園で高校野球が始まりますし、何よりも嬉しいのは、あと一週間後には例年通り女房が10日 間ほど山形の実家へ遊びに行くことです。

 女房は、私が仕事をしないで一日中パソコンをやっていても何も言いませんが、パソコンをライバル視していることは薄々感じています。ですから、 女房が家に居ると、パソコンに向かっていてもちょっと後ろめたい気がしているのです。

【お気に入り】

 これからブラウザを起動して、お気に入りに登録してあるホームページへアクセスする場合は、先ず、ブラウザを起動、→いつものホームページが表 示され、→ツールバーの「お気に入り」をクリック、→ホームページを選択、→「お気に入り」を閉じるという作業が必要ですね。

 デスクトップのアイコンをダブルクリック、→ホームページの番号を入力、→「OK」ボタンをクリックするだけで、ブラウザが起動して目的のホーム ページが表示されるというアイコンを作りましょう。

  1. 下記のスクリプトをコピーして「メモ帳」に貼り付けます。

    --------------------------------------------------------------------

    myPage = InputBox("1 : Salty" & vbCR &_
                      "2 : Yahoo! Japan" & vbCR &_
                      "3 : Infoseek" & vbCR &_
                      "4 : Goo" & vbCR &_
                      "5 : Google" & vbCR &_
                      "6 : Lycos Japan" & vbCR &_
                      "7 : Magmag" & vbCR &_
                      "8 : Vector")
    
    Set objIE = Wscript.CreateObject("InternetExplorer.Application")
    If myPage = "" Then WScript.Quit
    Select Case myPage
        Case 1
    objIE.Navigate2 "http://www.salty1.com/"
        Case 2 
            objIE.Navigate2 "http://www.yahoo.co.jp/"
        Case 3
            objIE.Navigate2 "http://japan.infoseek.com/"
        Case 4
            objIE.Navigate2 "http://www.goo.ne.jp/"
        Case 5
            objIE.Navigate2 "http://www.google.com/intl/ja/"
        Case 6
            objIE.Navigate2 "http://www.lycos.co.jp/"
        Case 7
            objIE.Navigate2 "http://www.mag2.com/"
        Case 8
            objIE.Navigate2 "http://www.vector.co.jp/"
    End Select
    objIE.Visible = TRUE
    
    --------------------------------------------------------------------

  2. 「ファイル」→「名前を付けて保存」とクリックします。

  3. 「保存する場所」欄は「デスクトップ」を指定します。
    「ファイルの種類 欄は「すべてのファイル」にします。
    「ファイル名」欄は「favorite.vbs」と入力します。
  4. 「保存」ボタンをクリックします。→デスクトップに「favorite.vbs」ア イコンが表示されます。これで完成です。

  5. 「favorite.vbs」アイコンをダブルクリックします。

  6. 「テキストボックス」にアクセスしたいホームページの番号を半角で入力→「Enter」キーを押します。

  7. ブラウザが起動、→指定したウェブサイトが表示されます。

 ダイヤルアップ接続の場合は、ブラウザが起動、→「ダイアルアップの接続」ダイアログが表示されます。→「接続」ボタンをクリックします。→  指定したウェブサイトが表示されます。


■設定されているホームページを変更する場合は「favorite.vbs」アイコンを右クリック、→「アプリケーションから開く(プログラムから開く)」  →「Notepad」とクリック、 →修正が済んだら、→「ファイル」→「上書き保存」とクリックします。