MSDOS ile dosya gizleme-gösterme


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: ByClxon    0 Yorum    116 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy

Paylaşım Tarihi: 12.05.2016, 08:42:06 #1
ByClxon SEA !
Efsane Üye
Status: Çevrimdışı Yorumları:1,010 Konuları:442 Kayıt Tarihi:07.01.2016 Rep Puanı: 667

'uzun uzun kodlar kullanmadan msdos ile visual basic de dosya gizleyip gösterebilirsiniz.
'Forma iki buton Command1=Gizle, Command2=Göster
'üç adet label
'Label3 ün caption bölümüne " işaretini koyon
--------------------------------------------------------------
Private Sub Command1_Click()
Shell "
cmd /k" + Label1 + " & Exit", vbHide
End Sub
Private Sub Command2_Click()
Shell "
cmd /k" + Label2 + " & Exit", vbHide
End Sub
Private Sub Form_Load()
Label1.Caption = "
attrib +s +r +h " & Label3 & App.Path & "/dosya.exe" & Label3
Label2.Caption = "
attrib -s -r -h " & Label3 & App.Path & "/dosya.exe" & Label3
EndSub

Kullanıcı İmzası
#fenerbahçeA.A.K.
Resim http://i.hizliresim.com/nErB8V.png
İletişim İçin Facebook;

Sitemize kayıtlı değilseniz linkleri görebilmeniz İçin Kayıt Olun veya Giriş Yapın


Öfkemiz sarsın her yanı, bozkurtlar yürüye yürüye
Dökülsün düşmanın kanı, yaşasın ırkçı TÜRKİYE!

Taşında gözü olanın yurduna MEZAR kazacağız
Hainin, soysuzun, döneğin alnına VATAN yaazcağız
Hainin, soysuzun alnına YAŞASIN TURAN yazacağız!



Resim http://i.hizliresim.com/LQgldG.png






 

         











Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi


MemoryHackers