email problemer

Imports System.Web.Mail

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

SmtpMail.SmtpServer = "mailserver"
        SmtpMail.Send("fra", "til", "subject", "body")

End Sub

det var lige hvad jeg fandt ud ved at søge herinde, og jeg må da være dum, for det virker ikke, der må mangle noget kode, nogle der kan hjælpe her ?