कैसे अपने डेस्कटॉप पृष्ठभूमि के रूप में पृथ्वी की एक वास्तविक समय फोटो सेट करने के लिए

मैं एक ही परिणाम प्राप्त कर रहा हूं, क्या आप हमें इस बात का अधिक विस्तृत विवरण दे सकते हैं कि आपने इसे कैसे तय किया है, हमारे लिए। कार्यक्रम / स्क्रिप्ट क्षेत्र में PowerShell? wheres है कि वास्तव में? और PS स्क्रिप्ट्स फ़ोल्डर कहाँ स्थित है आदि। धन्यवाद

बहुत बढ़िया, यह जानना अच्छा है। बहुत बहुत धन्यवाद, Dan। :)

अरे दोस्त मुझे काला वॉलपेपर मिल रहा है। कोई भी समाधान?

ts = नया- TimeSpan -Hours -2 -Minutes -30 # घंटे और मिनटों की संख्या को जोड़ने / जोड़ने के लिए दिनांक। GMT के बारे में अपनी सिस्टम दिनांक को ऑफसेट करने के लिए इसे समायोजित करें (मुझे लगता है?)
$ अब = ((प्राप्त-दिनांक -ond०० से अधिक) + $ ts)
$ अब = $ अब। AddMinutes (- (अब $। मिनट 10))

$ चौड़ाई = 550
$ स्तर = "4d" #Level 4d, 8d, 16d, 20d हो सकता है
$ numblocks = 4 # यह स्पष्ट रूप से स्तर के साथ मेल खाता है, इसे 'd' के बिना स्तर के समान बनाए रखें
$ समय = अब $। ToString ( "HHmmss")
$ साल = अब $। ToString ( "yyyy")
$ महीना = $ अब। ToString ( "एम एम")
$ दिन = अब $। ToString ( "डीडी")

# फ़ोल्डर बनाएँ मेरी तस्वीरें \ Himawari \ अगर यह मौजूद नहीं है

# फ़ाइल नाम सहेजा जाएगा:
# इस निर्देशिका में फ़ाइलों को जमा करने के लिए उपयोग करें:
# $ संगठन = "$ वर्ष $ माह $ दिन" + "_" + $ समय + ".jpg।"
# इसका उपयोग स्क्रिप्ट को केवल नवीनतम फ़ाइल को संग्रहीत करने के लिए करें:
$ संगठन = "latest.jpg"

$ url = " http://himawari8-dl.nict.go.jp/himawari8/img/D531106/$level/$width/$year/$month/$day/$time"

[शून्य] [reflection.assembly]:: LoadWithPartialName ( "सिस्टम। खिड़कियाँ। फार्म ")
[शून्य] [reflection.assembly]:: LoadWithPartialName ( "सिस्टम। चित्रकारी")

$ छवि = नई वस्तु प्रणाली। चित्रकारी। बिटमैप (($ चौड़ाई * $ numblocks), ($ चौड़ाई * $ numblocks))
$ ग्राफिक्स = [सिस्टम। चित्रकारी। ग्राफिक्स]:: FromImage ($ छवि)
$ ग्राफिक्स। साफ़ ([प्रणाली। चित्रकारी। कला रंग)

के लिए ($ y = 0; $ y-$ $ numblocks; $ Y ++)
{
के लिए ($ x = 0; $ x-$ $ संख्या; $ X ++)
{
$ थुरल = $ url + "_" + [स्ट्रिंग] $ x + "_" + [स्ट्रिंग] + y + ".png"
राइट-आउटपुट "डाउनलोडिंग: $ थ्योरल"

प्रयत्न
{

$ अनुरोध = [सिस्टम। नेट। WebRequest]:: बनाने ($ thisurl)
$ प्रतिक्रिया = $ request.getResponse ()
$ HTTP_Status = [int] $ प्रतिक्रिया। स्थिति का कोड
यदि ($ HTTP_Status -eq 200)
{
$ imgblock = [सिस्टम। चित्रकारी। छवि]:: fromStream ($ response.getResponseStream ())
$ ग्राफिक्स। ड्राइमेज ($ imgblock, ($ x * $ चौड़ाई), ($ y * $ चौड़ाई), $ चौड़ाई, $ चौड़ाई)
imgblock.dispose $ ()
$ प्रतिक्रिया। बंद करे()
}
}
पकड़
{
$ ErrorMessage = $ _। अपवाद। संदेश
$ असफलता = $ _। अपवाद। वस्तु का नाम
लिखो-आउटपुट ”असफल! $ FailItem के साथ $ ErrorMessage "
}
}
}

$ qualityEncoder = [सिस्टम। चित्रकारी। इमेजिंग। एनकोडर]:: गुणवत्ता
$ एनकोडरप्रेम = नई-वस्तु प्रणाली। चित्रकारी। इमेजिंग। एनकोडरपामेटर्स (1)

# यहाँ JPEG गुणवत्ता स्तर सेट करें: 0 - 100 (समावेशी सीमा)
$ EncoderParams। परम [०] = नई-वस्तु प्रणाली। चित्रकारी। इमेजिंग। एनकोडरपैरमीटर ($ qualityEncoder, 90)
$ jpegCodecInfo = [सिस्टम। चित्रकारी। इमेजिंग। ImageCodecInfo]:: GetImageEncoders () | जहाँ {$ _। MimeType -eq 'image / jpeg'}

$ image.save (($ आउटपैथ + $ आउटफिल), $ jpegCodecInfo, $ एनकोडरपैर)
$ छवि। निपटान ()

लिखो-आउटपुट "सेटिंग वॉलपेपर ..."
सेट- ItemProperty -path "HKCU: कंट्रोल पैनल \ डेस्कटॉप" -name वॉलपेपर -वल्यू ($ आउटपैथ + $ आउटफिल)
Set-ItemProperty -path "HKCU: Control Panel \ Desktop" -name WallpaperStyle -value 6
Set-ItemProperty -path "HKCU: Control Panel \ Desktop" -name TileWallpaper -value 0
सेट- ItemProperty 'HKCU: \ Control पैनल \ Colors' -name पृष्ठभूमि -Value "0 0 0"
# rundll32.exe user32.dll, UpdatePerUserSystemParameters

$ सेटवॉटरसोर्स = @ "
सिस्टम का उपयोग कर। रनटाइम। InteropServices;
सार्वजनिक वर्ग वॉलपेपर
{
public const int SetDesktopWallpaper = 20;
public const int UpdateIniFile = 0x01;
public const int SendWinIniChange = 0x02;
[DllImport ("user32.dll", SetLastError = true, CharSet = CharSet। ऑटो)]
निजी स्टैटिक एक्सटर्नल int SystemParametersInfo (int uAction, int uParam, string lpvParam, int fuWinIni);
सार्वजनिक स्थैतिक शून्य SetWallpaper (स्ट्रिंग पथ)
{
SystemParametersInfo (SetDesktopWallpaper, 0, path, UpdateIniFile | SendWinIniBhange);
}
}
"@
Add-Type -TypeDefinition $ setwolarsource
[वॉलपेपर]:: सेटविद्या (($ आउटथ + $ आउटाइल))

लिखो-आउटपुट "हो गया"