Enregistrer dans un fichier une demande
#3
alias_angelius a écrit :Salut,

Sa fait un bail poto Very Happy

Tien je pense avoir une petite idée de ce que tu recherche Smile

tcl
set base "/home/eggdrop/fichier.db";
set adminlog "#adminlog"
 
bind pub - "!surveillant" surveille
proc surveille {nick uhost handle chan text} {
    set fp [open $::base a]
    puts $fp "[clock format [clock seconds] -format "%d/%m/%y"] $nick $text"
    close $fp
    putserv "NOTICE $nick :\00312Votre Texte a été enregistrée"
    putserv "PRIVMSG $::adminlog :\00312Add Texte : \0034$nick"
}
 
bind pub - "!listdb" listesur
proc listesur {nick uhost handle chan text} {
   set fp [open $::base r]
   set data [read -nonewline $fp]
   close $fp
   foreach templine [split $data "\n"] {
      set line [split $templine]
      puthelp "NOTICE $nick :$line"
      putserv "PRIVMSG $::adminlog :\00312 list Texte : \0034$nick"
   }
}



Je pense que sa doit être dans le genre que tu recherche Smile

En effet, ça fait un long moment ! Je te remercie pour ton aide, tu as tout de suite compris ce que je voulais faire.
Comme ça désormais je vais pouvoir faire quelque chose de plus personnel à partir de ça.

Merci beaucoup alias
Répondre Avertir


Messages dans ce sujet
RE: Enregistrer dans un fichier une demande - par ZoZo - 11/05/2012, 16:50

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté