All pastes #121719 Raw Edit

Mine

public text v1 · immutable
·published 2006-08-08 05:15 UTC
rendered paste body
alias loadhub {
  .echo -q $dll(mysql.dll,close,mysql)
  if ($gettok($dll(mysql.dll,connect,mysql -udw root pumabots sunsh1ne),2,32) == 010) {
    echo -a MySQL Hub has connected to the MySQL Server specified successfully!
    if ($gettok($dll(mysql.dll,query,mysql SELECT Date FROM `load`),2,32) == 022) {
      if ($gettok($dll(mysql.dll,fetchrow,1),2,32) == 025) {
        var %a UPDATE `load` SET `Last` = ' $+ $gettok($dll(mysql.dll,fetchrow,1),6,32) $+ ', `Date` = ' $+ $asctime(mmmm dd yyyy hh:nn:ss TT) $+ ', `ctime` = ' $+ $ctime $+ ', `mysql` = ' $+ $dll(mysql.dll,dllinfo,mysql) $+ '
        $iif($gettok($dll(mysql.dll,query,mysql %a,2,32) == 022,echo -a Wrote info to TABLE(load). Ready for use.,echo -a $errors($v1))
      }
      else {
        echo -a $errors($gettok($dll(mysql.dll,fetchrow,1),2,32))
      }
    }
    else {
      echo -a $errors($gettok($dll(mysql.dll,query,mysql SELECT `Date` FROM `load`),2,32))
    }
  }
  else {
    echo -a $errors($gettok($dll(mysql.dll,connect,mysql -udw root pumabots sunsh1ne),2,32)) Trying to finish hub load.
    if ($gettok($dll(mysql.dll,query,mysql SELECT Date FROM `load`),2,32) == 022) {
      var %a UPDATE `load` SET `Last` = ' $+ $gettok($dll(mysql.dll,fetchrow,1),6,32) $+ ', `Date` = ' $+ $asctime(mmmm dd yyyy hh:nn:ss TT) $+ ', `ctime` = ' $+ $ctime $+ ', `mysql` = ' $+ $dll(mysql.dll,dllinfo,mysql) $+ '
      $iif($gettok($dll(mysql.dll,query,mysql %a,2,32) == 022,echo -a Wrote info to TABLE(load). Ready for use.,echo -a $errors($v1))
    }
    else {
      echo -a $errors($gettok($dll(mysql.dll,query,mysql SELECT `Date` FROM `load`),2,32))
      $dll(mysql.dll,close,mysql)
      echo -a Closed Label(mysql)
    }
  }
}