3 Replies Latest reply on Jul 19, 2008 9:13 AM by Newsgroup_User

    Form Mailer Problems

    bkrboy@chartermi.net
      This is my CDO Code I made with the instructions from verio hosting. When i click submit on my form it just goes to a blank white screen.

      I don't think it's sending it. Do you see any problems?


      Also, what kind of file do i use? an ASP or??? Then i do form action= correct?



      <!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows Library" -->

      <!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" -->
      <%
      SUB sendmail( fromWho, toWho, Subject, Body )
      Dim objCDO
      Dim iConf
      Dim Flds

      Const cdoSendUsingPort = 2

      Set objCDO = Server.CreateObject("CDO.Message")
      Set iConf = Server.CreateObject("CDO.Configuration")

      Set Flds = iConf.Fields
      With Flds
      .Item(cdoSendUsingMethod) = cdoSendUsingPort
      .Item(cdoSMTPServer) = "mail-fwd"
      .Item(cdoSMTPServerPort) = 25
      .Item(cdoSMTPconnectiontimeout) = 10
      .Update
      End With

      Set objCDO.Configuration = iConf

      objCDO.From = fromWho
      objCDO.To = toWho
      objCDO.Subject = Subject
      objCDO.TextBody = Body
      objCDO.Send

      END SUB
      fromWho = TRIM( Request.Form( "info@walkingwithhim.org") )
      toWho = TRIM( Request.Form( "bkrboy@chartermi.net") )
      Subject = TRIM( Request.Form( "Story" ) )
      Body = TRIM( Request.Form( "Body") )
      If toWho <> "" THEN
      sendMail fromWho, toWho, Subject, Body


      'Cleanup
      Set ObjCDO = Nothing
      Set iConf = Nothing
      Set Flds = Nothing
      Response.redirect "Page359.html"
      ' Any existing page can be used for the response redirect method
      END IF
      %>


      Thanks so much.
        • 1. Re: Form Mailer Problems
          Level 7
          I think you should ask Verio these questions.

          --

          Walt


          "bkrboy@chartermi.net" <webforumsuser@macromedia.com> wrote in message
          news:g5qf61$r7v$1@forums.macromedia.com...
          > This is my CDO Code I made with the instructions from verio hosting. When
          > i
          > click submit on my form it just goes to a blank white screen.
          >
          > I don't think it's sending it. Do you see any problems?
          >
          >
          > Also, what kind of file do i use? an ASP or??? Then i do form action=
          > correct?
          >
          >
          >
          > <!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
          > NAME="CDO for Windows Library" -->
          >
          > <!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4"
          > NAME="ADODB Type Library" -->
          > <%
          > SUB sendmail( fromWho, toWho, Subject, Body )
          > Dim objCDO
          > Dim iConf
          > Dim Flds
          >
          > Const cdoSendUsingPort = 2
          >
          > Set objCDO = Server.CreateObject("CDO.Message")
          > Set iConf = Server.CreateObject("CDO.Configuration")
          >
          > Set Flds = iConf.Fields
          > With Flds
          > .Item(cdoSendUsingMethod) = cdoSendUsingPort
          > .Item(cdoSMTPServer) = "mail-fwd"
          > .Item(cdoSMTPServerPort) = 25
          > .Item(cdoSMTPconnectiontimeout) = 10
          > .Update
          > End With
          >
          > Set objCDO.Configuration = iConf
          >
          > objCDO.From = fromWho
          > objCDO.To = toWho
          > objCDO.Subject = Subject
          > objCDO.TextBody = Body
          > objCDO.Send
          >
          > END SUB
          > fromWho = TRIM( Request.Form( "info@walkingwithhim.org") )
          > toWho = TRIM( Request.Form( "bkrboy@chartermi.net") )
          > Subject = TRIM( Request.Form( "Story" ) )
          > Body = TRIM( Request.Form( "Body") )
          > If toWho <> "" THEN
          > sendMail fromWho, toWho, Subject, Body
          >
          >
          > 'Cleanup
          > Set ObjCDO = Nothing
          > Set iConf = Nothing
          > Set Flds = Nothing
          > Response.redirect "Page359.html"
          > ' Any existing page can be used for the response redirect method
          > END IF
          > %>
          >
          >
          > Thanks so much.
          >
          >


          • 2. Re: Form Mailer Problems
            bkrboy@chartermi.net Level 1
            They don't help with scripting problems.
            • 3. Re: Form Mailer Problems
              Level 7
              If your server supports php, this Formm@ailer script from DB Masters
              conceals your email address from prying eye email harvesters and it has
              several spam controls built into its script including hidden field
              (honeypot), "sorta captcha," and time limits on submissions to keep robots
              from exploiting your forms. Free to use if you credit the author; $20 if
              you don't.

              http://dbmasters.net/index.php?id=4

              Q&A Forum - http://dbmasters.net/forum.php?id=3&fid=9


              --Nancy O.
              Alt-Web Design & Publishing
              www.alt-web.com

              "bkrboy@chartermi.net" <webforumsuser@macromedia.com> wrote in message
              news:g5rfe7$1g8$1@forums.macromedia.com...
              > They don't help with scripting problems.