PX : code

REF Class by Jorge Machin
Download this code


<?php 
    
   
/*  ------------------------------------------------------------------------
         Módulo : REF.inc ( clase REF ) 
         Autor  : Jorge Renato Machin Ibarra 
         Inicio : Septiembre 24 de 1998 
         Final  : Septiembre 25 de 1998       
         Comentarios : Estaba bonita hasta que Antelmo pidió cambios 
         Dedicada a Cecilia, Regina, Alicia, Lidia y Diana
          
         example:

         $REF = new REF;

         $REF -> preserve( "var1", "var2");

         $var1 = "var1 value 1";
         $var2 = "var2 value 2";

         $REF -> curl("mypath", "message");

         $var1 = "var1 value 2";
         $var2 = "var2 value 2";

         $REF -> curl("mypath", "message");


         You can make several instances of the class REF to pass diferents
         variables in links.

     ----------------------------------------------------------------------- */ 
 



 
   
class REF 
 
      var 
$Arr

 
      
// ----------------------------------------------------------------------- 
      //   
      // ----------------------------------------------------------------------- 
 
      
function preserve$CurlVar0 "CURL-NULL"$CurlVar1 "CURL-NULL",  
                         
$CurlVar2 "CURL-NULL"$CurlVar3 "CURL-NULL"
                         
$CurlVar4 "CURL-NULL"$CurlVar5 "CURL-NULL"
                         
$CurlVar6 "CURL-NULL"$CurlVar7 "CURL-NULL"
                         
$CurlVar8 "CURL-NULL"$CurlVar9 "CURL-NULL" )  
      { 


         
$curr "CurlVar0";          

         for ( 
$i $i 10 && $$curr != "CURL-NULL"$i++, $curr "CurlVar".$i 
            
            
$this->Arr[] = $$curr;
       
      } 


      function 
GetParams() {

         
//  Declara las variables globales:

         
if ( empty ( $this -> Arr ) ) 

            
$elements 0;

         else 

            
$elements count$this -> Arr );
         

         for( 
$i 0$i $elements$i++ ) {

            
$Curlvar $this -> Arr[$i];

            global $
$Curlvar;

            if ( $
$Curlvar != "" ) {

               if ( 
$param != "" )

                  
$param .= "&";

               
$param .= $Curlvar "=" urlencode( $$Curlvar );
   

            }

         }

         if ( 
$param != "" )

            
$param "?" $param;


         return 
$param;

      }


 
      
// ---------------------------------------- 
      // 
      // ---------------------------------------- 
 
      
function chidden() { 
 
 
         
//  Declara  las variables globales:      
 
         
if ( empty( $this->Arr ) ) 
 
            
$elements 0
 
         else 
 
            
$elements count$this->Arr ); 
 
 
         for( 
$i 0$i $elements$i++) { 
             
            
$var $this->Arr[$i]; 
 
            global $
$var
  
            if ( $
$var != "" ) {

               echo(
"<INPUT TYPE=\"HIDDEN\" NAME=\"$var\" VALUE=\"". $$var."\">\n"); 
 
            }

         } 
 
 
      } 


      
// ---------------------------------------- 
      //  clocation
      // ---------------------------------------- 
 
      
function clocation$path ) {     
       
         
header("Location: ".$path.$this->GetParams());
           
      }


      
// ---------------------------------------- 
      //  curl
      // ---------------------------------------- 
 
      
function curl$path$msg$target "") {     
  
 
         echo( 
"<A HREF=\"$path".$this->GetParams()."\"" );
        
         if ( 
$target != "" )
        
            echo(
" TARGET = \"$target\"");
        

         echo( 
">$msg</A>\n" ); 
           
      }


      
// ---------------------------------------- 
      //  gurl
      // ---------------------------------------- 
 
      
function gurl$path$imgPath$msg ""$target "" ) {     
  
         echo( 
"<A HREF=\"$path".$this->GetParams()."\"");

         if ( 
$target != "" )
        
            echo(
" TARGET = \"$target\"");
        
         echo( 
">" ); 
         echo( 
"<img src=\"".$imgPath."\" BORDER=\"NO\" ALT =\"".$msg."\">" ); 
         echo( 
"</A>" ); 
           
      } 

      
// ---------------------------------------- 
      //  Area
      // ---------------------------------------- 
 
      
function carea$shape$coords$path$msg ) {     
 
         echo( 
"<AREA SHAPE = \"$shape\" COORDS = \"$coords\" HREF=\"$path" ); 
         echo( 
$this->GetParams() . "\" ALT = \"" $msg "\">\n" ); 
           
      }

   } 
 
?>

Comments or questions?
PX is running PHP 5.2.17
Thanks to Miranda Productions for hosting and bandwidth.
Use of any code from PX is at your own risk.