Help for this page

Select Code to Download

Select or download this

$sql = qq{ 
     RESTORE DATABASE ${dbname}
...
}

$sth->execute() || die "Restore failed with this error $DBI::errstr nu
+m: $DBI:err state: $DBI::state\n" ;

Select or download this

do{
$sth->execute() || die "Restore failed with this error $DBI::errstr nu
+m: $DBI:err state: $DBI::state\n" ;
}while ($sth->{odbc_more_results});