egghelp/eggheads community

Problems with Invite MySQL script

2003-05-31T11:34:20-04:00

ok all sorted now thanks

Statistics: Posted by almighty — Sat May 31, 2003 11:34 am

Problems with Invite MySQL script

2003-05-30T20:00:07-04:00

A query is a a SQL statment.

After you have finished with teh data a query returns, you need to tell the Tcl library as such.

Usualy ending the query at all the exit points of a proc (IE, any place before a return, or where the script stops)_

Statistics: Posted by ppslim — Fri May 30, 2003 8:00 pm

Problems with Invite MySQL script

2003-05-30T18:07:24-04:00

right new thing.

Code:

bind msg - login inv_1load /home/almighty/eggdrop/scripts/sql/fbsql.soproc inv_1 { nick uhost hand arg } {        global chan_1        set arg [split $arg]        set user [lindex $arg 0]        set pass [lindex $arg 1]        sql startquery "SELECT * FROM tbl_member WHERE username = '$user' AND password = '$pass'"        sql endquery        sql startquery        if {[sql numrows] == 0} {        sql endquery        putserv "PRIVMSG $nick :Invalid password or username!"        putserv "PRIVMSG #ae-hc :\0034Invalid Login:\003 $nick (Username: $user)"        putcmdlog "$nick has failed to log in using $user as a username"        } else {        sql endquery        putserv "PRIVMSG #ae-hc :\0039Successful Login:\003 $nick (Username: $user)"        putquick "invite $nick $chan_1"        putcmdlog "$nick has successfully logged in using $user as a username"        sql disconnect        }}

right the error message im getting in the log files is:

Code:

[23:01] Tcl error [inv_1]: Another query cannot be made until the current query has been finished with "sql endquery".

i no i need to use sql endquery except im not sure where to put them, as does a query count as mysql or tcl commands?

Statistics: Posted by almighty — Fri May 30, 2003 6:07 pm

Problems with Invite MySQL script

2003-05-29T15:59:51-04:00

ok well ive removed the conn variable out of it however it now says
[20:55] Tcl error [inv_1]: sql query statement; you are not connected to a mysql server yet (sql connect).

the sql connect code is:
sql connect localhost user "pass"
sql selectdb almighty

Statistics: Posted by almighty — Thu May 29, 2003 3:59 pm

Problems with Invite MySQL script

2003-05-29T04:49:44-04:00

I don't think you need $conn anyhow.

I thought fbsql provided multiple commands sets, rather than handle based connections?

IE, for a connection to SQL server 1, you use "sql", for SQL server 3, use "sql3".

Statistics: Posted by ppslim — Thu May 29, 2003 4:49 am

Problems with Invite MySQL script

2003-05-28T20:11:40-04:00

conn is defined outside the of procedure

( hint: global conn / $::conn )

Statistics: Posted by spock — Wed May 28, 2003 8:11 pm

Problems with Invite MySQL script

2003-05-28T13:36:06-04:00

Code:

bind msg - login inv_1# Script starts nowload /home/almighty/eggdrop/scripts/sql/fbsql.soset conn [sql connect localhost ***** "*****"]sql selectdb almighty $connproc inv_1 { nick uhost hand arg } {        global chan_1        set arg [split $arg]        set user [lindex $arg 0]        set pass [lindex $arg 1]        set stuff "SELECT * FROM tbl_member WHERE username = '$user' AND password = '$pass'"        sql query $conn $stuff        if {[sql numrows] == 0} {        sql endquery $stuff        putserv "PRIVMSG $nick :Invalid password or username!"        putserv "PRIVMSG #ae-hc :\0034Invalid Login:\003 $nick (Username: $user1)"        putcmdlog "$nick has failed to log in using $user1 as a username"        } else {        sql endquery $stuff        putserv "PRIVMSG #ae-hc :\0039Successful Login:\003 $nick (Username: $user1)"        putquick "invite $nick $chan_1"        putcmdlog "$nick has successfully logged in using $user1 as a username"        }}        sql disconnect $conn

This is the new code however i now get the error message
[13:12] Tcl error [inv_1]: can't read "conn": no such variable

Statistics: Posted by almighty — Wed May 28, 2003 1:36 pm

Problems with Invite MySQL script

2003-05-28T09:32:04-04:00

hehe just remembered myself.. was gonna come back and make it right, but as usual you are here to show us the way

Statistics: Posted by Papillon — Wed May 28, 2003 9:32 am

Problems with Invite MySQL script

2003-05-28T08:46:17-04:00

just a couple of things,
2. Don't use the ' in the query, say if the pass is sun, then '$pass' would return 'sun' not sun ... hope you see the difference In TCL the ' char has no special meaning, and does not work like in php where it has the same use as "

He has used this correctly.

It is not Tcl that needs the ' quote. It is MySQL.

Code:

command hello and welcome to my world

If the above where Tcl code, how would it tell that is all one string, or 6 seperate ones, hell, even 3 strings in random sized groups.

This is easy to fix in Tcl with ".

However, the same applies to MySQL. In Tcl & PHP, you are using the SQL programming language within another language.

Just like in PHP and Tcl, MySQL distiguishes between what is part of a large string using quotes. In MySQL, you can use " and ' just like PHP.

His current usage with this is correct, for most compatability.

Statistics: Posted by ppslim — Wed May 28, 2003 8:46 am

Problems with Invite MySQL script

2003-05-28T05:57:25-04:00

just a couple of things,
1. You don't need the [] brackets around the sql query, nothing wrong, just thought I'd say it
2. Don't use the ' in the query, say if the pass is sun, then '$pass' would return 'sun' not sun ... hope you see the difference In TCL the ' char has no special meaning, and does not work like in php where it has the same use as "
3. Again nothing wrong, but no need to split the arg using " ", it'll default to that, all you need is [split $arg]

Statistics: Posted by Papillon — Wed May 28, 2003 5:57 am

Problems with Invite MySQL script

2003-05-27T17:15:34-04:00

right this is my new code

Code:

load /sql/fbsql.sosql connect localhost ***** "*****"sql selectdb almightybind msg - login inv_1# Script starts nowproc inv_1 { nick uhost hand arg } {        global chan_1        set found 0        set arg [split $arg " "]        set user1 [lindex $arg 0]        set pass1 [lindex $arg 1]        [sql "SELECT * FROM tbl_member WHERE username = '$user1' password = '$pass'"]        if {[sql numrows] == 0} {        putserv "PRIVMSG $nick :Invalid password or username!"        putserv "PRIVMSG #ae-hc :\0034Invalid Login:\003 $nick (Username: $user1)"        putcmdlog "$nick has failed to log in using $user1 as a username"        } else {        putserv "PRIVMSG #ae-hc :\0039Successful Login:\003 $nick (Username: $user1)"        putquick "invite $nick $chan_1"        putcmdlog "$nick has successfully logged in using $user1 as a username"        }}

however when i try and do /msg login it still doesnt work
ne ideas?

Statistics: Posted by almighty — Tue May 27, 2003 5:15 pm

Problems with Invite MySQL script

2003-05-27T17:11:46-04:00

You keep the "lindex" commands, but not the "string range".

The "string range" commands are returning exactly what you put into them.

Statistics: Posted by ppslim — Tue May 27, 2003 5:11 pm

Problems with Invite MySQL script

2003-05-27T11:29:00-04:00

so u suggest i change the IF statement which ive now done, and also remove the string range commands?

Also if i remove the lindex commands where do i catch the username and password of the member?

Statistics: Posted by almighty — Tue May 27, 2003 11:29 am

Problems with Invite MySQL script

2003-05-27T10:42:17-04:00

OK, I noticed quite a few things after that

1: You don't need the "string range" commands. These simply return exactly what went in. I am guessing you are trying to account for the much covered list to string issues. "lindex" returns only one element, as such, this is a string (unless you have lists in lists, which is irelivent in this case).

2: Check your first IF statment. I am guessing is is meant to read

Code:

if {[sql numrows] == 0} {ORif {![sql numrows]} {

Statistics: Posted by ppslim — Tue May 27, 2003 10:42 am

Problems with Invite MySQL script

2003-05-27T09:37:55-04:00

the sql server is on localhost

Statistics: Posted by almighty — Tue May 27, 2003 9:37 am