Advertisement
Guest User

Untitled

a guest
Oct 17th, 2019
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.81 KB | None | 0 0
  1. [Reflection.Assembly]::LoadWithPartialName(“System.Windows.Forms”)
  2.  
  3. $t = (Get-ChildItem ENV:USERPROFILE).Value
  4. $fi = $t + "\pepe.png"
  5. $fo = $t + "\pepe.bmp"
  6. $b = [Text.Encoding]::Unicode.GetBytes($fo)
  7. $b += 0,0,0
  8.  
  9. (new-object net.webclient).DownloadFile('https://i.imgur.com/TrymOlU.png', $fi)
  10. (new-object System.Drawing.Bitmap($fi)).Save($fo,"BMP")
  11. Remove-Item -Path "$($env:APPDATA)\Microsoft\Windows\Themes\CachedFiles" -Force -Recurse -ErrorAction SilentlyContinue
  12. Remove-Item -Path "$($env:APPDATA)\Microsoft\Windows\Themes\TranscodedWallpaper" -Force -ErrorAction SilentlyContinue
  13. Set-ItemProperty -path 'HKCU:\Control Panel\Desktop\' -name TranscodedImageCache -value $b
  14. Set-ItemProperty -path 'HKCU:\Control Panel\Desktop\' -name wallpaper -value $fo
  15. rundll32.exe user32.dll, UpdatePerUserSystemParameters
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement