Discussion :

[Lnmex]

Bonjour,

Désolée pour ma question surement très simple pour vous...

J´ai cherché un peu partout, mais je n'arrive pas à me positionner dans un répertoire en utilisant une application console...
J´ai vu dans la faq que l´on peut avoir toutes les racines, mais je n´ai pas trouvé d´endroit où l´on peut spécifier ses sources...

J´ai besoin de l´application console pour l´utiliser comme une console DOS pour lancer plusieurs .exe et voir le déroulement au fure et à mesure.

Il est possible de se déplacer dans l´application console? Pour changer de répertoire?

Merci!

[StormimOn]

Si j'ai bien compris ce que tu veux, je pense que ce que tu cherches c'est la méthode statique SetCurrentDirectory de la classe Directory (espace de noms System.IO).

[Mathieu Francesch]

Il est possible de se déplacer dans l´application console? Pour changer de répertoire?

Merci!

Bonsoir,

Je vous ai fait un bout de code qui pourrait peut-être amorcer votre projet.
Cela peut-être une idée pour votre besoin de changer de répertoire.

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
25
26
27
28
29
30
31
32
 
    Sub Main()
        Dim Dossier As String = My.Application.Info.DirectoryPath
        Dim Reponse As Integer
 
        While Reponse <> 3
            Console.WriteLine("Le dossier courant est : " + Dossier)
            Console.WriteLine("1- Aller dans un autre dossier ?")
            Console.WriteLine("2- Lister les exécutable du dossier courant ?")
            Console.WriteLine("3- Quitter la console ?")
            Reponse = Console.ReadLine
            Select Case CType(Reponse, Integer)
                Case 1
                    Dossier = Console.ReadLine
                    While Not Directory.Exists(Dossier)
                        Console.WriteLine("Le dossier " + Dossier + " n'éxiste pas")
                        Dossier = Console.ReadLine
                    End While
                Case 2
                    For Each FichierExe As String In Directory.GetFiles(Dossier)
                        If Path.GetFileName(FichierExe).ToLower.Contains(".exe") Then
                            Console.WriteLine(Path.GetFileName(FichierExe))
                        End If
                    Next
                Case 3
                    End
                Case Else
                    Console.WriteLine("Erreur dans vote choix")
                    Reponse = Nothing
            End Select
        End While
    End Sub

Par rapport à votre demande, ce n'est pas complet (J'entends par là l'exécution de vos différents exe + quelques tests supplémentaires).