Hi,
ich suche ein VB, womit ich das Hintergrundbild von Windows verändern kann. Es sollte immer zwischen 2en wecheln. Also bei ausführen, wechselt es zu Bild 2.jpg und bei erneuten ausfürhen zu Bild 1.jpg.
kann mir jemand sowas machen?
DANKE,
Jonas
Hallo Jonas
wenn es dir reichen würde, das das Hintergrundbild
sich bei jedem Starten von Windows ändert, hätte
ich eine kleine feine Lösung in Batch-Programmierung.
Vorarbeiten:
Lege das Hintergrundbild von Windows zB. auf das
Bild „Hintergrund_00.bmp“ fest.
Kopiere die Datei "Hintergrund_00.bmp und lege
sie als „Hintergrund_01.bmp“ ab. Erstelle ein
zweites Hintergrundbild mit dem Namen „Hintergrund_02.bmp“
Hauptarbeit:
Editiere die Datei Autoexec.bat und füge folgende
Zeilen an das Ende an:
IF EXIST C:\WINDOWS\MARKER.DAT GOTO PIC2
IC1
ECHO Marker > C:\WINDOWS\MARKER.DAT
COPY C:\WINDOWS\HINTERGRUND_01.BMP C:\WINDOWS\HINTERGRUND_00.BMP /Y > NUL
GOTO ENDE
IC2
DEL C:\WINDOWS\MARKER.DAT
COPY C:\WINDOWS\HINTERGRUND_02.BMP C:\WINDOWS\HINTERGRUND_00.BMP /Y > NUL
:ENDE
Das wars. Damit hast du bei jedem Neustart von Windows ein
anderes Hintergrundbild.
Gruß Franz
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Option Explicit
Private Declare Function SystemParametersInfo Lib „user32“ _
Alias „SystemParametersInfoA“ (ByVal uAction As _
Long, ByVal uParam As Long, ByVal lpvParam As Any, _
ByVal fuWinIni As Long) As Long
Const SPIF_SENDWININICHANGE = &H2
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_UPDATEINIFILE = &H1
'zum laden eines Hintergrundbildes (sollte eine BMP sein!)
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, _
„HIER DER PFAD ZU EINER BMP“, SPIF_UPDATEINIFILE Or _
SPIF_SENDWININICHANGE
Ich denke mal den Rest solltest Du alleine hinkriegen…
Grüße, Harald
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]