Mittwoch, 04.12.2024 (CET) um 19:02 Uhr
www.windowspage.de 20 Jahre Windowspage
News:
Herzlich Willkommen bei Windowspage. Alles rund um Windows.

Tipps - Sperrbildschirm - Bilder von Windows-Blickpunkt speichern / sichern
Detailbeschreibung
Betriebssystem: Windows 10, Windows 11

Die Funktion Windows-Blickpunkt (auch als Windows-Spotlight bezeichnet) zeigt wechselnde Hintergründe auf dem Sperrbildschirm und auf dem Desktop (ab Windows 11) an. Für die Anzeige werden die Hintergründe bzw. Bilder auf dem lokalen Rechner / Gerät zwischengespeichert. Die Bilder (JPG-Format) lassen sich jeder Zeit in einen anderen Ordner dauerhaft speichern.

So geht's :

  • Öffnen das Verzeichnis "%LocalAppData%\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets".
  • Kopieren Sie alle Dateien in ein anderes Verzeichnis. Z. B.: "%UserProfile%\Pictures\WindowsSpotlightImages"
  • Ergänzen Sie die Dateierweiterung ".jpg" oder benennen die Datei(en) mit der Dateierweiterung ".jpg" um.

Windows-Blickpunkt

So geht's (VisualBasic-Skript):

  • Kopieren Sie nachfolgendes VisualBasic-Skript in einen Texteditor (z. B. "Notepad").
  • Speichern Sie den Inhalt mit der Dateiendung ".vbs" ab. Z. B.: "WindowsSpotlightImages.vbs"
  • Das Skript kopiert die JPG-Bilddateien in den Ordner "WindowsSpotlightImages" (unter "Bilder").

' Copyright (c) Windowspage
' Kopiert die Bilder von Windows-Blickpunkt in den Bilder-Ordner des Benutzers

DIM ShellObj, FileSystemObj, SpotlightFolder, FileObj
DIM LocalAppData, UserProfile, AppSpotlight, UserSpotlight
DIM FileName, PictureFile, cnt

SET ShellObj = CreateObject("WScript.Shell")
LocalAppData = ShellObj.ExpandEnvironmentStrings("%LocalAppData%")
UserProfile = ShellObj.ExpandEnvironmentStrings("%UserProfile%")
AppSpotlight = LocalAppData & "\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets"
UserSpotlight = UserProfile & "\Pictures\WindowsSpotlightImages"

SET FileSystemObj = CreateObject("Scripting.FileSystemObject")
SET SpotlightFolder = FileSystemObj.GetFolder(AppSpotlight)

IF NOT FileSystemObj.FolderExists(UserSpotlight) THEN FileSystemObj.CreateFolder(UserSpotlight)

cnt = 0
FOR EACH PictureFile IN SpotlightFolder.Files
FileName = FileSystemObj.GetFileName(PictureFile)
SET FileObj = FileSystemObj.GetFile(PictureFile)
FileObj.Copy(UserSpotlight & "\" & FileName & ".jpg")
cnt = cnt + 1
NEXT
MSGBOX "Es wurden " & cnt & " Datei(en) nach '" & UserSpotlight & "' kopiert.", vbOKOnly, "Windows-Spotlight"

Hinweis:

  • Für die korrekte Darstellung des Hintergrunds stehen ggf. mehrere Bilder mit unterschiedlichen Abmessungen zur Verfügung.

Windowspage - Weitere interessante Tipps und Einstellungen
Tipps für Windows 10, Windows 11
Statistik

Unsere Webseite verwendet technisch notwendige Cookies ("berechtigtes Interesse"). Darüberhinausgehend (z. B. für Statistiken oder Marketing) erfolgt keine Speicherung von Cookies. Klicken Sie auf "Ich stimme zu", um Cookies zu akzeptieren und direkt unsere Webseite besuchen zu können. Weitere Informationen...

Valid HTML 4.01 Transitional  CSS ist valide!