rendered paste body'Try
' Dim objMail As New MailMessage
' objMail.From = txbYourName.Text & "<" & txbEmail.Text & ">"
' objMail.To = "info@bnaa.dk"
' objMail.Subject = "Bolignet Århus webmail fra " & txbYourName.Text
' objMail.BodyFormat = MailFormat.Text
' objMail.Body = "Webmail status:" & vbCrLf & _
' "Sendt: " & DateTime.Now & vbCrLf & _
' "Telefon: " & txbPhone.Text & vbCrLf & _
' "Adresse: " & txbAddress.Text & vbCrLf & _
' "Postnummer: " & txbPostalCode.Text & vbCrLf & vbCrLf & _
' "Besked: " & txbMessage.Text
' SmtpMail.SmtpServer = "mail.bnaa.dk"
' SmtpMail.Send(objMail)
' lblFeedback.Text = "Din besked er blevet sendt"
' Session.Abandon()
'Catch ex As Exception
' lblFeedback.Text = "Der skete en fejl, prøv igen. Tak"
'End Try