| View previous topic :: View next topic |
| Author |
Message |
Liteqh
Voice
Joined: 17 Oct 2005
Posts: 1
|
 Posted: Mon Oct 17, 2005 8:32 am Post subject: Store selected information. |
 |
|
Hi, im running a bnc company and im getting tired of users asking to change their passwords as they forget them. Is there a possibility that i can get a script that would store the information i tell it to, like i start a task with the bot lik $startstore and then type $email blah@blah.com and so on untill i have added the the information i need then close it with $endstore. I have also toy'd with the idea of having it in one big file rather than a file per client, just add perhaps a $search feature that would go through the file and show me the results of the matching details.
Thankyou in advance. |
|
| Back to top |
|
 |
greenbear
Owner
Joined: 24 Sep 2001
Posts: 733
Location: Norway
|
| Posted: Mon Oct 17, 2005 11:09 am Post subject: |
|
|
| yea this is sooooo related to eggdrop |
|
| Back to top |
|
|
Sir_Fz
Revered One
Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon
|
| Posted: Mon Oct 17, 2005 12:50 pm Post subject: |
|
|
Try
| Code: | # File
set bncinfofile "scripts/bncinfo.txt"
# Information
set bncinfo {name email password}
bind msg n bncadd bnc:info:add
bind msg n bncget bnc:info:get
proc bnc:info:add {nick uhost hand arg} {
global bncinfofile bncinfo
set c 0
foreach i $bncinfo {
append info "$i: [lindex [split $arg] $c] "
incr c
}
puts [set f [open $bncinfofile a]] $info
close $f
}
proc bnc:info:get {nick uhost hand arg} {
global bncinfofile
foreach i [split [read [set f [open $bncinfofile]]] \n][close $f] {
if {[string equal -nocase [lindex $i 1] [lindex [split $arg] 0]]} {
puthelp "notice $nick :$i" ; set found 1
break
}
}
if {![info exists found]} {
puthelp "notice $nick :[lindex [split $arg] 0] was not found in the DB."
}
} |
SYNTAX:
bncadd <name> <email> <password> (depends on "set bncinfo")
bncget <name>
_________________
Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
