Agir dans un autre programme
Fermé
Geo373
Messages postés
598
Date d'inscription
mercredi 10 juin 2009
Statut
Membre
Dernière intervention
29 juillet 2014
-
8 juil. 2009 à 14:21
jjsteing Messages postés 1669 Date d'inscription vendredi 11 mai 2007 Statut Contributeur Dernière intervention 21 mai 2012 - 8 juil. 2009 à 15:37
jjsteing Messages postés 1669 Date d'inscription vendredi 11 mai 2007 Statut Contributeur Dernière intervention 21 mai 2012 - 8 juil. 2009 à 15:37
A voir également:
- Agir dans un autre programme
- Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
- Fichier ouvert dans un autre programme - Guide
- Frequence programme national ✓ - Forum Messagerie
- Programme demarrage windows 10 - Guide
- Programme bonjour ✓ - Forum Windows
5 réponses
jjsteing
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
8 juil. 2009 à 14:25
8 juil. 2009 à 14:25
Si tu t y connais en vb ben rien de plus simple avec une boucle et un sendkeys... mais je te préviens que ca peut etre tres tres long...
le prog peut etre quelque chose dans ce gout la :
Dim Txt()
Txt = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z")
tmp = 0
SendKeys ("%{TAB}")
DoEvents
'54 = s
VarA = 54
While VarA < 62
VarB = 30
While VarB < 62
VarC = 24
While VarC < 62
'VarD = 0
'While VarD < 62
'e = Now
'Do Until Now > e + TimeValue("0:00:01")
On Error Resume Next
DoEvents
'Loop
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
Form1.Caption = (Txt(VarA) & Txt(VarB) & Txt(VarC) & Txt(VarD))
SendKeys (Form1.Caption)
DoEvents
'temps = Now
'Do Until Now > temps + TimeValue("0:00:01")
'Loop
SendKeys ("{TAB}")
SendKeys ("{ENTER}")
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
SendKeys ("{ENTER}")
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
SendKeys ("+{HOME}")
'SendKeys ("{TAB}")
'SendKeys ("{TAB}")
'SendKeys ("{TAB}")
DoEvents
'VarD = VarD + 1
'Wend
VarC = VarC + 1
Wend
VarB = VarB + 1
Wend
VarA = VarA + 1
Wend
le prog peut etre quelque chose dans ce gout la :
Dim Txt()
Txt = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z")
tmp = 0
SendKeys ("%{TAB}")
DoEvents
'54 = s
VarA = 54
While VarA < 62
VarB = 30
While VarB < 62
VarC = 24
While VarC < 62
'VarD = 0
'While VarD < 62
'e = Now
'Do Until Now > e + TimeValue("0:00:01")
On Error Resume Next
DoEvents
'Loop
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
Form1.Caption = (Txt(VarA) & Txt(VarB) & Txt(VarC) & Txt(VarD))
SendKeys (Form1.Caption)
DoEvents
'temps = Now
'Do Until Now > temps + TimeValue("0:00:01")
'Loop
SendKeys ("{TAB}")
SendKeys ("{ENTER}")
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
SendKeys ("{ENTER}")
temps = Now
Do Until Now > temps + TimeValue("0:00:01")
Loop
SendKeys ("+{HOME}")
'SendKeys ("{TAB}")
'SendKeys ("{TAB}")
'SendKeys ("{TAB}")
DoEvents
'VarD = VarD + 1
'Wend
VarC = VarC + 1
Wend
VarB = VarB + 1
Wend
VarA = VarA + 1
Wend
Geo373
Messages postés
598
Date d'inscription
mercredi 10 juin 2009
Statut
Membre
Dernière intervention
29 juillet 2014
96
8 juil. 2009 à 14:39
8 juil. 2009 à 14:39
Non je m'y connais qu'en langage c
PAr contre ce qui m'interesserai c'est la partie de ton code qui agit sur winrar pour essayer de l'utiliser avec quelques modifications en langage c
PAr contre ce qui m'interesserai c'est la partie de ton code qui agit sur winrar pour essayer de l'utiliser avec quelques modifications en langage c
jjsteing
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
8 juil. 2009 à 14:50
8 juil. 2009 à 14:50
ben tu peux le faire en C..
Je te proposait VB car c'est beaucoup plus simple pour créer ce genre de ptit prog...
Le principe du cose est exactement le meme.. juste la gestion de ta fenetre de lancement a ajouter et quelques traduction de langage ;)
Mais, au risque de me répéter.. ca va prendre du temps... imagine un peut, bon la mon code n est que pour 4 caractere.. mais donc le prog doit lister tous les mdp possibles pour ces 4 caractere soit (26x2+10)^4 donc 62^4 soit 14 776 336 de possibilité, avec a chaque fois un ptit temps de latence pour vérifier le mdp et le decompresser... et ca c'est que pour un mot de passe à 4 caracteres.. imagine si tu veux tester sur 6,7,8.. ca va mettre des plombes !!
Mais sinon, je sais qu il existe des hackRar... pour faire tout ca beaucoup mieux et plus vite que de tester tous les code possible... mais je n ais pas de sources à ce sujet.
Je te proposait VB car c'est beaucoup plus simple pour créer ce genre de ptit prog...
Le principe du cose est exactement le meme.. juste la gestion de ta fenetre de lancement a ajouter et quelques traduction de langage ;)
Mais, au risque de me répéter.. ca va prendre du temps... imagine un peut, bon la mon code n est que pour 4 caractere.. mais donc le prog doit lister tous les mdp possibles pour ces 4 caractere soit (26x2+10)^4 donc 62^4 soit 14 776 336 de possibilité, avec a chaque fois un ptit temps de latence pour vérifier le mdp et le decompresser... et ca c'est que pour un mot de passe à 4 caracteres.. imagine si tu veux tester sur 6,7,8.. ca va mettre des plombes !!
Mais sinon, je sais qu il existe des hackRar... pour faire tout ca beaucoup mieux et plus vite que de tester tous les code possible... mais je n ais pas de sources à ce sujet.
Geo373
Messages postés
598
Date d'inscription
mercredi 10 juin 2009
Statut
Membre
Dernière intervention
29 juillet 2014
96
8 juil. 2009 à 15:36
8 juil. 2009 à 15:36
ok merci pour ta réponse, je vais essayer en langage c et si c'est trop compliqué, je me mettrai au vb
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
jjsteing
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
8 juil. 2009 à 15:37
8 juil. 2009 à 15:37
ok, tiens nous au jus...
@++
@++