_HTML_;
if( $SubscribeFileHandle ) fclose( $SubscribeFileHandle );
if( $SubscriptionRequests ) fclose( $SubscriptionRequests );
$Blocks = file( "/usr/home/httpd/htdocs/$HomeDir/.blocks/Blocks" );
if( preg_grep( "/$EmailAddress.*\n/", $Blocks ) ) # Person currently blocked from subscribing to Lists
{
echo " Due to abuse reports, you are currently banned from subscribing to any Lists on this service. ";
echo "
\n";
}
else
{
$string = file_get_contents( "/tmp/web/.subscriptions/SubscriptionRequest.$RandomNumber1$RandomNumber2.requests" );
fwrite( $SubscriberEmail, "From list-admin@matronics.com\n" );
fwrite( $SubscriberEmail, "To: $EmailAddress (Matronics List Subscriber)\n" );
fwrite( $SubscriberEmail, "Bcc: list-admin@mail.matronics.com (Matronics List Administrator)\n" );
fwrite( $SubscriberEmail, "From: list-admin@mail.matronics.com (Matronics List Administrator)\n" );
fwrite( $SubscriberEmail, "Errors-To: bounces@matronics.com\n" );
fwrite( $SubscriberEmail, "Subject: Matronics Subscription Verification ($EmailAddress)...\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "Dear $EmailAddress,\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "The Matronics Email List Administrator has received a request indicating that you would like your email address ($EmailAddress) added or removed from one or more Email List Forums at Matronics ( http://www.matronics.com/emaillists ).\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "If you initiated this request, please click on the Web Link below to complete the subscription process. For each respective Subscribe request, you will receive a confirmation email that will include the Email List FAQ indicating the process was successful. You will not receive a confirmation email for Unsubscribe requests.\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, " Click Here To Confirm (Requests Detailed Below):\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, " http://www.matronics.com/$HomeDir/index.php?Frame=center&Functions=Confirm&Service=Confirm&ConfirmID=$RandomNumber1$RandomNumber2\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "If you did not initiate this subscription request, do nothing. The request will be ignored.\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "Thank you,\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "Matronics Email List Administrator\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "Request Detail\n" );
fwrite( $SubscriberEmail, "--------------\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "$string\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
fwrite( $SubscriberEmail, "\n" );
if( $SubscriberEmail ) fclose( $SubscriberEmail );
if( $_POST[DO_NOT_SEND_EMAIL_CONFIRM] != "on" )
{
$SystemString = "cat /tmp/web/.subscriptions/SubscriptionRequest.$RandomNumber1$RandomNumber2.email | /usr/sbin/sendmail -t -flist-admin@matronics.com";
exec( $SystemString );
}
unlink( "/tmp/web/.subscriptions/SubscriptionRequest.$RandomNumber1$RandomNumber2.email" );
}
if( $_POST[DO_NOT_SEND_EMAIL_CONFIRM] != "on" )
{
echo " A web link was just emailed to:
\"$EmailAddress\"
Please open your email client and click on this web link. ";
echo "This will complete the Subscription/Unsubscription process and update this window with the new Subscription results.
Thank you!";
}
else
{
echo " EMAIL NOT SENT PER ADMIN REQUEST
But subscription/unsubscription request built.
Click \"Process ConfirmID: xxxxx\" Link Below To Complete Request! \n";
}
echo "
\n";
}
else
{
echo " No changes were required to execute your subscription/unsubscription request. ";
echo "
