Salut je suis un débutant en programmation je voudrais envoyer un mail qui contient les données de plusieurs lignes selectionnées d'un datagrid
j'ai essayé ce code mais il envoie un mail vide
j'ai mis ce code pour le boutton qui selectionne la ligne du data grid
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
      Private Sub btn_select_Click(sender As Object, e As EventArgs) Handles btn_select.Click
        compt = compt + 1
        For i = compt To i = 10
            nom(i) = dgv_livres.SelectedRows(0).Cells(0).Value.ToString
            catégorie(i) = dgv_livres.SelectedRows(0).Cells(1).Value.ToString
            auteur(i) = dgv_livres.SelectedRows(0).Cells(2).Value.ToString
            etat(i) = dgv_livres.SelectedRows(0).Cells(3).Value.ToString
            message(i) = "nom : " & nom(i) & vbNewLine & "catégorie : " & catégorie(i) & vbNewLine & " auteur" & auteur(i) & vbNewLine & _
            " etat: " & etat(i) & vbNewLine & "nbr_pages : " & nbr_pages(i)
        Next
    End Sub
et j'ai mis ce code pour l'envoie du mail

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
Private Sub btn_envoie_Click(sender As Object, e As EventArgs) Handles btn_envoie.Click
 
        Dim mymail As New MailMessage
        Dim smtpserver As New SmtpClient("smtp.gmail.com")
        mymail.From = New MailAddress("l'email ")
        mymail.To.Add("l'email de destination ")
        mymail.Subject = ("Inscription")
        For j = 1 To j = 10
            mymail.Body = mymail.Body + (message(j))
        Next
        smtpserver.Port = ("587")
        smtpserver.Credentials = New System.Net.NetworkCredential("L'email ", "le mot de passe ")
        smtpserver.EnableSsl = True
        smtpserver.Send(mymail)
        '---------------------------------------
        MsgBox("enregistrement reussie ")
    End Sub
comme je l'ai mentionné je ne suis qu'un debutant il y'a de fortes chances que tout ce code est à coté de la plaque
merci pour toute indication ou correction