前言
Windows聚焦(Windows Spotlight)是Windows 10里邊新增的一個(gè)鎖屏壁紙功能,它會(huì)自動(dòng)下載并隨機(jī)更換鎖屏壁紙焰枢。Windows聚焦中壁紙往往非常精美震撼,值得大家收藏舌剂〖贸可這些壁紙都放在你電腦上的緩存文件夾中并且沒(méi)有后綴名,需加上".jpg"才能預(yù)覽霍转。如下圖所示:
路徑:C:\Users\你的用戶名\AppData\Local\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets
如果你喜歡一張Windows聚焦中的壁紙荐绝,需要將所有壁紙都加上后綴名才能找到你想要的那張壁紙,效率太低避消。我們可以利用Windows自帶的PowerShell功能自動(dòng)將這些圖片加上后綴并保存在"圖片"文件夾中低滩。
僅保存Windows聚焦圖片
代碼如下
# 將復(fù)制出來(lái)的緩存圖片保存在下面的文件夾
add-type -AssemblyName System.Drawing
New-Item "$($env:USERPROFILE)\Pictures\Spotlight" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\Horizontal" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\Vertical" -ItemType directory -Force;
# 將橫豎圖片分別復(fù)制到對(duì)應(yīng)的兩個(gè)文件夾
foreach($file in (Get-Item "$($env:LOCALAPPDATA)\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets\*"))
{
if ((Get-Item $file).length -lt 100kb) { continue }
Copy-Item $file.FullName "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets\$($file.Name).jpg";
}
foreach($newfile in (Get-Item "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets\*"))
{
$image = New-Object -comObject WIA.ImageFile;
$image.LoadFile($newfile.FullName);
if($image.Width.ToString() -eq "1920"){ Move-Item $newfile.FullName "$($env:USERPROFILE)\Pictures\Spotlight\Horizontal" -Force; }
elseif($image.Width.ToString() -eq "1080"){ Move-Item $newfile.FullName "$($env:USERPROFILE)\Pictures\Spotlight\Vertical" -Force; }
}
新建一個(gè)文本文檔,將上述代碼粘貼進(jìn)去岩喷,保存后綴為.ps1
恕沫,命名為GetWallPaperFromSpotlight.ps1
,然后右鍵"使用PowerShell運(yùn)行"就可以發(fā)現(xiàn)所有聚焦圖片被保存在你自己的用戶圖片文件夾下的Spotlight文件夾中纱意。
保存并設(shè)為Windows桌面壁紙
代碼如下
# 將復(fù)制出來(lái)的緩存圖片保存在下面的文件夾
add-type -AssemblyName System.Drawing
New-Item "$($env:USERPROFILE)\Pictures\Spotlight" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\Horizontal" -ItemType directory -Force;
New-Item "$($env:USERPROFILE)\Pictures\Spotlight\Vertical" -ItemType directory -Force;
# 將橫豎圖片分別復(fù)制到對(duì)應(yīng)的兩個(gè)文件夾
foreach($file in (Get-Item "$($env:LOCALAPPDATA)\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets\*"))
{
if ((Get-Item $file).length -lt 100kb) { continue }
Copy-Item $file.FullName "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets\$($file.Name).jpg";
}
foreach($newfile in (Get-Item "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets\*"))
{
$image = New-Object -comObject WIA.ImageFile;
$image.LoadFile($newfile.FullName);
if($image.Width.ToString() -eq "1920"){ Move-Item $newfile.FullName "$($env:USERPROFILE)\Pictures\Spotlight\Horizontal" -Force; }
elseif($image.Width.ToString() -eq "1080"){ Move-Item $newfile.FullName "$($env:USERPROFILE)\Pictures\Spotlight\Vertical" -Force; }
}
# 壁紙?jiān)O(shè)置函數(shù)
function Set-Wallpaper
{
param(
[Parameter(Mandatory=$true)]
$Path,
[ValidateSet('Center', 'Stretch')]
$Style = 'Center'
)
Add-Type @"
using System;
using System.Runtime.InteropServices;
using Microsoft.Win32;
namespace Wallpaper
{
public enum Style : int
{
Center, Stretch
}
public class Setter {
public const int SetDesktopWallpaper = 20;
public const int UpdateIniFile = 0x01;
public const int SendWinIniChange = 0x02;
[DllImport("user32.dll", SetLastError = true, CharSet = CharSet.Auto)]
private static extern int SystemParametersInfo (int uAction, int uParam, string lpvParam, int fuWinIni);
public static void SetWallpaper ( string path, Wallpaper.Style style ) {
SystemParametersInfo( SetDesktopWallpaper, 0, path, UpdateIniFile | SendWinIniChange );
RegistryKey key = Registry.CurrentUser.OpenSubKey("Control Panel\\Desktop", true);
switch( style )
{
case Style.Stretch :
key.SetValue(@"WallpaperStyle", "2") ;
key.SetValue(@"TileWallpaper", "0") ;
break;
case Style.Center :
key.SetValue(@"WallpaperStyle", "1") ;
key.SetValue(@"TileWallpaper", "0") ;
break;
}
key.Close();
}
}
}
"@
[Wallpaper.Setter]::SetWallpaper( $Path, $Style )
}
$filePath = "$($env:USERPROFILE)\Pictures\Spotlight\Horizontal\*"
$file = Get-Item -Path $filePath | Sort-Object -Property LastWriteTime -Descending | Select-Object -First 1
Set-Wallpaper -Path $file.FullName
# echo $file.FullName
Remove-Item "$($env:USERPROFILE)\Pictures\Spotlight\CopyAssets\*";
#pause
同樣地婶溯,新建一個(gè)文本文檔,將上述代碼粘貼進(jìn)去偷霉,保存后綴為.ps1
迄委,命名為SetWallPaperFromSpotlight.ps1
,然后右鍵"使用PowerShell運(yùn)行"就可以看到桌面背景已經(jīng)被換成了Windows聚焦圖片类少。
每天自動(dòng)提取并設(shè)置為Windows桌面壁紙
利用Windows自帶的任務(wù)計(jì)劃程序和上面的的PowerShell腳本就可以實(shí)現(xiàn)叙身。由于有些Windows聚焦圖片我不是很喜歡,所以我不想自動(dòng)更換壁紙硫狞。因此這一部分我并沒(méi)有嘗試實(shí)現(xiàn)曲梗。感興趣的同學(xué)可以參考這篇文章。
參考:http://blog.csdn.net/anymake_ren/article/details/51125609