GoFuckYourself.com - Adult Webmaster Forum

GoFuckYourself.com - Adult Webmaster Forum (https://gfy.com/index.php)
-   Fucking Around & Business Discussion (https://gfy.com/forumdisplay.php?f=26)
-   -   I NEED HELP WITH A EMAIL BOX (https://gfy.com/showthread.php?t=39247)

SNOW 09-21-2001 06:13 PM

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 09-21-2001 06:28 PM

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).]

SNOW 09-21-2001 06:55 PM

thanks bro get a hold of me please ICQ 54866383

SNOW 09-21-2001 07:07 PM

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

aleck 09-22-2001 12:15 AM

oh i wasn't checking the board, opening icq
btw mine is 17081394


All times are GMT -7. The time now is 11:02 AM.

Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
©2000-, AI Media Network Inc123