Forum
Bildirimler
Hepsini Temizle
Windows Client
9
Yazılar
4
Üyeler
0
Likes
2,013
Görüntüleme
Konu başlatıcı
Merhaba,
Etki Alanına bağlı XP Pro bilgisayarlarımızda zaman zaman Active Desktop Recovery hatası alıyorum bunun çözümü olarakta resimdeki işlemi yaparak aşıyorum. Current users>KullanıcıID>Software>Microsoft>Internet Explorer>Desktop>SafeMode>Components>DeskHtmlVersion "0"
her kullanıcı için benzersiz id olduğu için genelde "DeskHtmlVersion" u arattırarak buluyorum bu dosyayı.
benim yapmak istediğim şey şu;
bütün klasörlerde Safe Mode altında ki "DeskHtmlVersion" dosyasını bulup değerini "0" yapmasını istiyorum.
VBS olarak bunu nasıl yapabilirim yardımcı olursanız sevineceğim.
Gönderildi : 14/10/2015 11:58
Merhaba,
VB script var mı bilmiyorum ancak registry üzerinde bir çok değişikliği kolaylaştıran REgistryX programı var. http://www.dcsoft.com/products/regeditx/ isterseniz inceleyin.
Ayrıca VBS olarak bir sitede şöyle bir konu var; http://www.experts-exchange.com/OS/Microsoft_Operating_Systems/Windows/Q_23178275.html
Gönderildi : 14/10/2015 12:09
Konu başlatıcı
önerdiğiniz program güzelmiş ancak 200 kullanıcılı bir ortamda bu program üzerinden bilgisayarlara tek tek bağlanıp ilgili dosyayı arattırıp bulmak bana extra bir kolaylık sağlamayacak,
ikinci linkte cevabı göremiyorum üyelik gerektirdiği belirtilmiş o da ücretli sanırım
birilerinin illa ki ihtiyacı olmuştr böyle birşeye, registry değerini bulup değiştirecek bir komut bence çok zor olmasa gerek ama bulamıyorum yardımcı olabilecek kimse yok sanırım kimse bilmiyor
Gönderildi : 15/10/2015 13:00
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.RegWrite "Current users>KullanıcıID>Software>Microsoft>Internet Explorer>Desktop>SafeMode>Components>DeskHtmlVersion", 0, "REG_DWORD"
Gönderildi : 15/10/2015 13:55
Konu başlatıcı
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.RegWrite "Current users>KullanıcıID>Software>Microsoft>Internet Explorer>Desktop>SafeMode>Components>DeskHtmlVersion", 0, "REG_DWORD"
cevabınız için teşekkür ederim,
KullanıcıID değişken olacak, yani Users> tüm Kullanıcılar da bu işlem yapılacak
bunu yapabilirmisiniz
Gönderildi : 15/10/2015 14:10
active desktop'u gpo ile kapatmak daha kolay degil mi ?
Gönderildi : 15/10/2015 14:26
Konu başlatıcı
active desktopu kapatamam.
sistemde hala xp bilgisayarlar var gpo dan dağıtılan tema duvarkağıdı vs active desktop kapalı olunca sağlıklı dağıtılmıyor, masaüstü simge arkaplanlarına kadar hatalar oluşuyor
Gönderildi : 15/10/2015 14:40
On Error Resume Next
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set objRegistry=GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
Set objShell = WScript.CreateObject("WScript.Shell")
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList"
objRegistry.EnumKey HKEY_LOCAL_MACHINE, strKeyPath, arrSubkeys
For Each objSubkey In arrSubkeys
strValueName = "ProfileImagePath"
strSubPath = strKeyPath & "\" & objSubkey
objRegistry.GetExpandedStringValue HKEY_LOCAL_MACHINE,strSubPath,strValueName,strValue
p = InStrRev(strValue, "\")
strValue2 = Right(strValue, Len(strValue) - p)
objShell.RegWrite "HKEY_USERS\"& objSubkey &"\Software\Microsoft\Internet Explorer\Desktop\SafeMode\Components\DeskHtmlVersiyon", 0, "REG_DWORD"
Next
Gönderildi : 15/10/2015 15:16
Konu başlatıcı
teşekkürler İlhan Bey,
istediğim şey tam olarak buydu, elinize sağlık.
iyi forumlar..
Gönderildi : 16/10/2015 16:46
