suddenly get this error:
error '80040108'
/geta.asp, line 23
which is : ObjMail.Body = "Instructio ns" & vbtab & instructions & vbcrlf&_
and while I'm at it, why did the 'yourname' and the 'creditcard' fields return
blank values, (when there was no error, that is).
this is the code:
<%
Dim
instructions,tr ack,bladder,you rname,address,c ity,state,zip,c ountry,phone,cr editc
ard,expdate,ema il
instructions = Request.Form("i nstructions")
track = Request.Form("t rack")
bladder = Request.Form("b ladder")
yourname = Request.Form("y ourname")
address = Request.Form("a ddress")
city = Request.Form("c ity")
state = Request.Form("s tate")
zip = Request.Form("z ip")
country = Request.Form("c ountry")
phone = Request.Form("p hone")
creditcard = Request.Form("c reditcard")
expdate = Request.Form("e xpdate")
email = Request.Form("e mail")
Dim kits
kits = Request.Form("k its")
Dim ObjMail
Set ObjMail = Server.CreateOb ject("CDONTS.Ne wMail")
ObjMail.To = "hw*****@cox.ne t"
ObjMail.From = "in**@dinghydog s.com"
ObjMail.Subject = "Dinghy Dogs order"
ObjMail.Body = "Instructio ns" & vbtab & instructions & vbcrlf&_
"Track" & vbtab & track & vbcrlf&_
"Bladder" & vbtab & bladder & vbcrlf&_
"Name" & vbtab & yourname & vbcrlf&_
"Address" & vbtab & address & vbcrlf&_
"City" & vbtab & city & vbcrlf&_
"State" & vbtab & state & vbcrlf&_
"Zip" & vbtab & zip & vbcrlf&_
"Country" & vbtab & country & vbcrlf&_
"Phone" & vbtab & phone & vbcrlf&_
"Card#" & vbtab & credit & vbcrlf&_
"Exp.Date" & vbtab & expdate & vbcrlf&_
"Email" & vbtab & email & vbcrlf&_
"Ordered" & vbtab & kits & vbcrlf&_
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