Смена кодировки всех таблиц в БД - SQL-запрос

Необходимо выполнить один раз следующий PHP-скрипт:
$res = $DB->Query("SHOW TABLES");
while($ar = $res->GetNext())
{
$DB->Query("ALTER TABLE `".array_shift($ar)."` DEFAULT CHARACTER SET cp1251");
}