3 Replies Latest reply on Jan 17, 2007 12:02 AM by ggshow

    Submit Button

    desertdiana Level 1
      Yes, new to this and starting out simple. I am able to send my feedback form data created in Flash to an email, but after it is sent an open window is still there. What do I do to remove that window or atleast direct it to a thank you message? Here is my script so far:

      on(release) {

      getURL("/cgi/gdform.cgi","_blank","GET");
      var name = "";
      var company = "";
      var email = "";
      var questions = "";
      }

      Thank you for helping me,

      Diana
        • 1. Re: Submit Button
          cinemaguy Level 1
          You will need to set it in your cgi form to redirect the browser to the thank you page.
          • 2. Re: Submit Button
            desertdiana Level 1
            Here is my cgi script.......can you show me how and where to put the redirect?

            Thank you agan and again,
            Diana



            #!/usr/bin/perl

            sub parse_form_data
            {
            local (*FORM_DATA) = @_;
            local ( $request_method, $query_string, @key_value_pairs, $key_value, $key, $value);
            $request_method = $ENV{'REQUEST_METHOD'};
            if ($request_method eq "GET") {
            $query_string = $ENV{'QUERY_STRING'};
            } elsif ($request_method eq "POST") {
            read (STDIN, $query_string, $ENV{'CONTENT_LENGTH'});
            };
            @key_value_pairs = split(/&/, $query_string);
            foreach $key_value (@key_value_pairs) {
            ($key, $value) = split (/=/, $key_value);
            if (defined($value)) {$value =~ tr/+/ /;
            $value =~ s/%([\dA-Fa-f][\dA-Fa-f])/pack ("C", hex ($1))/eg;};
            if (defined($FORM_DATA{$key})) {
            $FORM_DATA{$key} = join (" ", $FORM_DATA{$key}, $value);
            } else {
            $FORM_DATA{$key} = $value;
            }
            }
            }; # end of sub

            &parse_form_data(*simple_form);
            $t = time;
            chdir ($ENV{'DOCUMENT_ROOT'}) ; chdir("..");
            open (OUTFILE, ">data/gdform_$t") or die ("Cannot open file");
            while (($key , $value) = each(%simple_form)) {

            print OUTFILE "<GDFORM_VARIABLE NAME=$key START>\n";
            print OUTFILE "$value\n";
            print OUTFILE "<GDFORM_VARIABLE NAME=$key END>\n";
            if ($key eq "redirect") { $landing_page = $value;}

            }
            close (OUTFILE);
            if ($landing_page ne "") {
            print "Location: http://$ENV{'HTTP_HOST'}/$landing_page\n\n";
            } else {
            print "Location: http://$ENV{'HTTP_HOST'}/\n\n";
            }
            • 3. Re: Submit Button
              ggshow Level 2
              try loadVariables() instead of getURL()