Duvar kağıdımızın bulunduğu klasörü açalım


Windows 10 da duvar kağıdı klasörünü açalım

Sayfalarımızda Windows 10 u eleştiren yazılar yazıyoruz ve eleştirilerimizin kaynağını ; Sistem üzerinde kullanıcı kontrolünün azaltılması var , bugün yine en basitinden bir duvar kağıdı kaynak klasörünün yolunu

bulmada kolay bir yol payulaşmak zorunda kalmamız sistemin ne hale geldiğinin bir göstergesi.

Diyelimki bilgisayar başından kalktınız o sırada kızınız bilgisayara oturdu ve internetten indirdiği bir duvar kağıdını arkaplan olarak ayarladı , buraya kadar sorun yok , siz resmi okadar beğendinizki işyerinizdeki laptopunuzdada kullanmak istiyorsunuz , dediniz muhtemelen indirilenler klasöründedir baktınız yok , masasütünü sağ tıkladınız – Görüntü ayarları dediniz sağa baktınız sola baktınız resmin ön görünümü orada ama basitçe arkaplan resmini kopyalayacak bir seçenek yok

Windows 10 arka plan

Gözat kısmına tıkladınız Resimler klasörü açıldı (Orada zaten yok) , iş sinir edici bir hal almaya başladı arkadaş duvar kağıdımı kopyalamak istiyorum , nekadar basit bir istek , Microsoft bunu karşılamaktan aciz malesef , bu onlar için merihe uzay aracı yollamaktan daha zor olmalı ki böyle bir seçeneği koydularsa bile ben göremiyorum , haa varsada zaten ilk başta bulamadıysam alsınlar bu sistemi başlarına çalsınlar burada mesele yine duvar kağıdı değil mesele kullanıcı kontrolüne en küçük bir duvar kağıdı olayında bile izin vermemek , Onlar yönetecek , onların dediği olacak (Ama parasını siz vereceksiniz – Vay be ne güzel dünya)
Windows 10 Duvar kağıdının yolunu aşağıdaki registry kaydında “TranscodedImageCache” anahtarında Binary değeri olarak saklar

HKEY_CURRENT_USER\Control Panel\Desktop

Aşağıdaki resimde bunu açıkça görüyoruz

Desktop registry kaydi

Bir scriptle bu ikilik kod şeklinde saklanan mevcut duvar kağıdının yolunu buldurtup klasörü açtırtırsak sorun hallolacaktır , işte burada yardımımıza vbs koşuyor aşağıdaki script bu işe yarıyor yani mevcut duvar kağıdımız hangi klasörde ise o klasörü açıyor

Const HKCU = &H80000001 'HKEY_CURRENT_USER

sComputer = "."   

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
            & sComputer & "\root\default:StdRegProv")

sKeyPath = "Control Panel\Desktop\"
sValueName = "TranscodedImageCache"
oReg.GetBinaryValue HKCU, sKeyPath, sValueName, sValue


sContents = ""

For i = 24 To UBound(sValue)
  vByte = sValue(i)
  If vByte <> 0 And vByte <> "" Then
    sContents = sContents & Chr(vByte)
  End If
Next

CreateObject("Wscript.Shell").Run "explorer.exe /select,""" & sContents & """"

Bu kodları bir not defterine yapıştırıp bir isim verelim ve uzantısı .vbs olacak şekilde kaydedelim sonrasındada çalıştıralım

Duvar kağıdı klasörü

örneğimize geri dönersek , kızımız bu duvar kağıdını “E:\hepsi\wallpapers\0” klasörüne kaydetmiş ki script çalıştırılınca bu klasör açıldı ve evet resim oradaydı , scriptin hazır halini aşağıdan indirebilirsiniz

Download



2 Yorum Var

Yorum Ekle

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

CAPTCHA