Using Perl set windows scheduler password.

use Win32::TaskScheduler;

my @jobs;
my $schedulers = Win32::TaskScheduler->New();

@jobs = $schedulers->Enum();
foreach (@jobs){

print "$_";

$schedulers->Activate("$_");

my $rtn = $schedulers->SetAccountInformation('DWSERVER\Administrator','set password here');

$rtn += $schedulers->Save();

print "success\n" if $rtn == 2;

print "error\n" if $rtn != 2;
}