473,666 Members | 2,368 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

CDONTS Problem

Hi All,

I had this simple CDONTS form to email code working a few days ago. However
it doesn't seem to work now as I am not receiving the emails the form
generates.

Below is my code, can anyone see any errors in it ? I think I've looked at
it too many times and keep missing an obvious error. The form posts the form
content to the query string.

Thanks

John

<%

If Request.QuerySt ring("isSubmitt ed") = 1 Then

Dim ContactName, Email, Company, Address1, Address2, City, County, PostCode,
Country, Tel, Fax, BusinessType,Co mments

Dim objCDO

ContactName = Request.QuerySt ring("ContactNa me")
Email = Request.QuerySt ring("EmailAddr ess")
Company = Request.QuerySt ring("Company")
Address1 = Request.QuerySt ring("Address1" )
Address2 = Request.QuerySt ring("Address2" )
City = Request.QuerySt ring("City")
County = Request.QuerySt ring("County")
PostCode = Request.QuerySt ring("PostCode" )
Country = Request.QuerySt ring("Country")
Telephone = Request.QuerySt ring("Telephone ")
Fax = Request.QuerySt ring("Fax")
BusinessType = Request.QuerySt ring("BusinessT ype")
Comments = Request.QuerySt ring("Comments" )

Set objCDO = Server.CreateOb ject("CDONTS.Ne wMail")

objCDO.From = Trim(EmailAddre ss)

objCDO.To = "te**@nospam.co .uk"

objCDO.Cc = "li******@nospa m.co.uk"

objCDO.Subject = "Contact From Website at " & Now & " - Subscribe " &
EmailAddress & "Specificat ion Update"

objCDO.Body = "<html><body>Co ntact from Website" _
& "<ul><li>Na me: " & ContactName & "</li>" _
& "<li>Compan y: " & Company & "</li>" _
& "<li>Addres s 1: " & Address1 & "</li>" _
& "<li>Addres s 2: " & Address2 & "</li>" _
& "<li>City: " & City & "</li>" _
& "<li>County : " & County & "</li>" _
& "<li>Post Code: " & PostCode & "</li>" _
& "<li>Countr y: " & Country & "</li>" _
& "<li>Email Address: " & EmailAddress & "</li>" _
& "<li>Teleph one: " & Telephone & "</li>" _
& "<li>Fax: " & Fax & "</li></ul>" _
& "<p><u>Busi ness Type</u></p>" _
& BusinessType _
& "<p><u>Comments </u></p>" _
& Comments _
& "</body></html>"

objCDO.BodyForm at = 0

objCDO.MailForm at = 0

objCDO.Send

Set objCDO = Nothing

End If

%>
Jul 19 '05 #1
2 2232
You're using GET? Interesting.

Is the SMTP service running on your server?
Are there any messages in the application or system log?
Are there a bunch of messages sitting in the server's pickup directory or
queue directory?
Have you tried creating a test page to send yourself e-mail that does not
conditionally send only if something is true as you have below?
Have you tried just commenting out your IF statement, which is probably not
going to be true since Request.Queryst ring("isSubmitt ed") probably equals
"1" not 1?
Try some of those things.

Ray at work

"John Savidge" <te**@lbj.co.uk > wrote in message
news:eS******** ********@TK2MSF TNGP10.phx.gbl. ..
Hi All,

I had this simple CDONTS form to email code working a few days ago. However it doesn't seem to work now as I am not receiving the emails the form
generates.

Below is my code, can anyone see any errors in it ? I think I've looked at
it too many times and keep missing an obvious error. The form posts the form content to the query string.

Thanks

John

<%

If Request.QuerySt ring("isSubmitt ed") = 1 Then

Dim ContactName, Email, Company, Address1, Address2, City, County, PostCode, Country, Tel, Fax, BusinessType,Co mments

Dim objCDO

ContactName = Request.Q

Jul 19 '05 #2
D'Oh, spotted problem now!
Email = Request.QuerySt ring("EmailAddr ess") objCDO.From = Trim(EmailAddre ss)


Jul 19 '05 #3

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

2
10580
by: Henry | last post by:
Hi, Im trying to send a mail from my webpage using CDONTS but i keep getting the errormessage "Invalid class string" (0x800401F3). I have the SMTP service installed and running on my IIS server on XP. It's when i try to create a NewMail object from the CDONTS library that the problem occurs: set objMail = server.createobject("CDONTS.NewMail") What could be the problem?
29
3532
by: | last post by:
I did a working code with CDONTS on NT4 Now I am testing is on w2k and it looks like objCDONTS.Send is completely ignored. I think is it ignored because it throws no errors, neither does the rest of the code setting objCDONTS=Server.CreateObject("CDONTS.NewMail") and then manipulating its properties. Do I need to somehow set IIS5 to make objCDONTS.Send work?
4
480
by: Murat Dagdelen | last post by:
Hi, an asp script that uses cdonts is bringing an error while I submit it more then once. The script is a simple asp script that sends email by using cdonts. But when I run the script more then once in a minute or two, it returns an error (Something like 800921290 kind of number). I have checked the cdonts version, it is the latest, and I use win2k server sp4 with iis 5.0. What would be the problem ?
8
3948
by: Boris | last post by:
Could someone please tell me if I can use CDONTS in W 2003 Server environment to send emails the same way it is used in W2K Server. I have heard that CDONTS is no longer available in W 2003 Server and if so, how can I send emails from ASP page... Many thanks in advance
4
4332
by: F | last post by:
Hi Some one has posted this question on 10th August, as CDONTS is not working on windows 2003 serever. I have the same problem and I copied CDONTS.DLL from Windows 2000 Server and registered on Win 2003 server but it giving the error on line when I calling method send of the object. Error is Microsoft VBScript runtime error '800a0046'
16
3163
by: tshad | last post by:
I have both cdosys.dll and cdonts.dll on my W2K3 server. We have been told by our web authors that their asp code won't work on our machine and that we don't have CDONTS installed on our machine. They're getting an error from: Set objCDOMail = Server.CreateObject("CDONTS.NewMail") I know that the new format is:
9
6269
by: scott | last post by:
I have my win 2003 server setup correct with SMTP. I know because I've tested it ok. However, when I issue CODE 1 below, I get ERROR 1 below. I thought having SMTP installed correctly allowed ASP to use CDONTS as a mail generator. Is there more to it? CODE 1: Set objMail = Server.CreateObject("CDONTS.NewMail")
5
27694
by: MichaelK | last post by:
What do I need to do to enable CDONTS om my macine to make it working I'm testing the code: Dim objCDO Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.To = "xyz@xxxxx.com" objCDO.From = "zyx@zzzzz.com" objCDO.Subject = "TESST CDONTS MAIL" objCDO.Body = "SOME TEXT TO SEND OVER"
4
1296
by: =?Utf-8?B?U2ltb25X?= | last post by:
Platform WinSVR 2003 IIS 6 Having installed and registered CDONTS.dll in \system32, I am still experiencing the following error message when runnng the intranet web site. (And my boss is getting edgy with me) ============================ Processing..........
3
3296
by: tamaker | last post by:
I have Road Runner cable internet access and Im working in a local development environment (writing .ASP) and have a site running on my network on a windows xp pro machine via IIS with CDONTS installed. When I try to send a confirmation email (simple text) via CDONTS the message is built but remains on the server in the QUEUE folder ... how can I tweak the SMTP settings on the server to allow me to send email out from the server... ...
0
8355
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
0
8866
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. Here is my compilation command: g++-12 -std=c++20 -Wnarrowing bit_field.cpp Here is the code in...
0
8781
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth. The Art of Business Website Design Your website is...
0
7381
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
6191
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...
0
5662
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert into image. Globals.ThisAddIn.Application.ActiveDocument.Select();...
0
4193
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
2
2006
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.
2
1769
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.