31/10/2009, 13:09
ça devrais donner ceci ?
tcl
proc acceesalon {nick} {
set fa [open "autorise_salon.db" r]
while {![eof $fa]} {
gets $fa get
if {[string equal [string tolower $get] [string tolower $nick]]==1} {
return 1
}
close $fa
}
return 0
}
[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]