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

ThomasIsComingBack 33 Messages postés lundi 19 juillet 2010Date d'inscription 6 mars 2013 Dernière intervention - 28 nov. 2011 à 16:31 - Dernière réponse : ThomasIsComingBack 33 Messages postés lundi 19 juillet 2010Date d'inscription 6 mars 2013 Dernière intervention
- 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 

7 réponses

Répondre au sujet
ehjoe 728 Messages postés samedi 4 avril 2009Date d'inscription 30 mars 2014 Dernière intervention - 29 nov. 2011 à 03:42
+3
Utile
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.
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de ehjoe
Utilisateur anonyme - 28 nov. 2011 à 16:42
0
Utile
Bonsoir,

Tu veux l'ouvrir pour observer son contenu, ou bien l'exécuter ?
Commenter la réponse de Utilisateur anonyme
mottecorp 11 Messages postés dimanche 26 juillet 2009Date d'inscription 28 novembre 2011 Dernière intervention - 28 nov. 2011 à 16:48
0
Utile
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
mottecorp 11 Messages postés dimanche 26 juillet 2009Date d'inscription 28 novembre 2011 Dernière intervention - 28 nov. 2011 à 16:49
0
Utile
ooops !! Un peu à la masse la, désolé :/
Commenter la réponse de mottecorp
ThomasIsComingBack 33 Messages postés lundi 19 juillet 2010Date d'inscription 6 mars 2013 Dernière intervention - 30 nov. 2011 à 15:15
0
Utile
En fait je veux l'éxecuter
Commenter la réponse de ThomasIsComingBack
Sirranamto98 - 21 avril 2013 à 14:04
0
Utile
Tu peux utiliser shell
shell("lechemind'acces")
Commenter la réponse de Sirranamto98
ThomasIsComingBack 33 Messages postés lundi 19 juillet 2010Date d'inscription 6 mars 2013 Dernière intervention - 21 avril 2013 à 14:25
0
Utile
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.