getMessage()."\ndi:\n".$err->getDebugInfo(). "\nui:\n".$err->getUserInfo()."\n\n"; exit(1); } PEAR::setErrorHandling(PEAR_ERROR_PRINT, "%s

---

\n"); $dbc = DB::connect($config['dsn'], TRUE); if(PEAR::isError($dbc)){ echo "Database connection problem.\n"; echo "Check if database '{$config['dsn']['database']}' exists". " with corresponding permissions.\n"; echo "Database access is defined by 'dsn' values in conf.php.\n"; exit(1); } echo "#ArchiveServer uninstall:\n"; $dbc->setFetchMode(DB_FETCHMODE_ASSOC); $gb = &new Archive($dbc, $config); $dbc->setErrorHandling(PEAR_ERROR_RETURN); $gb->uninstall(); echo "#ArchiveServer uninstall: OK\n"; $dbc->disconnect(); ?>