egghelp/eggheads community

mysqlquery: not mysqltcl handle

2009-04-04T13:32:39-04:00

thank ; but don't work

Statistics: Posted by UK10 — Sat Apr 04, 2009 1:32 pm

mysqlquery: not mysqltcl handle

2009-03-30T14:17:22-04:00

Some examples regarding variable spaces then.

Code:

set myvar 1proc test1 {} { putlog $::myvar}proc test2 {} { putlog $myvar}proc test3 {} { global myvar putlog $myvar}proc test4 {} { upvar #0 myvar test putlog $test putlog $myvar}proc test5 {} { upvar #0 myvar test putlog $test putlog $::myvar set myvar 2 putlog $myvar putlog $::myvar}

The above shows a few working and non-working procs that try to access the globalspace variable ::myvar (set in the beginning of the script):

test1 (works):
Here we access the variable using the full namespace path ::myvar
test2 (not working):
Here we try to access the variable, but we leave out the namespace path. As such, instead we'll end up trying to access the local variable myvar, which does not exist. You'll end up with an error stating "No such variable".
test3 (works):
Here we first use the global command, which will link the local variable myvar to the globalspace variable ::myvar. As a result, whenever we access myvar, we'll actually end up operating on ::myvar.
test4 (works, but generates an error):
Here we first use the upvar command to link the local variable test with the globalspace variable ::myvar. The first putlog will work, as it accesses the now linked variable test. The second putlog will however fail, as there still is no local myvar variable.
test5 (works):
Here we also link test with ::myvar, but it also illustrates how setting a local variable will not affect a globalspace one.

Statistics: Posted by nml375 — Mon Mar 30, 2009 2:17 pm

mysqlquery: not mysqltcl handle

2009-03-30T14:00:13-04:00

give me example about this code

Statistics: Posted by UK10 — Mon Mar 30, 2009 2:00 pm

mysqlquery: not mysqltcl handle

2009-03-28T22:59:50-04:00

strange , before that running without modifications

Statistics: Posted by UK10 — Sat Mar 28, 2009 10:59 pm

mysqlquery: not mysqltcl handle

2009-03-28T13:27:33-04:00

First, the proc that caused the error is not included in the posted code.
Secondly, when you connect, you run the code in globalspace, so the database handle is stored in ::mysql_handler, yet atleast in pub:test, you are trying to use the localspace variable mysql_handler. Most likely, you forgot to link the localspace variable to the globalspace one (using the global command).

Same goes for several other variables in your pub:test proc.

Statistics: Posted by nml375 — Sat Mar 28, 2009 1:27 pm

mysqlquery: not mysqltcl handle

2009-03-28T09:03:31-04:00

Hi..need help thx

Code:

PREDB : Error connexion  MySQL ! Tcl error [pub:addpre]: mysqlquery: not mysqltcl handle

Tcl scripting

Code:

################################ Connexion à MySQL################################load libmysqltcl.dllpackage require mysqltclif { [catch {mysqlstate $mysql_handler}] } { if [catch {mysqlconnect -host $host -user $user -password $password -db $db} mysql_handler] {  putquick "PRIVMSG $chanadd :Error MySQL !!"  putlog "PREDB : Error connexion MySQL !" }} else {  putlog "PREDB: MYSQL connected !"}bind pub - !test pub:testproc pub:test {nick uhost handle channel arg } {global Hdecalage chanadd chanpre botnetkick1 prebotnick erreurif { [catch {mysqlstate $mysql_handler}] } { if [catch {mysqlconnect -host $host -user $user -password $password -db $db} mysql_handler] {  putlog "PREDB : Error MySQL !" }} else {  putlog "PREDB : Connect MySQL !"}

Statistics: Posted by UK10 — Sat Mar 28, 2009 9:03 am