Seitenwechsel nach stillstand

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    Seitenwechsel nach stillstand

    Guten Morgen

    folgende Problemstellung:

    Ich habe eine Mastersite mit 5 Websites welche an einer Ausstellung laufen. nun möchte ich, das wenn sich 5 Minuten nichts ändert, automatisch die nächste Seite angezeigt wird.

    Ich dachte dabei an DispatcherTimer.. aber kann ich da eine Startzeit festlegen ?

    Ich dachte dabei an etwas wie onLoad Zeit 0:00 Intervall 10 Sekunden... und wenn er die Zeit ins Label schreibt und die Zeit grösser als 5 Minuten ist einen redirect auslösen...

    Hat da Jemand etwas?

    Besten Dank
    Am lernen...
    @markusbreitenstein Schau mal hier rein:
    codeproject.com/Articles/13756…ting-Application-Idleness
    Ich hab noch ein VB-Snippet gefunden:
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Imports System.Runtime.InteropServices
    2. Public Class Form1
    3. Private Structure LastInputInfo
    4. Public cbSize As Integer
    5. Public dwTime As Integer
    6. End Structure
    7. <DllImport("kernel32")>
    8. Private Shared Function GetTickCount() As Long
    9. End Function
    10. <DllImport("user32")>
    11. Private Shared Function GetLastInputInfo(ByRef info As LastInputInfo) As Boolean
    12. End Function
    13. Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
    14. Timer1.Interval = 1000
    15. Timer1.Enabled = CheckBox1.Checked
    16. End Sub
    17. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    18. Dim info As LastInputInfo
    19. info.cbSize = Marshal.SizeOf(info)
    20. GetLastInputInfo(info)
    21. Label1.Text = String.Format("system idle: {0:0.00} s", (GetTickCount() - info.dwTime) / 1000)
    22. Label2.Text = String.Format("Ticks: {0}", GetTickCount())
    23. Label3.Text = String.Format("Last Use: {0}", info.dwTime)
    24. End Sub
    25. End Class

    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „RodFromGermany“ ()