Discussion :

[MrPARODIE100]

Bonjour,

Je veux lancer mon programme depuis la sélection ressource.
Mais je ne sais pas comment faire comme commande pour faire exécuter le programme.

Je pensais que c'était possible de faire cela avec ce code…

Code :

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

Process.Start(My.Resources.Xplay)

Mais ce n'est pas le bon code. J'ai fait quelques recherches via GPT et Gemini.
Aucune des solutions trouvée fonctionnait.

Merci d'avance

[popo]

Process.Start va bien exécuter le process passé en paramètre à partir du moment où le chemin passé est correct.

[Pol63]

si tu as glissé un fichier dans les ressources, il a normalement été transformé en tableau d'octet dans my.Resoures
auquel cas il faut écrire le fichier sur le disque (ou vérifier que ca n'a pas été fait précédemment) avant de le lancer

if not system.io.file.exists (path)

system.io.file.writeallbytes(path, my.Resources.truc)

[MrPARODIE100]

ok, mais maintenant, j'ai une erreur avec "path".
Il me dit que c'est impossible de convertir une valeur de typr byte() en string.

[Pol63]

tant pis ...

[MrPARODIE100]

Merci quand même.

[MrPARODIE100]

si tu as glissé un fichier dans les ressources, il a normalement été transformé en tableau d'octet dans my.Resoures
auquel cas il faut écrire le fichier sur le disque (ou vérifier que ca n'a pas été fait précédemment) avant de le lancer

if not system.io.file.exists (path)

system.io.file.writeallbytes(path, my.Resources.truc)

Avec ton code, j'ai pu trouver une solution avec aussi GPT.
Maintenant, cela fonctionne.

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
 
Dim tempFilePath As String = Path.Combine(Path.GetTempPath(), "internet.exe")
 
        Try
            ' Écrire les octets de la ressource dans un fichier temporaire
            System.IO.File.WriteAllBytes(tempFilePath, My.Resources.Internet)
 
            ' Vérifier si le fichier temporaire existe
            If System.IO.File.Exists(tempFilePath) Then
                ' Lancer le programme exécutable depuis le fichier temporaire
                Process.Start(tempFilePath)
            Else
                ' Gérer le cas où le fichier temporaire n'existe pas
                MessageBox.Show("Erreur: Le fichier temporaire n'existe pas.")
            End If
        Catch ex As Exception
            ' Gérer l'erreur lors de l'écriture du fichier temporaire
            MessageBox.Show("Erreur: " & ex.Message)
        End Try

[popo]

Avoir un code qui fonctionne, c'est bien.
Le comprendre, c'est mieux.

Tu avais une erreur assez basique (même pour un débutant).
Est-ce qu'au moins tu as compris pourquoi tu avais cette erreur ?
Ou est-ce que tu as simplement pris le code de ChatPGT sans te poser de question ?

[umfred]

D'autant que ton code c'est exactement ce qu'avait dit de faire Pol63 dans sa réponse #3 ...

[Pol63]

non, le miens était plus logique, je testais l'absence du fichier avant de l'écrire, pas après
parce qu'une fois que tu viens de l'écrire, forcément il existe

mon "tant pis" était plus sarcastique