Desktop-Hintergrund ändern (*.html)

  • Ich suche nach einer Möglichkeit, den Desktophintergrund stets mit einem HTML-Dokument zu aktualisieren.
    Für -bmp`s habe ich schon eine Möglichkeit gefunden (

    Spoiler anzeigen
    [autoit]

    Dim $favDir = 'C:\Downloads\Wallpapers\favorites\'

    [/autoit] [autoit][/autoit] [autoit]

    Dim $cCounter = 0
    Dim $FindFile = FileFindFirstFile($favDir & '*.bmp')
    While 1
    FileFindNextFile($FindFile)
    If @error Then ExitLoop
    $cCounter = $cCounter + 1
    WEnd
    FileClose($FindFile)

    [/autoit] [autoit][/autoit] [autoit]

    $FindFile = FileFindFirstFile($favDir & '*.bmp')
    Dim $RandomNum = Random(1, $cCounter, 1)

    [/autoit] [autoit][/autoit] [autoit]

    Dim $curFile
    For $i = 1 To $RandomNum
    $curFile = FileFindNextFile($FindFile)
    If $RandomNum = $i Then
    ChangeDesktopWallpaper($favDir & $curFile)
    ExitLoop
    EndIf
    Next

    [/autoit] [autoit][/autoit] [autoit]

    FileClose($FindFile)

    [/autoit] [autoit][/autoit] [autoit]

    Exit

    [/autoit] [autoit][/autoit] [autoit]

    Func ChangeDesktopWallpaper($bmp)
    ;===============================================================================
    ; Usage: _ChangeDesktopWallPaper(@WindowsDir & '\' & 'zapotec.bmp')
    ; Parameter(s): $bmp - Full Path to BitMap File (*.bmp)
    ; Requirement(s): None.
    ; Return Value(s): On Success - Returns 0
    ; On Failure - -1
    ;===============================================================================

    [/autoit] [autoit][/autoit] [autoit]

    If Not FileExists($bmp) Then Return -1
    ;The $SPI* values could be defined elsewhere via #include - if you conflict,
    ; remove these, or add if Not IsDeclared "SPI_SETDESKWALLPAPER" Logic
    Local $SPI_SETDESKWALLPAPER = 20
    Local $SPIF_UPDATEINIFILE = 1
    Local $SPIF_SENDCHANGE = 2
    Local $REG_DESKTOP= "HKEY_CURRENT_USER\Control Panel\Desktop"

    [/autoit] [autoit][/autoit] [autoit]

    ;Don't tile - just center
    RegWrite($REG_DESKTOP, "TileWallPaper", "REG_SZ", 0)
    RegWrite($REG_DESKTOP, "WallpaperStyle", "REG_SZ", 0)
    RegWrite($REG_DESKTOP, "Wallpaper", "REG_SZ", $bmp)

    [/autoit] [autoit][/autoit] [autoit]

    DllCall("user32.dll", "int", "SystemParametersInfo", _
    "int", $SPI_SETDESKWALLPAPER, _
    "int", 0, _
    "str", $bmp, _
    "int", BitOR($SPIF_UPDATEINIFILE, $SPIF_SENDCHANGE))

    [/autoit] [autoit][/autoit] [autoit]

    Return 0
    EndFunc;==>_ChangeDestopWallpaper

    [/autoit]

    ), aber wenn ich die Such-Strings in HTML ändere,passiert nichts.

    Grundsätzlich ist das ändern von Desktophintergründen mit HMTL mglich,das weiß ich (Win XP SP 2).

    Wäre für Hilfe dankbar :)

    //edit: Doch,es passiert etwas,der Bildschirm wird schwarz ;)

    Zitat

    Programmieren ist so lange lustig bis ein Fehler auftritt!


    ~ Dankeschön

  • na dann lade doch mal eine HTML datei ein und schaue was sich in der registry alles verändert, ich kann kaum glauben das dann dort der IE nicht beteiligt ist, irgendwer muss das HTML dokument ja auch sichtbar machen ;)

    MFG FireFlyer

    *Paradox ist, wenn man sich im Handumdrehen den Fuss bricht* :D