I NEED HELP WITH A EMAIL BOX

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • SNOW
    Confirmed User
    • Feb 2001
    • 3963

    #1

    I NEED HELP WITH A EMAIL BOX

    I would like to have a email box on the bottom of my paysites.. How do i go about geting the script or can anyone make me one..

    Appreciate it tanks SNOW
  • aleck
    Confirmed User
    • Jan 2001
    • 940

    #2
    hmm, write a form, target it to perl or php script and u r done

    form example {=< and }=>
    {form action="/cgi-bin/email/email.cgi" method="post"}
    {input type="text" name="email" size="30" maxlength="50"}
    {input type="submit" value="subscribe"}
    {/form}

    perl script example (only active part):

    #!/usr/local/bin/perl -w

    my $temp=$ENV{'QUERY_STRING'};
    my @pairs=split(/&/,$temp);
    foreach $item(@pairs) {
    my ($name,$value)=split (/=/,$item,2);
    $value=~tr/+/ /;
    $value=~ s/%(..)/pack("c",hex($1))/ge;
    my $request{$name}=$value;
    }

    my $storagefile="/usr/home/domain.com/cgi-bin/email/emails.txt";
    # path to the file to store emails

    print "Content-type: text/html\n\n";

    if (open(DB,">>$storagefile"))
    {
    flock DB, 2;
    print DB $request{"email"}."\n";
    close(DB);
    # here all {} r equal to <>
    print "{html}{body}{h1}thank you{/h1}{/body}{/html}";
    } else {
    # here all {} r equal to <>
    print "{html}{body}{h1}error writing to the file{/h1}{/body}{/html}";
    }


    hope that helps

    p.s. don't forget to set permissions of folders and files
    folders: 777, cgi script: 755, output file 666

    [This message has been edited by aleck (edited 09-21-2001).]
    come trade shemale traffic here

    Comment

    • SNOW
      Confirmed User
      • Feb 2001
      • 3963

      #3
      thanks bro get a hold of me please ICQ 54866383

      Comment

      • SNOW
        Confirmed User
        • Feb 2001
        • 3963

        #4
        I'm not good with scripts is there something i can buy...

        Comment

        • aleck
          Confirmed User
          • Jan 2001
          • 940

          #5
          oh i wasn't checking the board, opening icq
          btw mine is 17081394
          come trade shemale traffic here

          Comment

          Working...