Программирование > Perl

вывод ссылок заполненых дат sql

(1/1)

Yaroslav:
здравствуйте. вот такой вопросец, есть база с полем data 0000-00-00
нужно показать все даты в виде календаря и что б заполненные даты подсвечивались
с базы я могу их вытащить таким способом:

--- Код: ---SELECT data FROM baza WHERE data LIKE \'$2007%\' GROUP BY DATA
--- Конец кода ---

печать календаря идет так:

--- Код: ---@mdays = qw(31 28 31 30 31 30 31 31 30 31 30 31);
for $newmon (1..12) { print "$newmon ";
  for $newday (1..$mdays[$newmon]) { print "$newday "; }
  print "\\n";
}
--- Конец кода ---


можно конечно сделать на каждый день проверку, но думаю это не совсем оптимально

--- Код: ---$count = $dbh->selectrow_array("SELECT COUNT(*) FROM baza WHERE data LIKE \'2007-$mm-$dd%\'");
--- Конец кода ---

Phoinix:
Yaroslav

Дату LIKE фильтровать?

SELECT data FROM baza WHERE data BETWEEN \'2007\' AND \'2008\' GROUP BY data

А вопрос то в чем?

Yaroslav:
пока сделал такое решение, работает.


--- Код: ---$ref=$dbh->selectcol_arrayref("SELECT data FROM baza WHERE data LIKE \'2007%\' GROUP BY DATA");
for $newmon (1..12) {
    if ($newmon

Навигация

[0] Главная страница сообщений