1 #include <infodrom.style>
4 <page title="Infodrom Oldenburg - Mail-Archive">
6 <p><colorbox bgcolor=<box-blue>>
7 <font size=+1 color=ffffff><b>Mail Archive<?
8 if (strlen ($list) > 0 && is_dir ($list)) {
17 ACHTUNG: - Kein Support für weitere Unterverzeichnisse á la 2000/01, 2000/02 etc.
18 - Kein Support für ausgeschriebenen Namen der Liste
19 - Kein Support für Liste ohne Unterverzeichnisse 1999, 2000 etc.
21 if (strlen ($list) > 0 && is_dir ($list)) {
22 $dirs = array ($list);
26 while ($dentry = $dir->read()) {
27 if ($dentry != "." && $dentry != ".." && is_dir ($dentry)) {
36 for ($i=0; $i < $max; $i++) {
37 printf ("<li> <b>%s</b><br>", $dirs[$i]);
39 $dir = dir ($dirs[$i]);
41 while ($dentry = $dir->read()) {
42 if ($dentry != "." && $dentry != ".." && is_dir ("$dirs[$i]/$dentry")) {
49 $ymax = count ($years);
50 for ($y=0; $y < $ymax; $y++) {
51 printf ("%s<a href=\"%s/%s/\">%s</a>",
52 $y>0?", ":"", $dirs[$i], $years[$y], $years[$y]);
58 <quotebox lang=english type=general>