Flash mail using ASP

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • imarkdesigns
    New Member
    • Jul 2007
    • 46

    Flash mail using ASP

    Good day guys...

    anyone here can help me correct the function of my Flash Mail Form using ASP to send the data...

    CDO.Message.1 error '8004020d'
    At least one of the From or Sender fields is required, and neither was found.
    /contact.asp, line 20


    this is the message when i hit Send on my Flash Form to send the information...


    can anyone give me an idea how to fix this...

    here is my ASP code


    Code:
    <%
    	for i=1 to 7
    	 	message=Request("message")
    	next
    	 	message=message + Request("message")	
    		smtpServer = "enter your SMTP SERVER HERE"
    		smtpPort = 25
    		
    
    		name = Request("Your_Name:")
    		Set myMail = CreateObject("CDO.Message") 
    		myMail.Subject = "from " & name
    		myMail.From = Request("Your_Email:")
    		myMail.To = Request("recipient")
    		myMail.HTMLBody = "<html><head><title>Contact letter</title></head><body><br>" & message & "</body></html>"
    		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
    		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
    		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
    		myMail.Configuration.Fields.Update 
    		myMail.Send
    	
    %>
  • jhardman
    Recognized Expert Specialist
    • Jan 2007
    • 3405

    #2
    my guess is the names of the inputs aren't quite right. Try listing all of the posted data like this to troubleshoot:
    [code=asp]for each x in request.form
    response.write x & ": " & request.form(x) & "<br>" & vbNewLine
    next
    for each x in request.queryst ring
    response.write x & ": " & request.queryst ring(x) & "<br>" & vbNewLine
    next[/code]Jared

    Comment

    Working...