[Débutant] Eviter une exception non gérée sur button

Eviter une exception non gérée sur button

Bonjour à tous :)

J'étais venu vous demander de l'aide il y a quelque mois sur un bout de programmation car je voulais obtenir la chose suivante : quand l'utilisateur clique sur le bouton "mail" la messagerie par defaut présent sur l'ordi de l'utilisateur s'ouvre et me copie certain label ;-)

Mais en testant par hasard mon programme sur un autre pc sans messagerie par defaut et bien j'obtiens cette erreur :

Citation:

Une exception non gérée s'est produite......... Aucune application n'est associée au fichier spécifié pour cette opération

Ce qui est tout à fait normal :lol:

Donc j'aimerais que si il n'y a pas de messagerie par défaut alors une form s'ouvre ... exemple : If "pas de messagerie par défaut" then Form1.show

Voici mon bout de code ou j'aimerais intégrer cela :
Code:

1 2 3 Dim body As String = Label5.Text & vbCrLf & Label6.Text & vbCrLf & Label7.Text & vbCrLf & Utilisateur.Text + TextBox3.Text & vbCrLf & Label1.Text + TextBox2.Text Dim command As String = String.Format("mailto:{0}?subject={1}&body={2}", "mon adressemail@gmail.com", "Demande de renseignements", Uri.EscapeDataString(body)) Process.Start(command)
Etant débutant je ne trouve pas la solution... Auriez-vous une idée ??

Merci encore pour votre aide précieuse :ccool:;)

Salut,

Peut être comme ça:

Code:

1
2
3
4
5
6
7
8
9
    Dim body As String = Label5.Text & vbCrLf & Label6.Text & vbCrLf & Label7.Text & vbCrLf & Utilisateur.Text + TextBox3.Text & vbCrLf & Label1.Text + TextBox2.Text
    Dim command As String = String.Format("mailto:{0}?subject={1}&body={2}", "mon adressemail@gmail.com", "Demande de renseignements", Uri.EscapeDataString(body))
    Try
        Process.Start(command)
        'reussite
    Catch(ex As Exception)
        'echec
        Form1.Show()
    End Try

Je te remercie beaucoup c'est ce que je cherchais :ccool:
Un grand merci !