TCL : récupération de l'username dans un $uhost
#1
Bonjour,


Savez-vous comment il faudrait faire pour récuperer l'ident seulement dans un $uhost ?

le code que j'ai en ce moment c'est:

Code :
bind join - "*" join:verif proc join:verif { nick uhost hand chan } { global bb if {$chan == "#test"} { if {$bb(actif)=="1"} { bb:connect set sql "SELECT * FROM infos WHERE session like '%%testident'" set result [mysqlquery $bb(connect) $sql] set count [mysqlresult $result rows] if {$count == 0} { putserv "PRIVMSG #test :NOACCEPTED $nick " //commande gline } if {$count == 1} { putserv "PRIVMSG #test :$nick est accepté." } ##mysqlendquery $bb(query) } } bb:deconnect }

et l'username j'aimerais le mettre a la place de testident dans le LIKE '%%testident'"


Merci par avance.
Répondre


Messages dans ce sujet
TCL : récupération de l'username dans un $uhost - par mecmec - 27/07/2011, 20:05

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit - Discutez en toute liberté - Transitionnez vers Linux - Discussions dans le Lauragais - Communauté LGBT respectueuse - soutien aux victimes de cybermalveillance - pour les filles par les filles Le forum pour passer le temps