rss
Options Ils ont besoin de votre aide Tous les messages sans réponse
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

Perl html javascript

  lavm01, le mercredi 25 juillet 2007 à 21:17:10
Bonjour,

Je suis en train d'écrire un programme perl qui va lire un répertoire et le mets dans une liste déroulante. Jusque là tout va bien. Sauf que j'aimerais faire plus que ça, je voudrais lire un répertoire (ce répertoire contient seulement des répertoires) et le mettre dans une liste déroulante et quand l'utilisateur sélectionne un répertoire à partir de la liste il affiche dans une autre liste (à côté ou en dessous) le contenu du répertoire. Ex: j'ai un répertoire unix que lui contient seulement des répertoires (ex: Virtualité, Bastion, Virto, etc....) et chaque répertoire contient environ 15 fichiers html (cela change à tous les jours. Donc en résumé l'utilisateur clic dans la liste des répertoires (ex: virtualité) et quand il clic il y a une autre liste qui apparaît qui contient les fichiers html et quand il choisi dans la liste le fichier html voulu, il s'ouvre dans une autre page pour l'affichier.

Voici un bout de mon code perl (il n'est vraiement pas complet et il y a plusieurs test dedans mais il fonctionne)

#!/usr/bin/perl

use CGI_Lite; # Utilisation du module CGI_Lite

$cgi=new CGI_Lite; # Création d'un nouvel objet CGI_Lite pour traiter le formulaire

%in = $cgi->parse_form_data; # Lecture des paramètres dans le tableau associatif %in

print "Content-type: text/html\n\n"; # Affichage de l'entête indispensable

print "<head>";
print "<title>Rapport des exceptions</title>";
#print "Content-Type: text/javascript\n\n";
print '<script language="JavaScript">';
print "function afficherAutre() {";
print 'alert("allo")';
print "if (document.form1.liste1.value ne 'Environnement') {";
print "<select name=liste1>";
for (my $j=0; $j <= $#liste; $j++) {
print "<option value=http://172.xx.xx.xxx/unix/$liste[$j]> $liste[$j]</option>";
}
print "</select>";
print "}";
print "}";
print "</script>";
print "</head>";

print "<body>";

print "<img style= 'float: left' src='../bandeau1.jpg' alt='logo'><p align=center><font size=4>RAPPORT D\'ANALYSE DES EXCEPTIONS DES PFI</p></font>";

print "<p> </p>";
print "<p> </p>";
print "<hr>";
#$rep="http:\\pperse01\\rapports_des_seuils\\Tous_UNIX";
$rep="D:\\rapports_des_seuils\\Tous_UNIX";
$i = 0;
opendir(DIR, $rep) || die "Impossible de lire $rep : $!\n";
my @liste = grep { not /^[.][.]?\z/ && -r "$rep/$_" } readdir(DIR);
@liste = map{lc($_)} @liste;
closedir(DIR);
#for (my $j=0; $j <= $#liste; $j++) {
# @liste[$j] =~ s/[^0-9-]+//g;
#}
print "Le contenu du répertoire: $rep<br><br>\n";
#foreach (@liste) {
# $i++;
# print "<b>$_</b><br>\n";
#}
print "<b>Quel rapport voulez-vous voir ?</b><br>\n";
print "<form name='form1' method='post' action=''>";
print "<select name=liste1>";
for (my $j=0; $j <= $#liste; $j++) {
print "<option value=http://172.xx.xx.xxx/tous_unix/$liste[$j]> $liste[$j]</option>";
}
print "</select>";
print "<INPUT TYPE='button' VALUE='OK' onClick='location =
form1.liste1.options[form1.liste1.selectedIndex].value;'>";
print "</form>";
#
print "<hr>";
$rep="D:\\rapports_des_seuils\\UNIX";
$i = 0;
opendir(DIR, $rep) || die "Impossible de lire $rep : $!\n";
my @liste = grep { not /^[.][.]?\z/ && -r "$rep/$_" } readdir(DIR);
@liste = map{uc($_)} @liste;
closedir(DIR);
@liste[0] = "Environnement";
#for (my $j=0; $j <= $#liste; $j++) {
# @liste[$j] =~ s/[^0-9-]+//g;
#}
print "Le contenu du répertoire: $rep<br><br>\n";
#foreach (@liste) {
# $i++;
# print "<b>$_</b><br>\n";
#}
print "<b>Choisir votre environnement ?</b><br>\n";
print "<form>";
print "<select name=liste1 onChange=afficherAutre()>";
for (my $j=0; $j <= $#liste; $j++) {
print "<option value=http://172.xx.xx.xxx/unix/$liste[$j]> $liste[$j]</option>";
}
print "</select>";
#print "<INPUT TYPE='button' VALUE='OK' onClick='location =
# form.liste1.options[form.liste1.selectedIndex].value;'>";
print "</form>";
#$folder = "http:\\pperse01\cgi-bin";
#$dossier = opendir(DIR, $folder);
#while ($Fichier = readdir($dossier)) {
#if ($Fichier != "." && $Fichier != "..") {
#$nomFichier = $Fichier;
#print $nomFichier\n;
#print "<br>";
#}
#}
#closedir($dossier);
print "</body>";
print "</html>";

Merci de me répondre:
Configuration: Windows XP
Internet Explorer 6.0
Répondre à lavm01  Signaler ce message aux modérateurs
HTML/Javascript: affichage d'un diaporama (Résolu)Bonjour, Je cherche à créer un diaporama d'image photo sur une page web statique (HTML/Javascript). Mon problème réside dans le fait que je n'arrive pas à changer le contenu du src de l'objet image!! Pourtant mon code m'a... www.commentcamarche.net/forum/affich-1881044-html-javascript-affichage-d-un-diaporama
Télécharger ZionEditZionEdit est un éditeur de programme des plus intuitifs et facile à configurer, en plus léger. Il est basé sur les composants Scintilla. Les langages C/C++, C#, Java, Perl, CSS, HTML(+JavaScript,PHP etc.), SQL(+MySQL), VB/VBScript, Ruby, LISP, Python... www.commentcamarche.net/telecharger/telecharger-34056535-zionedit
Erreur Javascript (Résolu)Bonjour à tous, mon problème est simple, je dois développer un simple explorateur en Python/html/javascript et j'ai créé la page qui suit. Malheureusement ma fonction java ne marche pas au niveau de document.getElementById(rep).style.display =... www.commentcamarche.net/forum/affich-4295635-erreur-javascript
[FreeMind] Publier une mindmap dans une page webFreeMind est un logiciel de mindmapping. Vous avez plusieurs possibilités pour publier votre mindmap dans une page web. Flash applet Java Simple image PNG HTML+Javascript (texte seulement) HTML+Javascript (texte+icônes) HTML+Javascript... www.commentcamarche.net/faq/sujet-4857-freemind-publier-une-mindmap-dans-une-page-web
Javascript - Modifier la hauteur (height) d'un élément HTMLPour modifier la hauteur d'un élément HTML en javascript, il suffit d'utiliser sa propriété de style "height". Pour cela vous pouvez y faire référence de la manière suivante : Si vous souhaitez connaître la hauteur (height) d'un bloc HTML, il... www.commentcamarche.net/faq/sujet-11740-javascript-modifier-la-hauteur-height-d-un-element-html
[Javascript] Interdire le clic droit de la sourisIl est possible d'empêcher que votre visiteur effectue un clic droit sur votre page. Ceci permet une protection relative de vote code source et de vos photos. Placez ce script entre les balises et de votre code HTML : www.commentcamarche.net/faq/sujet-1980-javascript-interdire-le-clic-droit-de-la-souris
Firefox et HTML (Résolu)Bonjour, Jusqu'à présent je testais mon site internet perso (HTML, Javascript) avec IE. Aucun problème. J'ai installé ces derniers jours Firefox et effectué les tests via ce logiciel. La j'ai quelques problèmes : décalage important de... www.commentcamarche.net/forum/affich-4668521-firefox-et-html
Soft dev. HTML avec saisie semi-automatique (Résolu)Bonjour mesdames, mesdemoiselles, messieurs, et les autres^^ Je suis à la recherche d'un logiciel de développement HTML/Javascript/... qui possède une fonction de saisie semi-automatique (comme dreamweaver) , mais qui soit un freeware. Pas besoin... www.commentcamarche.net/forum/affich-4053982-soft-dev-html-avec-saisie-semi-automatique
[Flash] Récupérer la durée totale d'une music (Résolu)Bonjour, Deja je peux le dire directement, je ne connais rien en flash ^^' Maais, je suis (je pense) un expert en HTML, Javascript, PHP et flash n'a pas l'air si différent. Je suis entrain de faire un lecteur mp3 en html / javascript et... www.commentcamarche.net/forum/affich-5404402-flash-recuperer-la-duree-totale-d-une-music
Télécharger FirstpageFirst Page 2006 est un éditeur html gratuit et excellent. Il permet de travailler un code HTML en couleur, ainsi que de prévisualiser le site. 1st Page 2006 supporte les standards HTML, XHTML, PHP, ASP, Cold Fusion, Javascript, CSS, SSI et Perl. www.commentcamarche.net/telecharger/telecharger-33-firstpage
Télécharger PSPadPSPad est un excellent éditeur de texte. Il est utile pour travailler sur du simple texte, mais aussi sur du HTML, CSS, Javascript, php ou autres langages de programmation (C++, Java, Python...). Les fonctionnalités sont impressionnantes: ... www.commentcamarche.net/telecharger/telecharger-133-pspad
Télécharger Notepad2Notepad2 est un blc-note libre possédant des fonctionnalités avancées de coloration syntaxique. Fonctionnalités Coloration syntaxique pour les langages suivants : HTML, XML, PHP, ASP (JScript, VBS), CSS, JavaScript, VBScript, C/C++, C#,... www.commentcamarche.net/telecharger/telecharger-34055332-notepad2
Toutes les réponses pour « Perl html javascript »