[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 435
  • Last Modified:

Server.CreateObject Failed

I get the following error message when I try to submit a simple email form:

'----------------------------------------------------------------------------------------------------------
Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/equipment_InfoRequestForm_Verification.asp, line 176

800401f3
'----------------------------------------------------------------------------------------------------------

Here is the code it is refering to:

sub sendEmail()      
      Set Mail=Server.Creat   eObject("Persits.MailSender")
      Mail.Host="www.billco-mfg.com"
      Mail.Port=25
      Mail.From=Email
      Mail.FromName=Name
      Mail.AddAddress "sales@billco-mfg.com"
      Mail.AddBCC "webmaster@billco-mfg.com"
      Mail.Subject="WEB REQUEST: Information on " & ProdTitle
      Mail.Body="NOTE:  This is an auto-generated email by Billco Website"
      Mail.Priority=1
      Mail.ContentTransferEncoding="Quoted-Printable"
      strErr=""
      bSuccess=False
      On Error Resume Next
      Mail.Send
      if Err<>0 then
            strErr=Err.Description
      end if      
end sub
0
axnst2
Asked:
axnst2
1 Solution
 
AgentSmith007Commented:
I'm sure this isn't a huge breakthrough, but is the Persits.MailSender component installed on your web server?
0
 
muzzy2003Commented:
Sounds like the most likely contender to me, Agent Smith! :)
0
 
axnst2Author Commented:
I'm sorry I really am an ASP idiot.  I usually program in C++.  Our old web server burned in a fire and I am just trying to get the old website on the new server running.  The guy who originally wrote the code is no longer around.  So here is my idiot question;  Is Persists.MailSender something that's supposed to come with windows or is it a part of some other software package?

Thanks a lot guys
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
AgentSmith007Commented:
It's an external component that can be purchased/downloaded @ www.persits.com. Just install that on your web server & ur code should be good to go.
0
 
AgentSmith007Commented:
Go here for downloading/installing instructions:
http://www.aspemail.com/download.html
0
 
hongjunCommented:
You may consider changing the code to CDO since it comes along with your IIS

0
 
hongjunCommented:
OR CDONTS
0
 
hongjunCommented:
Below will tell you how to send email using coding.
Please note that normal HTML will not be able to achieve sending an email with attachments. In HTML we use mailto and that only restricts us in the To, Cc, Bcc, Subject and Body field. To send an email with attachments, you need to use a server-side scripting language. I will show you how to do that in Active Server Pages (ASP). That means you will need a web server.

If you are using Win NT or Win 2000 and have CDONTS.dll installed, then you can do the following using Internt Information Server (IIS) as your web server.
<%
Dim objMailer
Dim strBody

' You can have HTML tags here
' You can therefore customize the format you want to send
strBody = "<TABLE BORDER='0'><TR><TD>Hello</TD><TD>World</TD></TR></TABLE>"

Set objMailer = CreateObject("CDONTS.Newmail")
objMailer.From = "sender@domain.com"
objMailer.To = "receipent@domain.com"
objMailer.Subject = "Your subject here"
objMailer.BodyFormat = 0
objMailer.Mailformat = 0
objMailer.Body = strBody
objMailer.Send
Set objMailer = Nothing
%>

If you wish to include an attachment, below is the syntax
objNewMail.AttachFile(Source [, FileName] [, EncodingMethod] )

See this for more information on CDONTS.
http://msdn.microsoft.com/library/psdk/cdo/_denali_newmail_object_cdonts_library_.htm

If you do not have IIS because you are not running ntfs partition, then you will need to download a web server and I recommend you using Personal Web Server (PWS). Download it at http://www.microsoft.com/ntserver/nts/downloads/recommended/nt4optpk/default.asp. Note that PWS will not be able to support CDONTS.

If you are using other versions of Windows, then you got to install a server component. I recommend using AspEmail. It can be downloaded from http://www.aspemail.com
To learn how to code using the AspEmail component, you can download its user manual from the site itself. It is very comprehensive and complete. There's even an asp example page showing that.

Other available components
   Genusa's AspMail
   http://www.serverobjects.com/products.htm#Aspmail

   ASPEmail
   http://www.aspemail.com/

   Dundas Mailer
   http://www.dundas.com/index.asp?/products/mailer

   MailListBot
   http://www.MailListBot.com/

   EasyMail
   http://www.easymailobjects.com/emobjects/smtp.asp

   w3 Jmail
   http://www.dimac.net/

   HTMLMailer / HTMLMailerPlus
   http://www.oopadelic.com/htmlmailer/
   http://www.oopadelic.com/htmlmailerplus/

   DevMailer
   http://www.geocel.com/devmailer/

   VSEmail
   http://www.vsoft-tech.com.au/vsemail/readme.html

   Mabry Mail
   http://www.mabry.com/mail/index.htm

   NNTPClient+SMTPClient
   http://www.liquidcool.com/asp

   SimpleMail
   http://www.adiscon.com/SimpleMail

   AB Active X Mailer
   http://www.geocities.com/ResearchTriangle/2656/abmailer.html

   OCXMail
   http://www.flicks.com/aspmail/

   WindMail
   http://www.geocel.com/windmail/

   Zaks.POP3
   http://www.zaks.demon.co.uk/code/cpts/pop/index.html


Good Luck
hongjun
0
 
AgentSmith007Commented:
You could go through your entire site & restructure it to work with a different mail component, however assuming you were using persits before, it's very possible that you already own a license to it.
0

Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now