Vous n'êtes pas identifié(e).

Top posteurs

Statistiques

Partenaires

  • eXolia Hosting
  • Eggdrop.fr

#1 18/01/2012 22:09:47

Guese
IRCzien
Lieu : Grasse
Inscription : 29/06/2011
Messages : 148
Site Web

[Résolu] Problème trivia fr

Bonsoir,

J'ai un petit soucis avec le trivia fr, pour la partie génération de la page PHP des résultats.
J'ai fais quelques modifications, et depuis (et je tourne en rond pour trouver ce qu'il ne va pas), ça me met une erreur quand je rehash l'eggdrop:

[20:58:27] Tcl error in script for 'timer26246':
[20:58:27] extra characters after close-quote

Voici le code concerné:

Code: TCL
proc tghtml {} {
    global tgchan botnick tghtmlfile tghtmlrefresh server tgscoresbyname tgranksbyname
    global tgscorestotal tgranksbyname tgrealnames tgscoresbyrank tgranksbynum tgplaying
    global tgquestionstotal tghtmlrefreshtimer tghtmlfont
    tggetscores
    tgreadqdb
    set _file [open $tghtmlfile~new w]
    puts $_file "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">"
    puts $_file "<html xmlns=\"http://www.w3.org/1999/xhtml\">"
    puts $_file "<head>"
    puts $_file "<meta http-equiv=\"content-type\" content=\"text/html;charset=iso-8859-1"\" />"
    puts $_file "<meta http-equiv=\"Content-Language\" content=\"fr\" />"
    puts $_file "<meta http-equiv=\"Content-Script-Type\" content=\"text/javascript\" />"
    puts $_file "<meta http-equiv=\"Content-Style-Type\" content=\"text/css\" />"
    puts $_file "<title>TChat sans inscription - Quizz</title>"
    puts $_file "<meta http-equiv=\"refresh\" content=\"$tghtmlrefresh\" />"
    puts $_file "<meta name=\"Description\" lang=\"fr\" content=\"Quizz de France-Chat. Chat gratuit pour faire des rencontres près de chez vous. Tchattez avec des centaines de filles et de garçons de toutes les régions sur France Chat !\" />"
    puts $_file "<meta name=\"Keywords\" lang=\"fr\" content=\"tchat, sans inscription, chat, rencontre, gratuit, tchat gratuit, rencontre gratuite, region, kwiz, quizz\" />"
    puts $_file "<link rel=\"icon\" type=\"image/png\" href=\"favicon.png\" />"
    puts $_file "<link rel=\"stylesheet\" href=\"style.css\" type=\"text/css\" media=\"screen\" title=\"Normal\" />"
    puts $_file "<?php include 'header.php'; ?>"
    puts $_file "	<div id=\"texte\">"
    puts $_file "  <h1>Quizz France Chat</h1>"
    puts $_file "  <hr size=\"1\" noshade>"
    if {![onchan $botnick $tgchan]} {
        puts $_file "  <p>Hmmm... Il y a personne de connecté sur le chan pour le moment.</p>"
    } else {
	    if { $tgplaying == 1 } {
		    set tghtmlstatus "activé"
	    } else {
		    set tghtmlstatus "désactivé"
	    }
        puts $_file "  <p>Le quizz est actuellement <b>$tghtmlstatus</b>. Il y a <b>$tgquestionstotal</b> questions dans la base de donnée."
        puts $_file "  <p>En ce moment sur $tgchan :<br>"
        puts $_file "  <table width=\"50%\" border=\"1\" cellspacing=\"0\" cellpadding=\"0\"><tr><td><table width=\"100%\" cellspacing=\"3\" border=\"0\">"
        puts $_file "   <tr>"
        puts $_file "    <td><b>Pseudo</b></td>"
        puts $_file "    <td><b>Score</b></td>"
        puts $_file "    <td><b>place</b></td>"
        puts $_file "    <td><b>Idle</b></td>"
        puts $_file "   </tr>"
        foreach nick [lsort [chanlist $tgchan]] {
            puts $_file "   <tr>"
            puts $_file "    <td>[expr [isop $nick $tgchan]?"@":""][expr [isvoice $nick $tgchan]?"+":""]$nick[expr [string match $nick $botnick]?" (Moi!)":""]</td>"
            if {[info exists tgscoresbyname([strlwr $nick])]} {
                puts $_file "    <td>$tgscoresbyname([strlwr $nick])</td>"
            } else {
                puts $_file "    <td>-</td>"
            }
            if {[info exists tgranksbyname([strlwr $nick])]} {
                puts $_file "    <td>$tgranksbyname([strlwr $nick])</td>"
            } else {
                puts $_file "    <td>-</td>"
            }
            puts $_file "   <td>[expr [getchanidle $nick $tgchan]>10?"[getchanidle $nick $tgchan]m":"-"]</td>"
            puts $_file "   </tr>"
        }
        puts $_file "  </table></td></tr></table>"
    }
    if {$tgscorestotal>0} {
        puts $_file "  <p><small>il y a <b>$tgscorestotal</b> [expr $tgscorestotal==1?"nick":"nicks"] dans le classement:<br>"
        set _rank 1
        while {$_rank<=$tgscorestotal} {
            puts $_file "  <b>$_rank</b>. $tgrealnames($tgranksbynum($_rank)) $tgscoresbyrank($_rank)<br>"
            incr _rank
        }
    } else {
        puts $_file "  <p><small>Il n'y a actuellement personne dans le classement.<br>"
    }
    puts $_file "  </small></p>"
    puts $_file "  <hr size=\"1\" noshade>"
    puts $_file "  <small>Générée le [strftime %A,\ %d\ %B\ %Y\ @\ %H:%M:%S] avec <a href=\"http://www.eggdrop.fr/\">trivia.tcl</a> pour <a href=\"http://www.eggheads.org\">eggdrop</a>.<br>"
    puts $_file "  Cette page est réactualisée automatiquement toutes les [expr $tghtmlrefresh==1?"second":"$tghtmlrefresh seconds"].</small>"
    puts $_file "	</div>"
    puts $_file "<?php include 'footer.php'; ?>"
    close $_file
    file rename -force $tghtmlfile~new $tghtmlfile
    set tghtmlrefreshtimer [utimer $tghtmlrefresh tghtml]
}

Merci de votre aide smile

PS: j'ai bien modifié le "set tghtmlfile "/home/guese/public_html/quizz.php""


Faîtes une rencontre gratuite sur notre tchatche sur irc.

Hors ligne

#2 18/01/2012 22:40:44

Diogene
IRCzien
Lieu : Le Mans
Inscription : 09/07/2011
Messages : 178

Re : [Résolu] Problème trivia fr

Essayes de remplace ceci :

Code: TCL
set tghtmlrefreshtimer [utimer $tghtmlrefresh tghtml]

Par ceci :

Code: TCL
set tghtmlrefreshtimer utimer [list $tghtmlrefresh tghtml]

Amicalement, Diogene.


Mieux vaut mourir incompris que passer sa vie à s'expliquer. [William Shakespeare]

Bon, c'est Diogene, mais c'est un humain malgré tout [CrazyCat]

Hors ligne

#3 18/01/2012 22:44:19

Guese
IRCzien
Lieu : Grasse
Inscription : 29/06/2011
Messages : 148
Site Web

Re : [Résolu] Problème trivia fr

Ça me fait déconnecter le robot en Client exited sad


Faîtes une rencontre gratuite sur notre tchatche sur irc.

Hors ligne

#4 19/01/2012 02:17:20

ludo`
IRCzien
Lieu : FRANCE
Inscription : 11/07/2011
Messages : 111
Site Web

Re : [Résolu] Problème trivia fr

salut guese
et si tu met juste utimer $tghtmlrefresh tghtml sa irai pas à voir si la variable n'est pas demander comme depuis mon mobile peut pas regarder. mais bon qui sais.

Hors ligne

#5 19/01/2012 15:59:33

Guese
IRCzien
Lieu : Grasse
Inscription : 29/06/2011
Messages : 148
Site Web

Re : [Résolu] Problème trivia fr

Toujours la même erreurs :s


Faîtes une rencontre gratuite sur notre tchatche sur irc.

Hors ligne

#6 19/01/2012 20:26:38

Guese
IRCzien
Lieu : Grasse
Inscription : 29/06/2011
Messages : 148
Site Web

Re : [Résolu] Problème trivia fr

Problème résolu !

Tout ça à cause d'un " de trop, merci NiCkOoS big_smile


Faîtes une rencontre gratuite sur notre tchatche sur irc.

Hors ligne

#7 19/01/2012 20:33:37

Nickoos
IRCzien
Lieu : Treignes
Inscription : 10/09/2011
Messages : 163

Re : [Résolu] Problème trivia fr

Code: TCL
puts $_file "<meta http-equiv=\"content-type\" content=\"text/html;charset=iso-8859-1\" />"

Pour les intéressés.

Hors ligne

Pied de page des forums

412221 visites ( 61 aujourd'hui ) 4 visiteurs en ligne
Copyright © 2004 - 2013 IRCz