Работа с MySql. Создание каталога ссылок
Работа с MySql. Создание каталога ссылок.
Продолжим создание каталогизатора ссылок.
В одной из предыдущих статей мы создали две таблицы в базе данных на сервере MySql:
- links
- category
Кроме того, мы внесли в таблицу category данные, импортировав их из текстового файла.
Во второй статье мы "одели" результат запроса из списка категорий в Web-интерфейс.
Теперь нам нужно заполнить таблицу links, написать скрипт getlinks.pl для вывода списка ссылок с сообтветствующими категориями.
Поступим с заполнением таблицы links также, как и с таблицей categories : импортируем ссылки из текстового файла.
Текстовый файл:
"ProgramminG-программирование для всех!";"//www.programming.dax.ru";1
"Corwell Design Studio";"//www.cds.ru";1
"МТУ-Информ";"//www.mtu.ru";1
"Студия Артемия Лебедева";"//www.design.ru";1
"Каталог детских ресурсов";"//www.kinder.ru/";1
"Быки и коровы";"//bk.ru";2
"Мерен";"//meren.ru/";2
"Все девочки";"//www.allgirls.ru/";2
"Развлекательный сайт пива Доктор Дизель";"//www.doctordizel.ru";2
"Анекдотов.net - максимум развлечений";"//anekdotov.net";2
"Знакомства и Развлечения";"//www.atis.kz/";2
"Чертовы Кулички";"//www.kulichki.com/";2
"Драконье логово";"//balrog.virtualave.net/";2
"Инфосити";"//www.infocity.kiev.ua/";3
"Открытые системы";"//www.opennet.ru/";3
"Масса полезной документации";"//citforum.ru/";3
"Download.ru";//www.download.ru/;4
"СОФТЛИСТ.РУ";//www.softlist.ru/;4
"Темы.РУ";//www.themes.ru/;4
"Altavista.com";"//www.altavista.com/";5
"Яндекс.ру";"//www.yandex.ru/";5
"Мета-ukraine";"//meta-ukraine.com/";5
"Gala chat";"//www.galachat.com";6
"Свежак для открытых систем";"//freshmeat.net";7
"Sourceforge";"//sourceforge.net";7
"Linuxguru";"//www.linuxguru.com";7
"Для Web-разработчика";"//www.stars.com";7
"PHP.net";"//www.php.net";8
"Google groups";"//groups.google.com";9
"Lenta.ru";"//lenta.ru";10
"Корреспондент.нет";"//www.korrespondent.net";10
Сохранить его , скажем в "c:\MyDocs\links.txt".
Теперь нужно поместить его в таблицу links. Мы это уже делали с категориями, теперь запросом
LOAD DATA LOCAL INFILE '/MyDocs/links.txt' REPLACE
INTO TABLE links FIELDS TERMINATED BY ';' OPTIONALLY
ENCLOSED BY '\"' LINES TERMINATED BY '\r'
заполним таблицу ссылок из текстового файла.
Запрос можно выполнить как из скрипта, так и из программы администрирования SQL сервера.
Теперь можно писать скрипт, который будет выводить список ссылок из выбранной категории.
В предыдущей статье мы написли ссылку
print "<td>","<a href=\"$scr_name?page=$ln->{'id'}\">$ln->{'name'}</a>","</td></tr>\n";
Значит, в качестве параметров мы передаем скрипту номер (id) категории под именем page.
Чтобы вывести ссылки только из данной категории, нужно выполнить SQL запрос
SELECT * FROM links WHERE category=id;
Скрипт будет выполнять следующие действия:
- Разбор параметров, переданных в скрипт;
- Выполнение SQL запроса;
- Вывод результата в указанное место в шаблоне.
Подготовим HTML документ с необходимым нам оформлением, и в том месте, где должны быть ссылки
вставим комментарий:
<!-- LINKS_HERE -->
Программа на языке Perl будет иметь следующий вид:
#!/usr/bin/perl
use DBI;
print "Content-type:text/html\n\n";
$temp=$ENV{'QUERY_STRING'};
# Разбор строки параметров
if ($temp ne '') {
@pairs=split(/&/,$temp);
foreach $item(@pairs) {
($key,$content)=split (/=/,$item,2);
# Режем на название ключа и значение.
# Названия параметров и значения помещаем в хэш
$data{$key}=$content;
}
}
# проверяем, есть ли переменная с именем page
if ($data{'page'} ne undef) { #
$qry = "SELECT * FROM links WHERE category=".$data{'page'}; #
my $dbh = DBI->connect("DBI:mysql:database=ваша_база_данных;host=адрес_сервера_mysql",
"логин", "пароль") || die $DBI::errstr;
# готовим запрос
my $result = $dbh->prepare($qry);
# и выполняем его
$result->execute();
# разбираем результат
print "<ul>\n";
while (my $ln = $result->fetchrow_hashref()) {
print "<li><a href=\"", $ln->{'url'},"\"
target=\"_blank\">",$ln->{'name'},"</a></li>\n";
}
print "</ul>\n";
$dbh->disconnect();
print "<a href=javascript:history.back()>Предыдущая страница</a>\n";
}
В результате исполнения этого скрипта будет выведен список ссылок, оформленный как
Немаркированный список, каждая ссылка будет открываться в новом окне.
Надеюсь, принцип работы данной программы понятен, и каждый волен ее дорабатывать на свой вкус.
Я , например в рабочей версии каталогизатора (она, правда написана на PHP), еще добавил в таблицу links еще и описание ресурса,
и счетчик, куда записывается каждый клик по ссылке.
|
|| разделы::
