| |
| |
| |
|
Page: 1 2 3
Comments:
<0> *yaawn*
<1> u tired ?
<1> u should go to bed
<0> i'm about to ;)
<1> liar
<0> nu-hu
<2> :)
<3> could someone help me with this error: [22:46] Tcl error [pub:autoresp]: wrong # args: no expression after "if" argument in bnovc.com/triggers.tcl
<3> i dont know what if it is refering to
<4> use the pastebin (url in topic) and paste the proc autoresp, then somebody might be able to help :)
<3> i figured it out btw
<3> i did paste autoresp :)
<3> }else if { broke it
<3> so how come it doesnt give line numbers
<4> Because it doesn't
<3> that isn't why
<3> i think its the only language i know like that
<3> even garbled c++ errors are nicer :\
<3> set query [regsub -nocase {\'\} "replace into eggy_autoresp (Atrigger, Message, Creator) values('$trigger', '$message', '$nick')" "\'" string]
<3> could someone tell me whats wrong with that
<5> i parsing from a search site and i want it to output the 5 newest results... now i only outputs the url to where all results is
<6> [PASTE] anc just pasted code at http://paste.anbcs.com/3878 (none)
<7> why does this only spit out one line with a p***word
<7> isnt it possible to refresh a html site like that ?
<7> the url generates a new p***word everytime it is being refreshed
<5> regexp ??
<5> ?? regexp
<6> [What-is] That term has not been defined.
<8> ;clock format 1137334984 %H:%M:%S:%Y
<9> badaas: #67 (80016 clicks) Tcl error: wrong # args: should be "::tcl::clock::format clockval ?-format string? ?-gmt boolean? ?-locale LOCALE? ?-timezone ZONE?"
<8> ;clock format 1137334984 -fomrat %H:%M:%S:%Y
<9> badaas: #68 (3213 clicks) Tcl error: bad switch "-fomrat", must be -format, -gmt, -locale or -timezone
<8> ;clock format 1137334984 -format %H:%M:%S:%Y
<9> badaas: #69 (23639 clicks) Tcl: 15:23:04:2006
<8> ;clock format 1137334984 -format %H:%M:%S:%Y
<9> badaas: #70 (3849 clicks) Tcl: 15:23:04:2006
<0> ;clock format [clock seconds] -format "%D %T"
<9> yoe: #71 (4898 clicks) Tcl: 01/15/2006 15:25:52
<2> hmz
<2> did I amsg here with some arcor.de link?
<2> about an hour ago or something
<10> nope
<2> hum.. ic... thx
<2> you sure Pixelz? cause it was an amsg
<10> yeah
<10> last thing you said was
<10> 03:02:37 <+Skeddie> :)
<2> lol.. ok
<2> very weird
<10> perhaps you imagined it? :D
<2> no... they saw it on other chans
<2> and was an amsg
<2> so doesn't make sense
<10> weird
<2> hum, could I check with my bot somehow what was said in some chans?
<2> without the log having logged that stuff?
<10> no not unless it logged it
<2> damn
<10> you can always ask someone you trust about it ;)
<2> 4 people told me it, and I think I can trust them.... although they could plot together
<2> 5 now
<2> [14:53:08] <+Skeddie> http://home.arcor.de/edik15/CENSURED.pif rofl wie schlecht -.- :D [amsg]
<2> this should've appeared
<2> damn trojans
<1> 404 now tho
<2> yeh, cause I censured it
<1> ah, that's why it was spelled wrong :)
<2> :p
<1> anyways there's dirlisting
<2> how's it then?
<1> IMG_2013.pif
<2> I mean the spelling
<1> oh
<2> :p
<1> censored
<2> hmz
<1> !google CENSURED
<1> :)
<10> hmm
<10> strings had some interesting things to say
<10> looks like some kind of mirc trojan
<10> C:\WINDOWS\irc.mrc
<2> yeh, got it al lremoved
<2> it's good that the script is bugged
<2> and made for Quakenet
<10> heh
<2> found it weird that I got an away msg from L
<11> errors that are echoed to the log as Tcl error [proc_name]: error message can be called in the script by what variable?
<12> [set errorInfo]
<9> [GRiMMY]: #260 (149 clicks) Tcl: exposed command "pwd" already exists
<11> set $error [set errorInfo] ?
<6> set -> http://www.tcl.tk/man/tcl8.4/TclCmd/set.htm
<12> no...
<12> return [set errorInfo]
<9> [GRiMMY]: #264 (174 clicks) Tcl: exposed command "pwd" already exists
<11> ahh
<12> set thiserror [set errorInfo]; puts $thiserror
<9> [GRiMMY]: #266 (stdout) exposed command "pwd" already exists
<11> ok, i'm not following... forgive me
<12> lol
<12> you wanted the variable
<12> the variable is $::errorInfo
<11> heh, ok, let me put my question more clear
<12> puts $errorInfo; return $errorInfo
<9> [GRiMMY]: #272 (stdout) exposed command "pwd" already exists
<9> [GRiMMY]: #272 (334 clicks) Tcl: exposed command "pwd" already exists
<12> puts $::errorInfo; return $::errorInfo
<9> [GRiMMY]: #273 (stdout) exposed command "pwd" already exists
<9> [GRiMMY]: #273 (336 clicks) Tcl: exposed command "pwd" already exists
<11> [13:46] Tcl error [quote_add]: mysqlexec/db server: Duplicate entry <-- that's what i get for duplicate entries into my db
<12> yeah....
<11> i want to write an if statement to echo to the channel if that is the error statement
<11> if error is duplicate entry then privmsg chan blah blah
<12> if {[string equal $::errorInfo "exposed command \"pwd\" already exists"} {puts $::errorInfo} else { puts ok }
<12> if {[string equal $::errorInfo "exposed command \"pwd\" already exists"]} {puts $::errorInfo} else { puts ok }
<9> [GRiMMY]: #279 (stdout) exposed command "pwd" already exists
<12> ;error
<9> [GRiMMY]: #280 (269 clicks) Tcl error: wrong # args: should be "error message ?errorInfo? ?errorCode?"
<12> if {[string equal $::errorInfo "exposed command \"pwd\" already exists"]} {puts $::errorInfo} else { puts ok }
<9> [GRiMMY]: #281 (stdout) exposed command "pwd" already exists
<11> ok, so, with string equal, is there a use of wildcards?
<11> so i can just use Duplicate entry*
<12> no
<12> if {[string match -nocase $::errorInfo "exposed command *"]} {puts $::errorInfo} else { puts ok }
<9> [GRiMMY]: #285 (stdout) ok
<11> ahh
<12> set errorInfo
<9> [GRiMMY]: #287 (150 clicks) Tcl: exposed command "pwd" already exists
<12> if {[string match -nocase "exposed command *" $::errorInfo]} {puts $::errorInfo} else { puts ok }
<9> [GRiMMY]: #288 (stdout) exposed command "pwd" already exists
<11> [GRiMMY]: ok, i tried that... and it seems $::errorInfo isn't where the error was coming from ... maybe you can look at the code .. http://pastebin.com/507103
<11> nevermind
<11> hangon
<11> http://pastebin.com/507107
<11> that's the correct code
<12> well kinda busy right now
<11> its just one simple proc :(
<11> i didn't paste the whole script
<12> #
<12> } else {
<12> #
<12> putserv "PRIVMSG $channel :DebugSuccess: $::errorInfo"
<12> #
<12> }
<12> hmmmm
<11> that's just to see if its actually catching it by the if statement
<12> firstly, if there is no error occured $::errorInfo wont be related to the current script
<11> i know
<11> but, the error is occuring
<11> and its not catching it with that if statement
<12> mysqlexec $db_handle $sql
Return to
#eggtcl
or
Go to some related
logs:
free partion
#politics
#linuxhelp
#beginner
#mirc
witch sweetguy
Prison Break S02E14 fox
active-x eloa
#politics
+utorrent +disable +uploading
|
|