Click here to Skip to main content
15,887,214 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
Hello

According to this early link and reply

CDO.Message.1 error '8004020d'[^]

this error
CDO.Message.1 error '8004020d' 

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


But hasn't the original poster set this:

<pre lang="text">objMail.From = Request.Form("From")?


I am getting the same error on line 122, but in fact that line is blank in Notepad++ and I have included

name=request.form("name")
email=request.form("email")
message=request.form("message")

'Extract the variables from the form fields

name=request.form("name")
email=request.form("email")
message=request.form("message")
Mail_Action = Request("Mail_Action")

ObjSendMail.To = WebmasterEmail 'recipient
		ObjSendMail.BCC = myCopy 'other recipient
                ObjSendMail.Sender = name 'sender
		ObjSendMail.Sender = email 'sender
               	ObjSendMail.HTMLBody = message
		ObjSendMail.Send 
		Set ObjSendMail = Nothing  
	End If    
			
	Response.Redirect "thank_you.asp?name=" & name 

End If


What am I doing wrong, please?

Thank you.
Posted
Comments
ZurdoDev 10-Apr-15 13:09pm    
Sorry, what exactly is the question?

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900