提取Windows聚焦圖片(Spotlight)

前言

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
C:\Users\你的用戶名\AppData\Local\Packages\Microsoft.Windows.ContentDeliveryManager_cw5n1h2txyewy\LocalState\Assets

路徑: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

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末妓忍,一起剝皮案震驚了整個(gè)濱河市虏两,隨后出現(xiàn)的幾起案子,更是在濱河造成了極大的恐慌世剖,老刑警劉巖定罢,帶你破解...
    沈念sama閱讀 211,348評(píng)論 6 491
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場(chǎng)離奇詭異旁瘫,居然都是意外死亡祖凫,警方通過(guò)查閱死者的電腦和手機(jī)琼蚯,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 90,122評(píng)論 2 385
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái)惠况,“玉大人遭庶,你說(shuō)我怎么就攤上這事〕硗溃” “怎么了峦睡?”我有些...
    開(kāi)封第一講書人閱讀 156,936評(píng)論 0 347
  • 文/不壞的土叔 我叫張陵,是天一觀的道長(zhǎng)权埠。 經(jīng)常有香客問(wèn)我榨了,道長(zhǎng),這世上最難降的妖魔是什么攘蔽? 我笑而不...
    開(kāi)封第一講書人閱讀 56,427評(píng)論 1 283
  • 正文 為了忘掉前任龙屉,我火速辦了婚禮,結(jié)果婚禮上满俗,老公的妹妹穿的比我還像新娘转捕。我一直安慰自己,他們只是感情好唆垃,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,467評(píng)論 6 385
  • 文/花漫 我一把揭開(kāi)白布瓜富。 她就那樣靜靜地躺著,像睡著了一般降盹。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上谤辜,一...
    開(kāi)封第一講書人閱讀 49,785評(píng)論 1 290
  • 那天蓄坏,我揣著相機(jī)與錄音,去河邊找鬼丑念。 笑死涡戳,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的脯倚。 我是一名探鬼主播渔彰,決...
    沈念sama閱讀 38,931評(píng)論 3 406
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼推正!你這毒婦竟也來(lái)了恍涂?” 一聲冷哼從身側(cè)響起,我...
    開(kāi)封第一講書人閱讀 37,696評(píng)論 0 266
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤植榕,失蹤者是張志新(化名)和其女友劉穎再沧,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體尊残,經(jīng)...
    沈念sama閱讀 44,141評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡炒瘸,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,483評(píng)論 2 327
  • 正文 我和宋清朗相戀三年淤堵,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片顷扩。...
    茶點(diǎn)故事閱讀 38,625評(píng)論 1 340
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡拐邪,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出隘截,到底是詐尸還是另有隱情扎阶,我是刑警寧澤,帶...
    沈念sama閱讀 34,291評(píng)論 4 329
  • 正文 年R本政府宣布技俐,位于F島的核電站乘陪,受9級(jí)特大地震影響,放射性物質(zhì)發(fā)生泄漏雕擂。R本人自食惡果不足惜啡邑,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,892評(píng)論 3 312
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望井赌。 院中可真熱鬧谤逼,春花似錦、人聲如沸仇穗。這莊子的主人今日做“春日...
    開(kāi)封第一講書人閱讀 30,741評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)纹坐。三九已至枝冀,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間耘子,已是汗流浹背果漾。 一陣腳步聲響...
    開(kāi)封第一講書人閱讀 31,977評(píng)論 1 265
  • 我被黑心中介騙來(lái)泰國(guó)打工, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留谷誓,地道東北人绒障。 一個(gè)月前我還...
    沈念sama閱讀 46,324評(píng)論 2 360
  • 正文 我出身青樓,卻偏偏與公主長(zhǎng)得像捍歪,于是被迫代替她去往敵國(guó)和親户辱。 傳聞我的和親對(duì)象是個(gè)殘疾皇子,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,492評(píng)論 2 348

推薦閱讀更多精彩內(nèi)容