<%@ Page Language="VB" EnableSessionState="False" EnableViewState="False" Trace="False" Debug="False" Strict="True" %>
<%@ Import Namespace="System.Web.Mail" %>
Sub Page_load(Sender as Object, E as EventArgs)
If request.form("EmailAddress") = "" Then
dim strResponse as string = "
Send Email using ASP.NET formatted in HTML
"lblMessage.Text = strResponse
Else
dim strResponse as string = "You just sent an email message formatted in HTML to:
" & request("EmailAddress") & "
"lblMessage.Text = strResponse
End If
End Sub
Sub btn_Click(sender as Object, e as System.EventArgs)
If request.form("EmailAddress") <> ""
Dim mail As New MailMessage
mail.From = "youraddress@domain.com"
mail.To = request.form("EmailAddress")
mail.Subject = "Message sent using ASP.NET and CDONTS"
mail.Body = "HTML Message sent from ASPFree.com using ASP.NET and Cdonts
Wonder how this is done?
Wonder How to setup CDONTS?"
mail.BodyFormat = MailFormat.Html
SmtpMail.Send(mail)
End If
End Sub
Sending Email via ASP.NET and CDONTS..
How do I setup my server to use CDONTS?


