การส่งค่าไปทาง URL ให้เป็นภาษาไทย และ SMTP E-mail ครับผม

 Sub SendMailMessage(ByVal from As String, ByVal recepient As String, ByVal bcc As String, _
                                          ByVal cc As String, ByVal subject As String, ByVal body As String)
        Dim mMailMessage As New MailMessage()
        mMailMessage.From = New MailAddress(from)
        mMailMessage.To.Add(New MailAddress(recepient))
        If Not bcc Is Nothing And bcc <> String.Empty Then
            mMailMessage.Bcc.Add(New MailAddress(bcc))
        End If
        If Not cc Is Nothing And cc <> String.Empty Then
            mMailMessage.CC.Add(New MailAddress(cc))
        End If
        mMailMessage.Subject = subject
        mMailMessage.Body = body
        mMailMessage.IsBodyHtml = True
        mMailMessage.Priority = MailPriority.Normal
        Dim mSmtpClient As New System.Net.Mail.SmtpClient()
        mSmtpClient.Send(mMailMessage)
    End Sub

Me.SendMailMessage("[email protected]", "[email protected]", "", "", "test send mail", "Hi Sawatdee.<br><br>Sabye dee mai.")

<system.net>
		<mailSettings>
			<smtp>
				<network host="mail.truemail.co.th"/>
			</smtp>
		</mailSettings>
	</system.net>