Big thanx
With some changes it works great.
code:
---------------------------------------------------------------------------------
proc iRCNUKE {nick uhost hand chan args} { if {[ioB:istrusted $uhost] } {
global ioBvar
set path [string trim [lindex [lindex $args 0] 0]]
set rlz [string trim [lindex [lindex $args 0] 1]]
set multi [string trim [lindex [lindex $args 0] 2]]
set reason [string trim [lindex [lindex $args 0] 3]]
::ftp::Cd $ioBvar(ftp) $path
::ftp::Quote $ioBvar(ftp) SITE nuke $rlz $multi $reason
}
}
---------------------------------------------------------------------------------