Discussion :

[synthetize]

Bonjour,

Je me permets de poster ici car malgré plusieurs recherches, je ne trouve pas d'information utile à mes points bloquants ;
J'ai deux points, bloquants :
1/ Est-il possible d'embarquer des .sys/.dll/.exe dans notre projet, et lors du build de l'.exe n'avoir donc aucun fichier à côté ? (C/C++ Je sais que c'est faisable, mas VB NET j'avoue ne pas avoir trouvé d'info)
2/ Comment puis-je faire pour executer plusieurs (6) .exe avec des arguments (example.exe /SN 5FDF98789) localisé dans "C:\Users\username\Temp\example.exe" l'un après l'autre
(Car par défault, cela va s'exécuter tous en même temps et cela ne va pas être vraiment hyper bon)

Merci par avance

[wallace1]

Bonsoir,

Il est possible d embarquer tout type de fichiers dans ton executable en tant que resources (embedded).
Lors de l execution de ton exe (celui qui contient les embedded resources), tu peux ecrire les resources embedded sur le disque dur , un exemple (tres approximatif) : system.io.file.writeallbytes("c:\temp\UNERESOURCEEXE.EXE", my.resources.uneresourceexe.exe)

Pour le point n°2 :

Pour pouvoir appeler un exe en ligne de commande il te faudra le coder et recuperer les arguments avec :
My.Application.CommandLineArgs
Cela aura pour effet de retourner les parametres dans une collection de string

[Pol63]

1/ ILMerge

[synthetize]

@Wallace1, @Pol63

Merci pour vos retour.
Concernant le point 1/, c'est parfait, c'est exactement ce qu'il me fallait, merci (@Wallace1)

Concernant le point 2/, je n'ai pas tout à fait compris, j'ai beau regarder la documentation, je ne comprends pas vraiment le fonctionnement. (@Wallace1)

J'ai a peu près réussi a faire ce que je voulais avec le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Try
        Dim BS_start As New ProcessStartInfo()
        BS_start.FileName = "AMIDEWINx64.exe"
        BS_start.WorkingDirectory = TempPath
        BS_start.Arguments = "/BS " & BS & ""
        Process.Start(BS_start)
Catch ex As Exception
        MsgBox("baseboard ERROR")
End Try

En faisant de cette manière, cela fonctionne, mais lorsque j'ajoute 5/6x ce code "Try" avec son contenu, parfois il execute, parfois pas..
Je n'arrive pas a trouver un moyens fiable d'executer 6/7 fois (avec des param différents) et que cela s'execute réellement.

[synthetize]

Le problème est résolu en ajoutant .WaitForExit() après mon Process.Start()

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Try
        Dim BS_start As New ProcessStartInfo()
        BS_start.FileName = "xxx.exe"
        BS_start.WorkingDirectory = TempPath
        BS_start.Arguments = "/xx " & xx & ""
        Process.Start(BS_start).WaitForExit()
Catch ex As Exception
        MsgBox("baseboard ERROR")
End Try