|
|
<%@Page Explicit="False" Language="VB" Debug="True" %>
<%@Import Namespace="System.Web.Mail" %>
<%
Dim EmailTo As String = "test@test.com"
Dim EmailFrom As String = "myemail@myemail.com"
Dim EmailSubject As String = "Sample Email"
Dim EmailBody As String = "Test email"
System.Web.Mail.SmtpMail.Send(EmailFrom, EmailTo,
EmailSubject, EmailBody)
Response.Write ("Mail sent OK.")
%>
|
1
|
