2008 send email error

I have been looking around  and  decided to post this in a new topic because  the  answer  was  just not there for my particular need.

I have 19 forms for an insurance website I manage. They were using cdonts until  the  host upgraded  and  cdonts  was  dumped for cdosys. I found a form handler that looks like I can just copy  the  form  fields   from   the  old forms  and  past them into  the  new form (which keeps their format  and css together,) however I keep getting this error:
CDO.Message.1 error '8004020d' 

At   least   one   of   the   From   or   Sender   fields   is   required,   and   neither   was   found.  

/test/testsend1.asp, line 41

here  is  that section  of   the  form handler:
'Update  the  CDOSYS Configuration
Set objCDOSYSMail.Configuration = objCDOSYSCon
'Set  and  update email properties
With objCDOSYSMail
'0=Low, 1=Normal, 2=High
. Fields ("urn:schemas:httpmail:importance").Value = 1
'Who  the  e-mail  is   from
. From  = Request.Form("email_address")
'Who  the  e-mail  is  sent to
.To = "chrisrabkin@embarqmail.com"
'Who  the  e-mail  is  CC'd to
.Cc = ""
' The  subject  of   the  e-mail
.Subject = Request.Form("email_subject")
'Set  the  e-mail body format (HTMLBody=HTML TextBody=Plain)
.TextBody = plain
. Fields .Update
'Send  the  e-mail
.Send <-(this  is  line 41)
End With
'Close  the  server mail object
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
'Rederect after sending email
Response.Redirect Request.Form("redirect_to")
%>

the  form can be viewed  at   http://www.parlininsurance.com/test/test1.asp

Im trying to find  the  quickest solution for  the  whole form conversion as possible because all I keep hearing  is  (My site isnt working Im loosing money) so any help  is  appreciated.
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值