找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 16603|回复: 2

[技术讨论] PowerShell必应壁纸 简单可靠。

[复制链接]
发表于 2020-1-29 19:17:55 | 显示全部楼层 |阅读模式
本帖最后由 xczxczxcz 于 2020-2-25 21:48 编辑

用久了,也就腻了。所以删了。
发表于 2020-2-25 18:10:27 | 显示全部楼层
bing图片的json 8张图片数据,文件名和格式都有,可以改一下成下载器
//i=  0今日;1昨日;2前天;-1明天
http://cn.bing.com/HPImageArchive.aspx?format=js&idx="+i+"&n=8
 楼主| 发表于 2020-2-25 21:43:34 | 显示全部楼层
回复 2# kaze

这个8张图,个人感觉没啥好玩的。还是顺其自然的每天一更好。
这个可下8张。

  1. $uri = 'http://cn.bing.com/HPImageArchive.aspx?format=js&idx="+i+"&n=8';

  2. (irm $uri).images | select @{n = 'name'; ex = { $_.copyright -replace '\s+\(.*' } },
  3. @{n = 'link'; ex = { 'https://cn.bing.com' + $_.url } } | % {
  4.         Write-Host '正在下载'$_.name' ......' -NoNewline;
  5.         try {
  6.                 $file = [IO.PATH]::Combine($pwd, ($_.name+'.jpg'));
  7.                 [Net.WebClient]::new().DownloadFile($_.link, $file);
  8.                 Write-Host '完成' -fore Green;
  9.         }
  10.         catch { Write-Host '下载失败' -fore Red }
  11. }
  12. Pause;
复制代码
https://bing.ioliu.cn  这个更多。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 07:11 , Processed in 0.017971 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表