Site hosted by Angelfire.com: Build your free website today!

<% ' Anonymous Mail! ' version 1.0 ' (c) 2000 Secone ' http://www.secone.com ' info@secone.com ' file: anonymous.asp ' programming: System33r / s.r.t <% <% If request.form("flag")=""then %>

Anonymous Mailer by System33r

Please enter all the required fields or it won't be send.

From:
To:
Subject:
Body of Message:




<% Else Dim anonFrom,anonTo,anonSubj,anonBody anonFrom = request.form("From") anonTo = request.form("To") anonSubj = request.form("Subject") anonBody = request.form("Body") Set objMail = CreateObject("CDONTS.NewMail") objMail.From=anonFrom objMail.To=anonTo objMail.Subject=anonSubj objMail.Body=anonBody intReturn=objMail.Send() %>

The message sent successfully - Please Link to Secone on your site! - www.Secone.com

<% End If %>