This is a multi-part message in MIME format.
------=_NextPart_000_0008_01C6378C.DD4AE520
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
I have used the following code in the expectation that I can send mail =
from an .asp page using VB Script
It doesn't live up to my expectations
I would appreciate advice as to why.
'Win 2000 (NOT Server Version)
' In Sys32
'cdonts.dll and cdosys.dll
'Permenant connection to the internet
Dim txtBody
Dim objCDOMail
Set objCDOMail =3D Server.CreateObject("CDONTS.NewMail")
objCDOMail.To =3D "jBuntxx@Blueyonder.co.uk" 'the destination
objCDOMail.From =3D "jBuntxx@BlueYonder.co.uk" 'the sender
objCDOMail.cc =3D "Hartdxxx@BlueYonder.co.uk" 'carbon copy
txtBody =3D "This email has been sent by an asp script"
objCDOMail.Subject =3D "CDONTS" 'the subject
objCDOMail.Body =3D txtBody 'the body
objCDOMail.Send 'fire off the email
'No sign of any mail being sent
response.write objCDOMail.To
'GIVES ERROR > Object doesn't support this property or method: 'To'
'HELP!!!
Jim Bunton
------=_NextPart_000_0008_01C6378C.DD4AE520
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2800.1528" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><FONT face=3DArial size=3D2>I have used the following code in the =
expectation=20
that I can send mail from an .asp page using VB Script</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>It doesn't live up to my =
expectations</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>I would appreciate advice as to =
why.</FONT></DIV>
<DIV><BR><FONT face=3DArial size=3D2> <STRONG>'Win 2000 (NOT Server =
Version</STRONG>)<BR> <STRONG>' In Sys32<BR> 'cdonts.dll and=20
cdosys.dll</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2><STRONG>'Permenant connection to =
the=20
internet</STRONG></FONT></DIV>
<DIV><STRONG><FONT face=3DArial size=3D2></FONT></STRONG> </DIV>
<DIV><FONT face=3DArial size=3D2>Dim txtBody
<DIV><FONT face=3DArial size=3D2>Dim =
objCDOMail</FONT></DIV><BR> Set objCDOMail=20
=3D Server.CreateObject("CDONTS.NewMail")<BR> objCDOMail.To =3D =
"</FONT><A=20
href=3D"mailto:jBuntxx@Blueyonder.co.uk"><FONT face=3DArial=20
size=3D2>jBuntxx@Blueyonder.co.uk</FONT></A><FONT face=3DArial =
size=3D2>" =20
'the destination<BR> objCDOMail.From =3D "</FONT><A=20
href=3D"mailto:jBuntxx@BlueYonder.co.uk"><FONT face=3DArial=20
size=3D2>jBuntxx@BlueYonder.co.uk</FONT></A><FONT face=3DArial =
size=3D2>" =20
'the sender<BR> objCDOMail.cc =3D "</FONT><A=20
href=3D"mailto:Hartdxxx@BlueYonder.co.uk"><FONT face=3DArial=20
size=3D2>Hartdxxx@BlueYonder.co.uk</FONT></A><FONT face=3DArial =
size=3D2>" =20
'carbon copy</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2> txtBody =3D "This email has been =
sent by an asp=20
script"<BR> objCDOMail.Subject =3D "CDONTS" 'the=20
subject<BR> objCDOMail.Body =3D txtBody 'the=20
body<BR> objCDOMail.Send 'fire off the =
email<BR><U> 'No=20
sign of any mail being sent</U></FONT></DIV>
<DIV><FONT face=3DArial size=3D2><U></U><BR> response.write=20
objCDOMail.To</FONT><FONT face=3DArial size=3D2><BR> <U>'GIVES =
ERROR</U> >=20
Object doesn't support this property or method: 'To'<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>'HELP!!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2> </DIV></FONT>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Jim =
Bunton<BR></FONT></DIV></BODY></HTML>
------=_NextPart_000_0008_01C6378C.DD4AE520--