Show/Hide hidden files skripta

[mat]

Eto mislim da je naslov dovoljno jasan. Moze li se napisati skripta (batch?) kojom bih ukljucio/iskljucio "Show hidden files and folders"? Hvala unaprijed

[Dule]

nije batch ali je vbs.

Autor kod

Set sh = CreateObject("WScript.Shell")
theKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden"
setHidden = sh.RegRead(theKey)

If setHidden = 1 Then
setHidden = 0
MsgBox "System and hidden files will no longer appear in Explorer.",64,"Hidden File Exchange"
Else
setHidden = 1
MsgBox "System and hidden files will appear in Explorer.",64,"Hidden File Exchange"
End If

sh.RegWrite theKey,setHidden,"REG_DWORD"
Set sh = Nothing

samo c/p u notepad i rename u whatever.vbs. edit po volji.

[mat]

ne radi. javlja se msgbox ali cini mi se da se nista ne promjeni u registryu (prebrzo je). i ne mjenja se nista...

[mat]

hmmm u biti bullet u folder options se prebaci na ono drugo ali se i dalje vide/ne vide. sve dok ne odem u folder options, kliknem na jedan bullet (bilo koji, oznaceni ili neoznaceni) pa mi omoguci apply

[Nikky]

Dule je bio u pravu samo je zaboravio napomeniti da treba restartati glupi shell kako bi promjena bila vidljiva.

Vidi skriptu:http://www.kellys-korner-xp.com/regs...iddenfiles.vbs

[mat]

je ovako je ok
e sad jel se moze maknut "yes - no" dijalog ili mora s njim biti?

[Nikky]

A možeš remirat MsgBox dijaloge, premda je bolje ostavit radi potvrde. Osim toga nije lipo kad neka skripta prčka po postavkama a da ti to neznaš.