Popup email with html in it then send

See more:

VB

Hi i have a form where i fill in some data, then with a button i save it to a database. can i popup the data, which i filled in the form, into a html mail and then send it after i clicked button save&send ?


I have tried something and it works, but it sends the mail directly without popping up, can someone help me pls ? (its my last project for school)

Function mail() As Boolean
       Dim mbody As String
       Dim O_client As New SmtpClient("beopsvr03")
       O_client.Port = 25
       Dim O_Fromaddress As MailAddress = New MailAddress("custservicebookings@spc.com")
       Dim o_toAddress As MailAddress = New MailAddress("dummy@cw2.com")

       Dim o_message As MailMessage = New MailMessage(O_Fromaddress, o_toAddress)
       o_message.To.Clear()
       o_message.To.Add("testtest@scania.com")
       o_message.Subject = "test "

       mbody = "<table><tr><td>test</td></tr></table>" '****HTML
       o_message.Body = mbody

       o_message.IsBodyHtml = True

       O_client.DeliveryMethod = SmtpDeliveryMethod.Network
       O_client.Send(o_message)
       o_message.Dispose()
       mail = True
   End Function

Thanks !!