Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


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.


Messages In This Thread
TCL : récupération de l'username dans un $uhost - by mecmec - 27/07/2011, 20:05

Possibly Related Threads…
Thread Author Replies Views Last Post
  Récuperation de chaque ligne dans un .txt Epsilon 7 4,670 19/03/2017, 11:46
Last Post: CrazyCat
  [Demande] Script recupération dedicace sur une page web fedora 6 5,761 10/03/2015, 02:20
Last Post: angels
  Récupération de la liste de chan Moymoy 4 4,057 16/12/2013, 12:31
Last Post: Moymoy

Forum Jump:


Users browsing this thread: 1 Guest(s)