Discussion :

[geek-59600]

Bonsoir,

J'aimerai lancé un programe externe ( un exe ou bat ce n'est pas encore fixé ) de facon invisible .

J'ai commencé par la commande Shell et j'aurai utilisé VBHide mais d'aprés ce que j'ai lu sur les forum sur la plate forme .net on utlise la class Process

Aprés quelque recherche j'ai compris qu'il fallais utiliser Process.startInfo

J'ai essayé de trouvé plusieur portion de code sur le net que j'aurais modifier pour répondre a mes besoins mais cela ne fonctionne pas .

Mon code est le suivant :

Code :

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

1
2
3
4
5
6
  Dim MyProcess As New Process
        MyProcess.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
        MyProcess.StartInfo.CreateNoWindow = True
        MyProcess.StartInfo.FileName = "calc.exe"
        MyProcess.StartInfo.UseShellExecute = False
        MyProcess.Start()

Malheuresement cela ne marche pas, je sens que je vais me faire enguirlander car cette question a déja été plusieur fois posé mais tout ce que j'ai pu trouver n'a pas été concluent :/

Pourriez vous m'expliquer ou ca coince ?

Merci d'avance et désolé encore si je remets cette question sur le tapis

Bonne soirée

[smyley]

Bien en fait on peut facilement cacher la fenêtre que ce que l'on veut exécuter est un fichier bat ou une application console (normalement ton code devrais marcher dans ces deux cas).
Par contre pour une application avec un GUI, il faudrait chercher les fenêtres appartenant au processus que tu viens de lancer puis les cacher manuellement ... ce qui est sport ...

[geek-59600]

Apparement on ne peut pas caché "calc" du moins pas comme ca j'ai essayé avec mspaint et ca fonctionne ^^ donc le souci est résolu

[geek-59600]

Je reviens vous ennuyer avec une autre question .

Quand je souhaite ouvrir une instance ftp.exe avec le code cité au dessus il n'y a pas moyen que les arguments de lancement sois pris en compte .

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Module Module1
 
    Sub main()
 
        Dim Info As String
 
        Info = "C:\Documents and Settings\Master\Bureau\Nico\Final\ftp.txt"
 
        Dim startInfo As New ProcessStartInfo
 
        With startInfo
 
            .FileName = "c:\windows\system32\ftp.exe"
 
            .Arguments = "-s:" & Info
 
            Process.Start(startInfo)
 
        End With
 
    End Sub
 
End Module

Auriez vous une idée ?

Merci d'avance .

Bonne Soirée