JMail i VB.NET

Sæt en reference til JMail og lav noget alá følgende:
Public Function F_Send_eMail(ByVal V_Service As String, ByVal V_E_Mail As String, ByVal V_Subjet As String, ByVal V_Body As String) As Integer
        Dim Tstring As String, ErrMsg As Integer
        Dim JMail As New jmail.SMTPMail()
        Tstring = V_Body + vbNewLine
        JMail.Silent = True
        JMail.Logging = True
        JMail.ServerAddress = "mail.epfl.ch:25"
        JMail.Sender = "alerter@epfl.ch"
        JMail.AddRecipient(V_E_Mail)
        JMail.Priority = 1
        JMail.Subject = V_Service & ", " & V_Subjet
        JMail.Body = Tstring

        If Not JMail.Execute Then
            ErrMsg = 0
        Else
            ErrMsg = 1
        End If
        JMail = Nothing
        F_Send_eMail = ErrMsg
    End Function

tak for kanon hurtig svar.
Jeg tester i løbet af i dag....

Fjong. De 60 point er dine. Jeg gir en øl, hvis du kommer forbi Viborg ;-)
(det med attachement er jo også meget nemt, når bare man får startet rigtigt)

Jeg skal straks sige til hvis jeg skulle komme den vej :D