Help for this page

Select Code to Download


  1. or download this
    my($db) = new Win32::ODBC("user_logons");
    while (my $machine = <MACHINEFILE>) {
    ...
          
          $db->Sql("INSERT INTO <Data> (pc_name, user_name,time+date) " . 
    +"VALUES ($machine, $LocUsr, GETDATE())");
    }