Gestionnaire de téléchargements

Soyez le premier à donner votre avis sur cette source.

Vue 10 477 fois - Téléchargée 855 fois

Description

c'est un gestionnaire du type celui de sourceforge, avec classement des liens par catégories...
Je l'emploie sur http://magus54.free.fr/Starcraft/

Source / Exemple :


<?
// Préparer la page
     include "inc-headers.php";
     if (isset($HTTP_GET_VARS)){while(list($name, $value) = each($HTTP_GET_VARS)){$$name = $value;}}
     if(!isset($act))$act="";
     $dns=$site['DNS'];$ip=remoteip();
     $headers=new BODY();$page=new BODY();
     $headers->AddBalise("head");

class Catego extends _HTML{
     var $images=array();
     var $hrefs=array();
     var $textes=array();
     var $name="";
     function Catego($name=""){$this->name=$name;}
     function AddItem($image,$href,$texte){
        array_push($this->images,$image);
        array_push($this->hrefs,$href);
        array_push($this->textes,$texte);
     }
     function AddCatego($cat,$texte){
       $this->AddItem("dos.jpg","?act=frame2&cat=$cat",$texte);
     }
     function mkHTML(){
        $page=new BODY();
       $page->AddObject(new TEXT("<p align='left'>"));
        for($i=0;$i<sizeof($this->images);$i++){
           $page=subject($this->images[$i],$this->hrefs[$i],$this->textes[$i],$page);
        }
       $page->AddObject(new TEXT("</p>"));
        return "<font color='#FFFFFF'>".$this->name."</font><br>".$page->mkHtml();
     }
}

switch($act){
  case "":
     $page->AddBalise("body bgcolor='#000000'");
     $page->AddBalise("p align='center'");
     $page->AddObject(new TEXT("<bgsound src='./datas/starcraft.wav'>"));
     $page->AddObject(new TEXT("<title>Starcraft Broodwar</title>"));
     $title=new TEXT(StText("STARCRAFT BROODWAR")."<br>");
     $page->AddObject($title);
     $page->AddObject(new TEXT("<font color='#FFFFFF'>Attention ! Ce site est en création (je n'y ai passé que 1h dessus pour l'instant)<br>Veuillez SVP ne télécharger qu'un seul fichier à la fois, ou vous aurez un TRES faible débit.</font>"));
     $page->AddObject(new TEXT("<IFRAME frameborder=0 Width=640 Height=480 src='?act=frame'>"));
  break;
  case "frame":
     $page->AddBalise("body background='./datas/scr.jpg'");
     $page->AddBalise("p align='center'");
     $page->AddObject(new TEXT(StText(" ")."<br>".StText(" ")));
     $page->AddObject(new TEXT("<IFRAME frameborder=0 Width=600 Height=300 src='?act=frame2'>"));
  break;
  case "frame2":
     $page->AddBalise("body bgcolor='#000000'");
     $page->AddBalise("p align='center'");
     include "catego.php";
     if(!isset($cat))$cat="/";
     $page->AddObject($Categorie[$cat]);
  break;
}
// Corps de la page

//Renvoyer la page
     $resultat=new BODY();
     $resultat->AddObject($headers);
     $resultat->AddObject($page);
     $resultat->End();

// Fonctions annexes:

   function remoteip(){
            $REMOTE_ADDR=getenv("REMOTE_ADDR");
            if(!isset($REMOTE_ADDR)) $REMOTE_ADDR="127.0.0.1";
            return $REMOTE_ADDR;
   }

   function subject($img,$href,$texte,$page){
      $sub=new BODY();
      $image=new IMAGE($img);
      $image->AddBalise ("a href='$href'");
//      $page->AddObjects(array($image,new TEXT("<font color='#FFFFFF'><a href='$href'>$texte</a></font>")));
      $page->AddObject($image);
      $page->AddObject(new IMAGE("./font/spc.gif"));
      $page->AddObject(new TEXT("<font color='#FFFFFF'><a href='$href'>$texte</a></font><br>"));
      return $page;
   }

?>

Conclusion :


Necessite les includes incluses dans le zip

Codes Sources

A voir également

Ajouter un commentaire Commentaires
cs_Anthomicro Messages postés 9433 Date d'inscription mardi 9 octobre 2001 Statut Membre Dernière intervention 13 avril 2007 9
25 janv. 2005 à 17:51
Hum que c'est constructif tout ça...
jdalton42 Messages postés 200 Date d'inscription samedi 25 décembre 2004 Statut Membre Dernière intervention 19 août 2009
25 janv. 2005 à 15:26
c'est un peut nul ton script tu pourrais au moin faire une gestion des fichiers a telecharger et pas qu'on doit les gerer par la source c'est completement nul je mes un 3/10 si ca ne s'ameliore pas le 3/10 tombe a 0/10
cs_eXon Messages postés 166 Date d'inscription lundi 17 janvier 2005 Statut Membre Dernière intervention 8 avril 2007 1
25 janv. 2005 à 13:53
Le <?php certaine autre choses sont nécéssaire à la bonne programmation. Voir http://www.phpcs.com/code.aspx?id=24870
cs_neely Messages postés 2 Date d'inscription dimanche 23 janvier 2005 Statut Membre Dernière intervention 25 janvier 2005
25 janv. 2005 à 13:34
J'ai pas bien cerné le prog qui apour but de gérer le téléchargement
magus54 Messages postés 41 Date d'inscription mardi 4 janvier 2005 Statut Membre Dernière intervention 29 avril 2006
25 janv. 2005 à 00:23
hmm remplacer <? par <?php n'est pas nécessaire chez moi . Tu utilise quoi comme version de php ? Easyphp 1.6?
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.