Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
CDONTS Error Message
- Thread starter dom24
- Start date
- Thread starter
- #3
can you post the relevant code for CDONTSMail.asp please?
Tony
________________________________________________________________________________
Tony
________________________________________________________________________________
- Thread starter
- #5
<%@ LANGUAGE="VBSCRIPT" %>
<HTML>
<HEAD>
<TITLE>CDONTSMail</TITLE>
<%
Sub Write(strWriteThis)
'This subroutine just writes out whatever is
'passed to it.
response.write(strWriteThis & "<br>")
end sub
%>
</HEAD>
<BODY>
<%
Dim myCDONTSMail
Dim strFrom
Dim strTo
Dim strSubject
Dim strMessage
Dim lngImportance
strFrom=request.form("txtFrom")
strTo=request.form("txtTo")
strSubject = request.form("txtSubject")
strBody=request.form("txtMessage")
lngImportance = request.form("optImportance")
'The following four lines of code are just here for test
'purposes to see what variables have been pulled in from the
'HTM form.
Write("strFrom = " & strFrom)
Write("strTo = " & strTo)
Write("strSubject = " & strSubject)
Write("strMessage = " & strBody)
Write("Importance = " & lngImportance)
Set myCDONTSMail = CreateObject("CDONTS.NewMail")
myCDONTSMail.Send strFrom,strTo,strSubject,strBody,lngImportance
Set myCDONTSMail = Nothing
Write "Mail has been sent."
%>
</BODY>
</HTML>
<HTML>
<HEAD>
<TITLE>CDONTSMail</TITLE>
<%
Sub Write(strWriteThis)
'This subroutine just writes out whatever is
'passed to it.
response.write(strWriteThis & "<br>")
end sub
%>
</HEAD>
<BODY>
<%
Dim myCDONTSMail
Dim strFrom
Dim strTo
Dim strSubject
Dim strMessage
Dim lngImportance
strFrom=request.form("txtFrom")
strTo=request.form("txtTo")
strSubject = request.form("txtSubject")
strBody=request.form("txtMessage")
lngImportance = request.form("optImportance")
'The following four lines of code are just here for test
'purposes to see what variables have been pulled in from the
'HTM form.
Write("strFrom = " & strFrom)
Write("strTo = " & strTo)
Write("strSubject = " & strSubject)
Write("strMessage = " & strBody)
Write("Importance = " & lngImportance)
Set myCDONTSMail = CreateObject("CDONTS.NewMail")
myCDONTSMail.Send strFrom,strTo,strSubject,strBody,lngImportance
Set myCDONTSMail = Nothing
Write "Mail has been sent."
%>
</BODY>
</HTML>
try Set myCDONTSMail = Server.CreateObject("CDONTS.NewMail")
Tony
________________________________________________________________________________
Tony
________________________________________________________________________________
- Thread starter
- #7
I think I had this problem before.... You may need to download and register CDONTS.dll(I think from the Internet) - try searching it at Yahoo.... And then register the DLL... using the "run" menu from the Start menu... Ohh!.. before downloading the .dll file.... Try searching for CDONTS.dll on you Windows directory....
Good Luck...
then you are good to go....
Good Luck...
then you are good to go....
- Status
Similar threads
- Locked
- Question
- Locked
- Question
- Locked
- Question