Реферат: Проектирование информационных систем на базе MySQL и Internet

 }

 $sth->finish();

 $dbh->disconnect();

 print "</table></center>";

 print "<br>";

 print "<center><table border=0>";

 print "<tr><td><center><INPUT type=\"submit\" value=\"Удалить\"></center\></td>";

 print "</FORM>";

 print "<td><FORM action=\"http://myserver/cgi-bin/Konti.bat\">";

 print "<center><INPUT type=\"submit\" value=\"На главную\"></center\></td></tr>";

 print "</FORM>";

 print "</table></center>";

}

else

{

 print h1("Неправильный пароль!!!");

}

print end_html();

Файл BDankets.cgi – исполняемая программа.

Выводит список анкет на основе данных таблицы t2 и предлагает администратору удалить наименее перспективные.

Имеет 2 кнопки:

-     “Удалить" - запускает скрипт ankdel.cgi;

-     “На главную" - запускает скрипт Konti.cgi;

и 2 ссылки:

-     “Список вакансий" - запускает скрипт BDvakans.cgi;

-     “Список анкет" - запускает скрипт BDankets.cgi.

BDankets.cgi

use CGI qw(:standard);

 use DBI;