Ouvrir un fichier ex ; .exe et changer premiere ligne

rsx602 Messages postés 140 Date d'inscription jeudi 24 août 2006 Statut Membre Dernière intervention 28 août 2014 - 20 oct. 2009 à 01:09
rsx602 Messages postés 140 Date d'inscription jeudi 24 août 2006 Statut Membre Dernière intervention 28 août 2014 - 20 oct. 2009 à 13:50
Bonjours je suis présentement sur un project et je suis bouché à un endroit , mon programme consiste à ouvrir un fichier de type .exe ou .fla ect.. et de changé la première ligne , Exemple : si metton la première ligne du .exe c'est Ae4Fb1 sa le changerais exemple , Gp6Wa3 (tout en gardant minuscule ou majuscule) ensuite fermer le fichier et le sauvegarder à l'endroit ou je les ouvert , cela est fessable? j'imagine. Merci de tout aide et désoler de mon français :S

5 réponses

elguevel Messages postés 718 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 22 novembre 2016 3
20 oct. 2009 à 08:54
Bonjour,

- Pour info, si tu change la première ligne d'un exe celui-ci ne fonctionnera plus.

- Qu'appels tu par ligne ? car dans un exe tu ne tombera peut etre jamais sur un caractère de retour chariot. Du coup ta première ligne peux etre ton .exe complet.

- Sinon pour modifier un fichier tu peux utiliser StreamReader et StreamWriter.
0
elguevel Messages postés 718 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 22 novembre 2016 3
20 oct. 2009 à 08:55
Oups, désolé je n'avais pas vu que tu étais en VB6... pour l'ouverture de fichiers regardes la fonction "Open"
0
jmf0 Messages postés 1566 Date d'inscription mardi 26 décembre 2000 Statut Membre Dernière intervention 5 avril 2013 8
20 oct. 2009 à 09:46
Bonjour,

On dirait fort qu'il cherche à bousiller un executable
0
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
20 oct. 2009 à 10:21
Salut
Oui, c'est "fessable" (capacité à recevoir des fessées ?)

Dim FileBytes(0 To 5) As Byte
Dim mesBytes(0 To 5) As Byte
mesBytes(0) = Asc("G")
mesBytes(1) = Asc("p")
mesBytes(2) = Asc("6")
mesBytes(3) = Asc("W")
mesBytes(4) = Asc("a")
mesBytes(5) = Asc("3")
Open "C:\mon.EXE" For Binary Access Read Write As #1
Get #1, 1, FileBytes
If FileBytes(0) = Asc("A") And _  
   FileBytes(1) = Asc("e") And _
   FileBytes(2) = Asc("4") And _
   FileBytes(3) = Asc("F") And _
   FileBytes(4) = Asc("b") And _
   FileBytes(5) = Asc("1") Then
      Put #1, 1, mesBytes
End If
Close #1

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
rsx602 Messages postés 140 Date d'inscription jeudi 24 août 2006 Statut Membre Dernière intervention 28 août 2014
20 oct. 2009 à 13:50
Merci, en fait c'est pour modifier un fichier avec un extension drg quand je modifie la première ligne sa me permet de pouvoir l'utilisé plus d'une fois , mais jack si jamais j'ouvre un fichier (exe) et que la première ligne n'est pas pareil comme celui de mon exemple alors sa ne fonctionnera pas ?
0
Rejoignez-nous