Deteksi Lokasi Windows Di VB 6.0

Bagi temen-temen programer VB nih da srcipt buat deteksi lokasi windows. Copy aja sript ini di form vb anda dan sediakan satu commandbutton dan beri nama "Command1" yaaa...

Private Declare Function GetSystemDirectory Lib "kernel32" _
Alias "GetSystemDirectoryA" _
(ByVal lpBuffer As String, ByVal nSize As Long) As Long

Private Sub Command1_Click()
Dim lokasi As String
Dim panjang As Integer
lokasi = Space(255)
panjang = GetSystemDirectory(lokasi, 255)
lokasi = Left(lokasi, panjang)
MsgBox "Lokasi Windows Ada Di " & Left(lokasi, 11), vbInformation
End Sub

Semoga bisa berguna buat program anda , tapi jangan buat bikin Virus yaa......... gak baik tuu......




contac use : WWW.waahyu_ku@yahoo.co.id

Posted by Wahyu on 03.17 0 komentar

Folder Rahasia

Semua orang pastilah mempunyai rahasia. Jika pekerjaan anda berhubungan dengan komputer, Aplikasi ini sangat cocok untuk anda, ini adalah Aplikasi untuk menyembunyikan folder.Jika anda punya file-file yang sangat di rahasiakan dan orang lain tidak boleh tau maka taruah file tersebut di sebuah folder, lalu sembunyikan folder tersebut dengan Aplikasi Folder rahasia. Anda bisa mendownload di http://www.4shared.com/get/223614843/1ef30d8a/folder_rahasia.html .Jika mau update anda bisa kontak langsung di www.waahyu_ku@yahoo.co.id

Posted by Wahyu on 20.45 0 komentar

Tips Mengatasi VIrus HP secara manual tanpa di Flash

Hand Phone jenis symbian saat ini semakin di tinggalkan karena gampang terinfeksi virus. Tapi taukah anda rahasia kelebihan jenis ini.. Karena prinsip kerjanya yang hampir mirip seperti PC maka gampang banget di manipulasi.termasuk juga dapat memanipulasi Backup.
nah untuk penggila HP jenis Symbian pastilah VIrus adalah musuh besar anda.
Berikut adalah Tips Mengatasi Virus.tapi Tips ini berfungsi jika HP masih bisa Booting / nyala.

1. Backup dulu di kartu memory lalu lepas kartu memory dan restart.
2. Instal Aplikasi untuk meng Explore file seperti Select Q,File Man,F Explorer atau yang lain.disini saya menggunakan File Man Karena menurut pengalaman
lebih gampang.
3. Instalah Aplikasi tersebut di Drive c: ( di memori Handphone).
4. Buka Aplikasi tersebut lalu pilih buka Folder C:\System\data\ lalu tandai file bernama extensi .sys dan yang bernama sys ber extensi bebas.lalu hapus jika ada.
5. Lalu buka Folder C:\System\booddata lalu hapus folder dan hapus folder c:\system\recorg (jika ada).
6. Buka
Folder C:\system\Apps pilih semua file yang ber extensi .dat .sys dan .sis
7. buka Folder C:\system\mail pilih option pilih Find masukan kata kunci *.sis lalu ok
8. Jika ditemukan maka itulah sumber Virusnya pilih semua lalu hapus.
9. jika tidak bisa menghapus file yang saya sebutkan di atas cari sarang virus nya di Folderc:\system\data tandai semua file lalu hapus (jangan takut menghapus kerena file yang di folder tersebut cuma file setingan saja.maka ada file penting maka akan muncul konfirmasi <> artinya file tersebut sedang di baca system pilih skip lalu lanjutkan menghapus.
10. jika sudah restart HP lalu lakukan penghapusan lagi.
11. Jika masih tidak bisaa di hapus maka pada keadaan stanby ketik *#7370# pilih yes, masukan password(jika masi standard =12345) lalu OK.
12. Lakukan penghapusan lagi.
13. selamat mencoba....


contac use : WWW.waahyu_ku@yahoo.co.id

Posted by Wahyu on 02.37 0 komentar

Aneh Tapi Logis

Keanehan windows
Sadarkah anda kalau windows yang anda pakai selama ini mempunyai keanehan...????

1. Jika tidak percaya buatlah folder bernama con dengan windows explorer.Apakah anda bisa.????
2.Buka Microsoft Word Versi berapasaja lalu ketik =rand(200,99) lalu enter. lihat apakah yang terjadi??
3.Pada Notepad ketik ikan thu ama tempe lalu simpan dengan nama sembarang dan extensi .txt . contoh haha.txt lalu lalu buka file tersebut. jadi aneh kan????

Posted by Wahyu on 01.04 0 komentar