Can someone show me how to modify this simple code from CDONTS to CDO to bring
it up to date?
It works fine now and maybe I should leave it alone?
<%
Dim t1,instructions
t1 = "Instructio ns"
instructions = Request.Form("i nstructions")
Dim ObjMail
Set ObjMail = Server.CreateOb ject("CDONTS.Ne wMail")
ObjMail.To = "hwaxman@cox.ne t"
ObjMail.From = "info@dinghydog s.com"
ObjMail.Subject = "Dinghy Dogs order"
ObjMail.Body = t1 & vbtab & instructions
ObjMail.Send
Set ObjMail = Nothing
Response.Write" Thank You For Your Order"
%>
--
Harvey Waxman DMD
73 Wright Lane
Wickford, RI 02852
Remove thefrown to email me
it up to date?
It works fine now and maybe I should leave it alone?
<%
Dim t1,instructions
t1 = "Instructio ns"
instructions = Request.Form("i nstructions")
Dim ObjMail
Set ObjMail = Server.CreateOb ject("CDONTS.Ne wMail")
ObjMail.To = "hwaxman@cox.ne t"
ObjMail.From = "info@dinghydog s.com"
ObjMail.Subject = "Dinghy Dogs order"
ObjMail.Body = t1 & vbtab & instructions
ObjMail.Send
Set ObjMail = Nothing
Response.Write" Thank You For Your Order"
%>
--
Harvey Waxman DMD
73 Wright Lane
Wickford, RI 02852
Remove thefrown to email me
Comment