my $sth_cs = $dbh->prepare(q~update script_run_rules set running=1,run_user=? where NAME='InvDispute'~) or die "Couldn't prepare statement: " . $dbh->errstr; $sth_cs->execute($u_email); my @args = ("c:\\Apache2.2\\script_run\\exec_invdispute.pl", $u_email); system( 1,$cmd, @args ); print header; print Header_HTML(); print< $balken $scr_menue  

script started you will get an email when it's finished

$logo HTML