Salim berbagi…. tempat belajar dan berinteraksi…. – Send Email Function
April 21, 2010, 1:28 AM
Filed under: SOFTWARE

#Region “send_email”
    Public Function send_email(ByVal recipient, ByVal id_ehelpdesk, ByVal subject, ByVal message)
        ‘Send Email Notification
        Dim mail_message As New MailMessage()
        recipient = “
        mail_message.From = “From Me (”
        mail_message.To = recipient
        mail_message.Subject = subject
        mail_message.Body = message
        mail_message.BodyFormat = MailFormat.Html
        SmtpMail.SmtpServer = “”
    End Function
#End Region


1 Comment so far
Leave a comment

learning english is quite easy, there arem any tutorials on the internet and some audiobooks too -“~

Comment by Spoon Rest

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s

%d bloggers like this: