DevMailerCOM Object Sample
DevMailer is a COM (Component Object Model) object designed to send Email via SMTP from any COM / OLE / ActiveX enabled application. More information can be found at http://www.geocel.com/devmailer
The following is a working sample of how this component
works on Active Server hosting accounts. There are literally thousands
of other combinations, colors, methods, etc that could be used to
accomplish the same function. Please note that we do not provide
support for this sample. It is only provided as a guide to help
you get started.
All the ASP code is documented. What is not documented is the plain HTML tables which were added for aesthetic purposes.
Please note: When using any ASP Mail COM Objects, you must use the specific internal email IP address assigned to that server and "2525" as the port number. We configure SMTP on a non-routable, internal IP with an odd port number so that people can send email through ASP scripts, without having to deal with SMTP authentication issues. You can find out what IP address you should be using by clicking here.
This is what the ASP code looks like:
' Check to see if the "EmailTo" field as filled out, if it was, assume
' all other fields were filled out and try to send email
If Len(Request("EmailTo")) > 0 Then
' Create DevMailer Object
Set Mailer = CreateObject("Geocel.Mailer")
' Add first SMTP server
Mailer.AddServer "192.168.1.35",2525 (this will change depending on which server your account resides on, click here to find out what IP address is assigned to your server.
' Set Sender Information
Mailer.FromAddress = Request("EmailFrom")
Mailer.FromName = Request("EmailFromName")
' Add a recipient to the message
' Set the Subject and Body
Mailer.Subject = Request("Subject")
Mailer.Body = Request("Body")
' Send Email - Perform Error Checking
bSuccess = Mailer.Send()
If bSuccess = False Then
If Mailer.Queued = False Then
Response.Write "Could not send message..queueing failed!"
Response.Write "Could not send message..queued instead!"
Response.Write "Message Sent Successfully!"
<td colspan="2"><b>DevMailer Sample</b></td>
<td valign="top">Email From:</td>
<td><input type="text" name="EmailFrom"></td>
<td valign="top">Email From Name:</td>
<td><input type="text" name="EmailFromName"></td>
<td valign="top">Email To:</td>
<td><input type="text" name="EmailTo"></td>
<td valign="top">Email To Name:</td>
<td><input type="text" name="EmailToName"></td>
<td><input type="text" name="Subject"></td>
<td><textarea cols="40" rows="10" name="Body"></textarea></td>
<td><input type="submit" value="Send Email"></td>
And this is what it looks like in a web browser:
|Home | Hosting | Resellers | About Us | Testimonials | Site Map | Contact Us | Data Center | Helm | Support | Announcements | Order|