1. Anasayfa
  2. Genel

Explorer Açılış Sayfası Kilitlenmesi


0

Çoğumuzunun başına gelmiştir. Explorer başlangıç sayfası kilitlenmiştir değiştiremiyorsunuz müdahale edemiyorsunuzişte buna bir çözüm kodu ben yazmadım sadece bir yerden buldum ve sizlerle paylaşmak istedim. Aşağıdaki kodu .vbs formatında kaydedin ve çalıştırın birincisinde açılmassa ikinci çalıştırmanızda kesin likle başlangış sayfanızı kendiniz belirleyecek durama geleceksiniz :)

Option Explicit
Dim WSHShell, RegKey, ValueA, Result
On Error Resume Next
Set WSHShell = CreateObject("WScript.Shell")
RegKey = "HKEY_CURRENT_USERSoftwarePoliciesMicrosoftInte  rnet ExplorerControl Panel"
ValueA = WSHShell.RegRead (regkey & "HomePage")

If ValueA = 0 Then 'Change Homepage is Enabled.
Result = MsgBox("Ability to Change Homepage is currently [Enabled]." & _
vbNewLine & "Would you like to Disable?" & _
vbNewLine & "Will lock and Gray it out." & _
vbNewLine & "May need to Log-off for effect.", 36)
If Result = 6 Then 'clicked yes
WSHShell.RegWrite regkey & "HomePage", 1
End If
Else 'Change Homepage is Disabled
Result = MsgBox("Ability to Change Homepage is currently [Disabled]." & _
vbNewLine & "Would you like to Enable?", 36)
If Result = 6 Then 'clicked yes
WshShell.RegDelete "HKCUSoftwarePoliciesMicrosoftInternet ExplorerControl PanelHomePage"
'Delete Key cause it don't exist normally
End If
End If

Bu İçeriğe Tepkin Ne Oldu?
  • 0
    ba_ar_l_
    Başarılı
  • 0
    gayet_yi
    Gayet İyi
  • 0
    te_ekk_rler
    Teşekkürler
  • 0
    anlamad_m
    Anlamadım
  • 0
    yetersiz
    Yetersiz
İlginizi Çekebilir
Subscribe
Bildir
guest

This site uses Akismet to reduce spam. Learn how your comment data is processed.

0 Yorum
Inline Feedbacks
View all comments