cs_radada
Messages postés488Date d'inscriptionlundi 15 septembre 2003StatutMembreDernière intervention21 avril 2009
-
28 oct. 2003 à 20:20
FreezerCorp
Messages postés22Date d'inscriptionmardi 21 février 2006StatutMembreDernière intervention26 janvier 2007
-
13 avril 2006 à 18:30
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
FreezerCorp
Messages postés22Date d'inscriptionmardi 21 février 2006StatutMembreDernière intervention26 janvier 20071 13 avril 2006 à 18:30
ah oui c'est lui :)
Mindiell
Messages postés558Date d'inscriptionjeudi 25 juillet 2002StatutMembreDernière intervention 5 septembre 20071 30 oct. 2003 à 20:37
Norton antivirus ? ;o)
krissssss
Messages postés88Date d'inscriptionjeudi 26 décembre 2002StatutMembreDernière intervention 2 janvier 2007 30 oct. 2003 à 19:09
J'ai entendu qu'il y avait un virus qui enlevait d'autre virus, je trouve ce genre de viruss interressant :-)
Alors ceux qui veulent vraiment faire des virus, faites les comme celui-là (dommage que je n'ai pas le nom :p).
Mindiell
Messages postés558Date d'inscriptionjeudi 25 juillet 2002StatutMembreDernière intervention 5 septembre 20071 29 oct. 2003 à 10:47
Lol, il faut creer des virus mais pas dans un environnement windows...
Cree toi un virus (une entite reproductible) dans une zone memoire de ta machine et regarde le evoluer (visualisation graphique). C'est tout aussi interessant et c'est incapable de faire du mal !
Uvatha
Messages postés34Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention17 mai 2007 29 oct. 2003 à 01:23
t'en mets pas un peu trop la? Moi jme suis intéressé aux virii il ya bien longtemps mais j'ai fini par trouver dautres choses a faire... ce monde contient deja trop de connards ki veulent juste faire chier lmonde avec leur virii... je ne critique pas les créateurs mais je critique le fait kils propagent le virus (pas tout le temps mais souvent)... certains virus sont des bijoux côté code mais il fo surtout pas lutiliser contre qqun... créer pour apprendre est correct mais créer pour détruire.. sé con.
hvb
Messages postés939Date d'inscriptionvendredi 25 octobre 2002StatutMembreDernière intervention27 janvier 20093 28 oct. 2003 à 22:33
lol on commence par un faux "hacked by" et on finit codeur de ****** de virii, on passe a la télé, et puis ...
cs_blabla
Messages postés112Date d'inscriptionmercredi 28 août 2002StatutMembreDernière intervention13 mars 2004 28 oct. 2003 à 22:15
Perso a ma megre connaisence en prog le code et pas super super ...
mais sa pour moi c pas grave le resulta est la et je di bien !!
continue ;)
cs_radada
Messages postés488Date d'inscriptionlundi 15 septembre 2003StatutMembreDernière intervention21 avril 20091 28 oct. 2003 à 20:20
Pas mal : ). Mais tu aurais pu faire + simple je pense...
tu mets simplement ton texte dans une variable, et tu utilise la fonction Left$(texte,nb) qui renvoie nb lettre depuis la gauche de texte...
Private Sub Timer1_Timer()
Dim texte As String
texte = "You have been Hacked!!!"
Static a
a = a + 1
Form1.Label1.Caption = Left$(texte, a)
Static b
b = b + 8
If b < 256 Then
Form1.Label1.ForeColor = RGB(b, 0, 0)
Else
End If
End Sub
13 avril 2006 à 18:30
30 oct. 2003 à 20:37
30 oct. 2003 à 19:09
Alors ceux qui veulent vraiment faire des virus, faites les comme celui-là (dommage que je n'ai pas le nom :p).
29 oct. 2003 à 10:47
Cree toi un virus (une entite reproductible) dans une zone memoire de ta machine et regarde le evoluer (visualisation graphique). C'est tout aussi interessant et c'est incapable de faire du mal !
29 oct. 2003 à 01:23
28 oct. 2003 à 22:33
28 oct. 2003 à 22:15
mais sa pour moi c pas grave le resulta est la et je di bien !!
continue ;)
28 oct. 2003 à 20:20
tu mets simplement ton texte dans une variable, et tu utilise la fonction Left$(texte,nb) qui renvoie nb lettre depuis la gauche de texte...
Private Sub Timer1_Timer()
Dim texte As String
texte = "You have been Hacked!!!"
Static a
a = a + 1
Form1.Label1.Caption = Left$(texte, a)
Static b
b = b + 8
If b < 256 Then
Form1.Label1.ForeColor = RGB(b, 0, 0)
Else
End If
End Sub