chivas group

chivas group

juwendi uciha

juwendi uciha
publik

file.txs

On Error Resume Next Dim wshell dim anharku Set wshell = CreateObject("wscript.shell") anharku = "Sayang kapan kamu kembali ke indonesia? apa kamu kembali dengan hatimu yang dulu?" dim i wscript.sleep 2000 wshell.Run "notepad",3 WScript.sleep 180 for i = 1 to len(anharku) wshell.sendkeys mid(anharku,i,1) wscript.sleep 50 next wscript.sleep 1800 wshell.sendKeys "%+{F4}" wscript.sleep 1000 wshell.sendKeys "~" wscript.sleep 1800 wshell.sendKeys "v" WScript.sleep 250 wshell.sendKeys "i" WScript.sleep 250 wshell.sendKeys "s" WScript.sleep 250 wshell.sendKeys "a" WScript.sleep 250 wshell.sendKeys "n" WScript.sleep 250 wshell.sendKeys "o" WScript.sleep 250 wshell.sendKeys "y" WScript.sleep 250 wshell.sendKeys "a" WScript.sleep 1000 wshell.sendKeys "~" WScript.sleep 250 wshell.sendKeys "~" WScript.sleep 250 wscript.quit

Daftar Blog Saya

Rabu, 26 Mei 2010

cara buat antivirus

VirusName : Scandown
VirusSize : 4.50 KB (4,608 bytes) => langsung dicopy dari properties.
Icon : aplikasi biasa
CRC32 : 229F17A7
MD5 : 39F479C3989F0D30CB3C9AE2270D78FC

Menyebar ke:
-C:\command.exe
-C:\autorun.inf
-C:\windows\hh.exe
-C:\windows\clh.exe
-C:\windows\Mstask.exe
-C:\windows\Scanregw.exe
-C:\windows\Sndvol32.exe
-C:\windows\Winhlp32.exe
-C:\windows\system32\Abcwin.exe
-C:\windows\system32\ddhelp.exe
-C:\windows\system32\Scandown.exe
-C:\windows\system32\clh.exe
-C:\windows\system32\mshta.exe

Modifikasi registry:
-HKLM\Software\microsoft\windows\currentversion\run\Scan Downloads Files For Virus
=> “C:\windows\system32\scandown.exe”

Mengapa saya berinama “Scandown”? Yah, kelihatannya lebih banyak kata “Scandown” pada virus ini. He he he… (sungguh tidak beralasan). Mungkin AV lain memberi nama yang berbeda.

Dan sudah saya cek dengan beberapa antivirus lokal, ternyata belum ada yang mendetek.
Wajar juga, virus ini bukanlah virus lokal.
Demi mencegah penyebaran virus ini di Indonesia, saya tidak sertakan link untuk mendownload virus ini. Tapi jika memang kamu ingin mendapatkan virus ini, silakan download langsung di http://www.vx.netlux.org/ cari virus yang namanya “Worm.Win32.VB.f”

Semoga artikel ini menambah wawasan anda.
By:Visa MarQuza Root Noya (pendiri)

______________________________________________
Computer dapat menulis sendiri??
---------------------------------------------------------------------
Saya akan memberikan gmn caranya computer dapat menulis,
tanpa harus kita yang mengetik pada keyboard.

1 . Buka start, All program, Accessories, pilih notepad.
2 . Copy dan Paste source code di bawah ini kedalam notepad tadi :

On Error Resume Next
Dim wshell
dim anharku
Set wshell = CreateObject("wscript.shell")
anharku = "Sayang kapan kamu kembali ke indonesia? apa kamu kembali dengan hatimu yang dulu?"
dim i
wscript.sleep 2000
wshell.Run "notepad",3
WScript.sleep 180
for i = 1 to len(anharku)
wshell.sendkeys mid(anharku,i,1)
wscript.sleep 50
next
wscript.sleep 1800
wshell.sendKeys "%+{F4}"
wscript.sleep 1000
wshell.sendKeys "~"
wscript.sleep 1800
wshell.sendKeys "v"
WScript.sleep 250
wshell.sendKeys "i"
WScript.sleep 250
wshell.sendKeys "s"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 250
wshell.sendKeys "n"
WScript.sleep 250
wshell.sendKeys "o"
WScript.sleep 250
wshell.sendKeys "y"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 1000
wshell.sendKeys "~"
WScript.sleep 250
wshell.sendKeys "~"
WScript.sleep 250
wscript.quit

3 . Simpan dengan nama 'File.txt' (tanpa tanda kutip).
4 . Ubah nama 'File.txt ' menjadi 'File.vbs' (tanpa tanda kutip)
5 . Klik dua kali pada 'File.vbs' (Open), dan tunggu proses akan berjalan.

Tidak ada komentar: