Le PHP Facile - Apprenez le PHP !

le 04/08/2004 à 20:06

Salut à tous,
mon problème est de faire un checkbox qui me permet de séléctionner ou désélectionner tous mes checkbox en même temps.

pour cela j'ai fait ce fonction avec ce bouton en bas.
Mais j'ai une erreur sur la ligne du if.
pouvez vous me dire à quoi cela est il du.
merci

function select()
{
if(document.form.group[0].checked
== true) //if checked do this
{
fait ceci
}
/** else // if not checked do this
{
fait cela
}
}
<input type="checkbox" name="tous" onclick=select () >

le 21/07/2004 à 15:45

personnes connectees

Salut je reviens donc avec mes 2 fichiers

note de zebden : utilise le BBcode , je suis sympa je le fais pour toi :)

****************fichiers ou je compte le nombre de clients***********

<? if (isset($_SESSION['clik']) &&
$_SESSION['clik']="Run") include('nombre_online.php');
} ?>


<html>
<head>
	<title></title>
	
	<SCRIPT SRC="./javascripts.js"></SCRIPT>
</head>

<body>


<table width=100%> <tr>

    <td align=left> search motifs <h3></h3>          </td>
    
</tr></table>

</body>
</html>


*********fichier de traitement si je clique sur le bouton Run********
session_start();
if (!isset($_SESSION['clik']))
{
$_SESSION['clik']="run";
}




#!/usr/bin/perl5.8.0 -w


use strict;
use Module;

use CGI;
use CGI::Carp qw(fatalsToBrowser);
#-----------------------------------------------------------------------------
#				VARIABLES
#-----------------------------------------------------------------------------


#cgi objects
my $query = new CGI;        
my $params = $query->Vars;  
                           



#files
my $resultFile; #result file

#strings
my @results;    
my %stats;      
                

#paths
my $htmldir        = "/program/";
my $tempdir        = "/tmp/";

my $trsetdir       = "../html/program.v/";
my $privatedir     = "../html/program.f/";
my $stylepath      = "$htmldir"."style.css";
my $javascriptpath = "$htmldir"."javascripts.js";

#database conection
my $db          = 'DBI:mysql:program';
my $user        = 'user';
my $password    = 'password';

#generic file stream
my $stream;




#-----------------------------------------------------------------------------
#				ERPIN RESULTS
#-----------------------------------------------------------------------------


cleanOldFiles($tempdir, 'program');

$resultFile = $params->{'file'};
if(not $resultFile or $resultFile eq "none")
{
    # Running
    $resultFile = programRun($db, $user, $password, $query, $trsetdir, $privatedir, $tempdir);
    if($resultFile =~ /error/){ exitOnError($query, $resultFile); }
    $params->{'file'} = $resultFile;
}



#Results reading
#---------------

%stats = statistics($resultFile);
$params->{'hits'} = $stats{'hits'};
my $firstIndex = $params->{'hitsOnPage'} * $params->{'page'};

if($firstIndex < $params->{'hits'}) {
@results = candidates($resultFile, $firstIndex, $params->{'hitsOnPage'});}


#Temp files erasing
#------------------

#system("rm -f $resultFile");






#-----------------------------------------------------------------------------
#				HEADER
#-----------------------------------------------------------------------------

print $query->header;

print (
"<head>
<title>results</title>
<link href=\"$stylepath\" rel=\"stylesheet\" type=\"text/css\">
<SCRIPT SRC=\"$javascriptpath\"></SCRIPT>
</head>
");



#-----------------------------------------------------------------------------
#				BODY
#-----------------------------------------------------------------------------


print $query->h3("results");
#print $query->br();



#Form
#-----------------------------------------------------------------------------

if ($params->{'sequence2'} ne "")
{
    print $query->h4("Looking for $params->{'trainingset'} into $params->{'sequence2'}");
}
else
{
    print $query->h4("Looking for $params->{'trainingset'}");
}

print $query->hr({-width=>"40%", -align=>"left"});


my $lastIndex = $params->{'hits'}-1;
#my $index2  = $firstIndex + $params->{'hitsOnPage'} - 1;
my $index2  = $firstIndex + $params->{'hitsOnPage'};
$firstIndex++;
if ($index2 > $params->{'hits'}){$index2 = $lastIndex+1;}
print $query->p("Page $params->{'page'} (sequences containing hits : $firstIndex-$index2 / $params->{'hits'})");




print $query->startform(-action=>'/program/results.pl');

    my $maxPage = int ($params->{'hits'} / $params->{'hitsOnPage'}); #/

    print('<table width="80%" border="0"><tr><td>');
    for(my $i=0; $i<=$maxPage; $i++)
    {
        if($params->{'page'}==$i){
            print $query->submit(-name=>'page', -value=>"$i", -class=>'selected');}
        else {
            print $query->submit(-name=>'page', -value=>"$i");}
        if( ($i>0)&&( ($i % 20) == 0) ){print '<br>';}

    }
    
print $query->endform;



#Erpin results
#-----------------------------------------------------------------------------


my @array;
my $name = "no name";
for(my $i=0; $i<@results; $i++)
{
    if      ($results[$i] =~ />/)
            {
                $name = $results[$i];
                #$name =~ s/[\n\t\r\f\e\a]//gi;
                #$name =~ s/[\W]/_/gi;
                push(@array, $query->th({-align=>'left'}, [$name]) );

            }
    elsif   ( ($results[$i] =~ /FW/)or($results[$i] =~ /RC/) )
            {
                my $infoTable = infoTable($results[$i]);
                push(@array, $query->td({},[$infoTable]) );
            }
    else
            {
                my $seq  = $results[$i];
                my $form = createDrawingForm($query->{'trainingset'}, $name, $seq, $query);
                my $form2 = createSaveDrawingForm($query->{'trainingset'}, $name, $seq, $query);
                my $info =  '<table width=100%><tr>' .
                            "<td align=left>$form</td>" .
                            "<td align=left>$form2</td>" .
                            "<td class=sequences><pre>$seq</pre></td>" .
                            '</tr></table>';
                push(@array, $query->td({},[$info]) );
            }
}

print('<table border="0"><tr><td class="bodyline">');
print $query->table( {}, $query->Tr({-class=>'list2'},\@array) );
print('</td></tr></table><br>');



#Erpin statistics
#-----------------------------------------------------------------------------

print $query->h4("Statistics:");
printSortedHash($query, \%stats);


#Legend
#-----------------------------------------------------------------------------

printLegend($query);






#The Naview copyright notice
#-----------------------------------------------------------------------------

print $query->h4("Naview Copyright notice :");

print $query->p(    'The draw button shows pictures created by NAVIEW - ' . );
print $query->p(    '');





#-----------------------------------------------------------------------------
#				END
#-----------------------------------------------------------------------------


print $query->end_html;

je suis désolé d'envahir le forum mais c'est que je n'y comprends rien

[Message modifié le 21/07/2004 à 16:25 par zebden]

le 18/07/2004 à 14:52

personnes connectees

Bonjour a tous
sur le site que je travaille, une personne même s'il se connecte tant qu'il n'a pas cliqué sur un bouton "rechercher" je ne dois pas le comptabiliser comme une personne connectée.
J'ai fait le même programme que le site "http://www.lephpfacile.com/howto/index.php?page_a_afficher=7 "
mais je ne sais pas ajouter cette condition
Donnez moi vos avis svp

thierry4

Ses dernières news

Ses derniers sujets sur les forums

Ses derniers messages sur les forums

Ses derniers commentaires de news

Ses derniers commentaires de sites

Ses derniers commentaires de wall