AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2008 12 03 05:23:57
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB [ Divers / General ] (titicar)

jeudi 5 juillet 2007 à 21:52:07 | 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

titicar
Bonjour,

Dans un projet VB 6 compilé, j'ai placé un commentaire  dans mon projet, par la menu Projet \ Propriété de %Projet1% , onglet Créer, Commentaires (dans la frame Information sur la version).

J'ai déjà trouvé plusieurs API qui peuvent trouver le numéro de version, le copyright, ...
Malheureusement, je n'ai pas trouvé de solution pour connaitre ce fameu Commentaire d'un exe (créer sous VB) depuis un autre programme VB.

Donc, si quelqu'un peut m'aider...

titicar

vendredi 6 juillet 2007 à 20:28:29 | Re : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

PCPT

Administrateur CodeS-SourceS
Réponse acceptée !
salut,


on jète un oeil à l'exe avec notepad....
fabuleux, c'est presque lisible

Option Explicit

Private Sub Form_Load()
    Dim aBytes() As Byte, sBuffer As String, i As Long, iPos As Long

'   récup exe
    aBytes = FichierVersTableauDeByte("C:\b.exe")

'   lit tableau
    sBuffer = vbNullString
    For i = 0 To UBound(aBytes) Step 2
        sBuffer = sBuffer & Chr$(aBytes(i))
    Next i
    
'   position comm
    iPos = InStr(1, sBuffer, Chr$(1) & "Comments" & Chr$(0))
    If iPos = 0 Then
        MsgBox "Aucun commentaire"
    Else
        MsgBox "Commentaire : '" & Mid$(sBuffer, iPos + 10, InStr(iPos + 10, sBuffer, Chr$(0)) - iPos - 10) & "'"
    End If

    Unload Me
End Sub

Private Function FichierVersTableauDeByte(ByVal CheminFichier As String) As Byte()
    Dim fff As Integer
    fff = FreeFile
    Open CheminFichier For Binary As #fff
        ReDim FichierVersTableauDeByte(LOF(fff) - 1)
        Get #fff, , FichierVersTableauDeByte
    Close #fff
End Function


++
PCPT  [AFCK]
Prenez un instant pour répondre à ce sondage svp

samedi 7 juillet 2007 à 17:34:25 | Re : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

PCPT

Administrateur CodeS-SourceS
oui non peut-être?
dimanche 8 juillet 2007 à 11:48:10 | Re : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

titicar
Salut,

C'est vrai que je n'avais même pas eu l'idée de vérifier avec un simple NotePad. Après essai, ça ne marche pas chez moi : la séquence "Comments" est introuvable. Bizarre que ça fonctionne chez toi et pas chez moi (je compile en P-Code et pas en natif).

titicar

dimanche 8 juillet 2007 à 11:56:45 | Re : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

PCPT

Administrateur CodeS-SourceS
salut,
je viens de tester en P-Code et en natif, fonctionne dans les 2 cas

t'as essayé avec un nouveau projet?
sûr que ton exe soit bien fait en VB6?
sûr du chemin également? (dans le doute)

testé avec VB6 PRO SP6
Prenez un instant pour répondre à ce sondage svp

dimanche 8 juillet 2007 à 16:57:24 | Re : 'Extraction' d'un commentaire placé dans un EXEcutable depuis VB

titicar
Re-salut :-)

Je viens de rergarder d'un peu plus près (juste avec NotePad) et mon info est donc en fin de fichier. C'est sûr que je ne pouvais rien trouver en cherchant la séquence "Comments". Dans ta source, j'avais pas fait attention au STEP 2.
Je n'ai essayé qu'une fois ta source, mais VB a planté. Mon test EXE prend 3 méga.

Je vais voir pour chercher, mais en partant de la fin du fichier.
... à suivre :-) et merci encore pour m'avoir aiguillé!

titicar



Cette discussion est classé dans : vb, projet, extraction, commentaire, placé

Répondre à ce message

Sujets en rapport avec ce message

Patchs pour son projet VB [ par COSIDUS ] BonjourJe voudrais s'il est possible de créer des patchs pour ajouter ou modifier des fonctions dans un programme VB qui a été compilé, empaqueté et i Executable?????? [ par Luke ] J'ai un projet VB qui lorsqu'executé en appuyant sur le bouton PLAY fonctionne parfaitement. Je veux l'installer sur des win98. Je me sers donc du dép VB et Win ME !!! [ par Riton ] Salut à tous !Avant, sous Win98, lorsque j'ouvrais un projet, tout allait bien (je n'avais que 24 Mo de RAM, mais bon !!)Maintenant, sous WinME et 320 VB me met une erreure lors de l'execution d'un projet ! [ par Pedro ] Slt,VB me met une erreure lors de l'execution d'un projet !voila le message d'erreur :'Retained' est une clé incorrecte. Le fichier 'C:\Translator\Pro Pb de comilation sous VB [ par Maxdevis ] Bonjour, Je n'arrive pas à compiler mon projet VB, en effet quand je le passe sur un autre ordi que celui sur lequel je l'ai développé il ne marche pa EMPAQUETAGE [ par seb ] BONJOUR,j'ai crer plusieurs projet en vb que j'empaquete avec l'assistant vb.L'empaquetage marche bien mais que j'installe le projet j'ai tjs une erre VBMaX Project !!! Compilateur VB SANS Runtimes [ par DevMaX ] Salut tout le monde !Je suis en train de réaliser un projet de compilateur VB. Evidemment certains diront que VB en a deja un, mais là je parle de com debug dll en vb [ par dédé ] J'utilise une dll dans une application, je dispose du code source en vb de cette dll. J'ai donc créé un groupe de projet comprenant mon application ai VB Edit est sorti ! FREEWARE [ par RV92 ] VB EDIT 1.0 est un FREEWARE gestionnaire de fichiers Microsoft Visual Basic.Vous pouvez demandez votre version à :h.engelbreit@wanadoo.frVoici les fon VB Edit est sorti ! FREEWARE [ par RV92 ] VB EDIT 1.0 est un FREEWARE gestionnaire de fichiers Microsoft Visual Basic.Vous pouvez demandez votre version à :h.engelbreit@wanadoo.frVoici les fon


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,203 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.