Ouvrir un fichier présent dans "Resources" (VB 2010 Express" [Résolu]

Messages postés
33
Date d'inscription
lundi 19 juillet 2010
Dernière intervention
6 mars 2013
- - Dernière réponse : ThomasIsComingBack
Messages postés
33
Date d'inscription
lundi 19 juillet 2010
Dernière intervention
6 mars 2013
- 21 avril 2013 à 14:25
Bonjour,
J'aimerais savoir comment je peux ouvrir un fichier .bat préalablement créé quand je clique sur un bouton. Je l'ai mis dans Resources (dans les propriétés du programme). Je ne sais pas comment faire, ni quelle méthode utiliser. Je veux bien le mettre ailleurs que dans "Resources" mais je n'y arrive pas.
Merci pour votre aide.

Thomas
Afficher la suite 

Votre réponse

7 réponses

Meilleure réponse
Messages postés
728
Date d'inscription
samedi 4 avril 2009
Dernière intervention
30 mars 2014
3
Merci
Bonjour ThomasIsComingBack,

Déjà tu peux le recopier sur ton disque dans le répertoire par défaut, il y sera mieux :


Dim nomFichier As String
Dim cheminPlusFichier As String
nomFichier = "\monBatch.bat"
cheminPlusFichier = My.Application.Info.DirectoryPath & nomFichier
System.IO.File.WriteAllBytes(cheminPlusFichier, My.Resources.monBatch) ' monBatch = ton nom de fichier sans extension.



Mais, un batch, suffit de créer un fichier nommé ainsi, de le charger ligne par ligne du code, et ensuite il marchera...

Pour l'appeler (sous réserve) :


Try
 Process.Start("monBatch.bat")
 Catch ex As Exception
End Try



Cordialement, Joe.

Merci ehjoe 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 97 internautes ce mois-ci

Commenter la réponse de ehjoe
0
Merci
Bonsoir,

Tu veux l'ouvrir pour observer son contenu, ou bien l'exécuter ?
Commenter la réponse de Utilisateur anonyme
Messages postés
11
Date d'inscription
dimanche 26 juillet 2009
Dernière intervention
28 novembre 2011
0
Merci
Certainement, pour afficher le traitement effectué dans un fichier batch dans un interface VB, il suffit d'envoyer le fichier dans un fichier text et de le lire par après pour l'afficher où tu le désires, un TextBox par exemple.

Dim test As New System.Diagnostics.Process
test.StartInfo.FileName = "CMD.exe"
test.StartInfo.Arguments = "/C Dir > c:\ttt.txt"
test.Start()

Ici la commande Dir sera renvoyé dans ttt.txt qui se créera automatiquement. Ensuite, il suffit de le lire

Dim myStream As System.io.StreamReader = Nothing

'Lire un fichier
Try
Me.Cursor.Current = Cursors.WaitCursor
myStream = New System.io.StreamReader("c:\ttt.txt")
Dim line As String
If (Not myStream Is Nothing) Then
Me.TextBox1.Text = Nothing
Do
line = myStream.ReadLine
'Permet d'inscrire le texte qui se trouve dans le fichier dans un TextBox Multiline ...
Me.TextBox1.Text &= line & vbCrLf
Loop Until line Is Nothing
myStream.Close()
End If
Catch ex As Exception
MessageBox.Show("Le fichier ne peut pas être lue")
Finally
Me.Cursor.Current = Cursors.Default
End Try


En espérant que ça puisse t'aider ... Bonne journée.
Commenter la réponse de mottecorp
Messages postés
11
Date d'inscription
dimanche 26 juillet 2009
Dernière intervention
28 novembre 2011
0
Merci
ooops !! Un peu à la masse la, désolé :/
Commenter la réponse de mottecorp
Messages postés
33
Date d'inscription
lundi 19 juillet 2010
Dernière intervention
6 mars 2013
0
Merci
En fait je veux l'éxecuter
Commenter la réponse de ThomasIsComingBack
0
Merci
Tu peux utiliser shell
shell("lechemind'acces")
Commenter la réponse de Sirranamto98
Messages postés
33
Date d'inscription
lundi 19 juillet 2010
Dernière intervention
6 mars 2013
0
Merci
Bien vu l'exhumation de POST !
Commenter la réponse de ThomasIsComingBack

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.