none
webbrowserで一定間隔表示? RRS feed

  • 質問

  • こんにちは

    テストとしてwebページを一定間隔で表示しようと思い下記をtimer_tickにかきました。

    フォームにはとりあえずwebbrowserとtimerです。

     

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
            Dim ur() As String = {"http://yahoo.co.jp", "http://goo.ne.jp", "http://jp.msn.com/"}
            Dim i As Integer
            Timer1.Enabled = False
           
            Do
                Me.WebBrowser1.Navigate(ur(i))
               

                While WebBrowser1.IsBusy
                    Application.DoEvents()
                End While

               

                While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
                    Application.DoEvents()
                End While
                Timer1.Enabled = True
                Timer1.Interval = 15000
                i = i + 1
                 If i > 2 Then
                    Exit Do

                End If
            Loop
            Timer1.Enabled = False


        End Sub

    15秒間隔でur配列のアドレスを表示しようとおもっていますがわかりません。

    どのように書けばいいですか?
    2008年10月11日 11:35

回答

  • > 15秒間隔でur配列のアドレスを表示しようとおもっていますがわかりません。
    > どのように書けばいいですか?

     質問の意味がよくわからないのですが、フォーム上にTextBoxやLabelコントロールを貼り付けて、「Navigate(ur(i))」したタイミングでTextBoxやLabelのTextプロパティにur(i)の内容をセットすれば良いだけだと思いますけど。


     

    • 回答としてマーク sk7474 2009年2月13日 1:24
    2009年2月3日 18:56
  •  

    > 15秒間隔でur配列のアドレスを表示しようとおもっていますがわかりません。

    http://yahoo.co.jphttp://goo.ne.jphttp://jp.msn.com/ の順で
    15 秒表示したら次に行ってまた 15 秒表示するというようにしたいのです
    よね? であれば、以下のようにすればよいと思います。

    (1) Form.Load イベントのハンドラで WebBrowser.Navigate("最初の uri")
      を呼ぶ。

    (2) WebBrowser.DocumentCompleted イベントのハンドラで 15 秒タイマー
      をスタート。

    (3) 15 秒タイマー Tick イベントのハンドラで、

      ・15 秒タイマーをストップ。
      ・次の uri があれば WebBrowser.Navigate("次の uri") を呼ぶ。
      ・次の uri がなければ何もしない。

    • 回答としてマーク sk7474 2009年2月13日 1:24
    2009年2月4日 12:59

すべての返信

  • > 15秒間隔でur配列のアドレスを表示しようとおもっていますがわかりません。
    > どのように書けばいいですか?

     質問の意味がよくわからないのですが、フォーム上にTextBoxやLabelコントロールを貼り付けて、「Navigate(ur(i))」したタイミングでTextBoxやLabelのTextプロパティにur(i)の内容をセットすれば良いだけだと思いますけど。


     

    • 回答としてマーク sk7474 2009年2月13日 1:24
    2009年2月3日 18:56
  •  

    > 15秒間隔でur配列のアドレスを表示しようとおもっていますがわかりません。

    http://yahoo.co.jphttp://goo.ne.jphttp://jp.msn.com/ の順で
    15 秒表示したら次に行ってまた 15 秒表示するというようにしたいのです
    よね? であれば、以下のようにすればよいと思います。

    (1) Form.Load イベントのハンドラで WebBrowser.Navigate("最初の uri")
      を呼ぶ。

    (2) WebBrowser.DocumentCompleted イベントのハンドラで 15 秒タイマー
      をスタート。

    (3) 15 秒タイマー Tick イベントのハンドラで、

      ・15 秒タイマーをストップ。
      ・次の uri があれば WebBrowser.Navigate("次の uri") を呼ぶ。
      ・次の uri がなければ何もしない。

    • 回答としてマーク sk7474 2009年2月13日 1:24
    2009年2月4日 12:59
  • こんにちは。中川俊輔です。

    CatTailさん、SurferOnWwwさん、回答ありがとうございます。

    akisanさん、フォーラムのご利用ありがとうございます。
    その後いかがでしょうか?問題は解決しましたか?
    有用な情報と思われたため、CatTailさん、SurferOnWwwさんの回答へ回答済みチェックをつけさせていただきました。

    今後ともフォーラムをよろしくお願いします。
    それでは!
    マイクロソフト株式会社 フォーラム オペレータ 中川 俊輔
    2009年2月13日 1:28