Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
04/11/2010 15:17
Konu Sahibi
gitarc
Yorumlar
0
Okunma
2174
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy

gitarc

Aktif Üye
Kullanici Avatari
Aktif Üye
14
01/11/2010
0
Balıkesir
Ofis XP
17/04/2017,13:54
form içine iki adet buton yerleştirin ve kod kısmına aşağıdaki kodları yapıştırın.

Visual Basic Code
1
2
3
4
5
6
7
8
9
Private Sub Command1_Click() 'Göster
Set goster = CreateObject("Wscript.Shell")
goster.regwrite "HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/Advanced/Hidden", 1, "REG_DWORD"
End Sub

Private Sub Command2_Click() 'Gizle
Set gizle = CreateObject("Wscript.Shell")
gizle.regwrite "HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/Advanced/Hidden", 2, "REG_DWORD"
End Sub


PROGRAMMER MEHMET
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

[-]
Etiketler
dosya gizle klasörleri göster gizli


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.