<%@ Page Language="vb" Debug="true" validateRequest="false" %>
<%@ import namespace="system.data" %>
<%@ import namespace="system.data.oledb" %>
<%@Import Namespace="System.Web.Util" %>
<%@ Import Namespace="System.Web.Mail" %>
<script language="VB" runat="server">
sub page_load (obj as object, e as eventargs)
Dim msg as new System.Web.Mail.MailMessage()
msg.Subject = "Test"
msg.Body = "Questo è il testo della mail"
msg.To = "victor8872@libero.it"
msg.From = "dansalsa@dansalsa.it"
SmtpMail.SmtpServer="smtp.paclemanzoni.it"
SmtpMail.Send(msg)
end sub
</script>