egghelp/eggheads community

[SOLVED]What is wrong here

2014-07-15T04:12:40-04:00

Ahh thanks

Statistics: Posted by Fire-Fox — Tue Jul 15, 2014 4:12 am

[SOLVED]What is wrong here

2014-07-15T03:30:18-04:00

The:

Code:

  ::mysql::endquery $con  ::mysql::close $con

need to be moved one section down cos as are right now are in the else section.

Also, you can replace the first query with the second one that you should remove entirely.

Code:

bind pub -|- !info infolistproc infolist {nick uhost handle chan text} {if {![channel get $chan infoList]} returnvariable dbInfoif {[scan $dbInfo %s%s%s%s hostname username password database] != 4} return       set con [::mysql::connect -host $hostname -user $username -password $password -db $database]set query [::mysql::query $con "SELECT info FROM infos ORDER BY info"]if {[::mysql::fetch $query]==""} {putquick "PRIVMSG $chan : \0034Nothing found! :-(\003"  } else {::mysql::map $query { info } {putquick "PRIVMSG $chan :\0037INFO\003: \0039$info\003"}}::mysql::endquery $con::mysql::close $con}

Statistics: Posted by caesar — Tue Jul 15, 2014 3:30 am

[SOLVED]What is wrong here

2014-07-14T19:23:25-04:00

Here is the working version

Code:

bind pub -|- !info infolistproc infolist {nick uhost handle chan text} {   if {![channel get $chan infoList]} return   variable dbInfo  if {[scan $dbInfo %s%s%s%s hostname username password database] != 4} return          set con [::mysql::connect -host $hostname -user $username -password $password -db $database]  set query [::mysql::query $con "SELECT info FROM infos"]  if {[::mysql::fetch $query]==""} {        putquick "PRIVMSG $chan : \0034Nothing found! :-(\003"  } else {        set query [::mysql::query $con "SELECT info FROM infos ORDER BY info"]        ::mysql::map $query { info } {        putquick "PRIVMSG $chan :\0037INFO\003: \0039$info\003"  }  ::mysql::endquery $con  ::mysql::close $con}  }

Statistics: Posted by Fire-Fox — Mon Jul 14, 2014 7:23 pm

[SOLVED]What is wrong here

2014-07-14T14:23:47-04:00

There's no need to escape your dbInfo variable cos that's considered safe so no need to sanitize it but rather the user input.

The error clearly states where's the problem and SpiKe^^ highlighted that in his first post.

Statistics: Posted by caesar — Mon Jul 14, 2014 2:23 pm

[SOLVED]What is wrong here

2014-07-14T06:22:10-04:00

What will give me my login to the database

I'll post my setup when i get it to work

Statistics: Posted by Fire-Fox — Mon Jul 14, 2014 6:22 am

[SOLVED]What is wrong here

2014-07-13T17:19:24-04:00

Exactly what information are you trying to send to the ::mysql::escape proc?
I'm sure it's not the contents of $info because that variable does not exist yet.

Maybe you mean something more like...

Code:

   set info [::mysql::escape $dbInfo]

Statistics: Posted by SpiKe^^ — Sun Jul 13, 2014 5:19 pm

[SOLVED]What is wrong here

2014-07-13T14:07:24-04:00

Hey!

I have tried to put various places but havn't worked yet

Statistics: Posted by Fire-Fox — Sun Jul 13, 2014 2:07 pm

[SOLVED]What is wrong here

2014-07-13T12:21:07-04:00

Believe this would be the problem line...

Code:

   set info [::mysql::escape $info]

You are trying to read $info before it exists.

Statistics: Posted by SpiKe^^ — Sun Jul 13, 2014 12:21 pm

[SOLVED]What is wrong here

2014-07-14T19:24:02-04:00

can't read "info": no such variable

Code:

proc infoDel {nick uhost handle chan text} {     if {![channel get $chan infoDel]} return    variable dbInfo    if {[scan $dbInfo %s%s%s%s hostname username password database] != 4} return          set info [::mysql::escape $info]   set con [::mysql::connect -host $hostname -user $username -password $password -db $database]    set query [::mysql::query $con "SELECT info FROM info WHERE info = '$info'"]    if {[::mysql::fetch $query]==""} {   putquick "PRIVMSG $chan : Nothing found"   } else {   set query [::mysql::query $con "SELECT info FROM info WHERE info = '$info'"]   putquick "PRIVMSG $chan :Info list $info"   }   ::mysql::endquery $con    ::mysql::close $con }

Statistics: Posted by Fire-Fox — Sun Jul 13, 2014 8:52 am