Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 33 lines (26 sloc) 0.755 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
<?php
/*********************
07-02-2003 v3.01
Module: email
Description: email subscription form
CSS: text, form
VARS: $studenton = displays the student box
$send = sends a link to edit the subscriptions
To Do: declare post vars
insert into contacts database

*********************/

 //
 
$mod_id = 20;
$modid=9;
include("AMP/BaseDB.php");

require_once( 'AMP/Content/Redirect/Redirect.php');
$redirect = new AMP_Content_Redirect( AMP_Registry::getDbcon( ));
$target_set = $redirect->find( array( 'alias' => 'email'));
if ( $target_set ) {
    $source = current( $target_set );
    $new_url = $source->getTarget( );
} else {
    $new_url = AMP_url_add_vars( AMP_CONTENT_URL_FORM, array( 'modin=3')) ;
}

ampredirect( $new_url );

?>
Something went wrong with that request. Please try again.