Rev Author Line No. Line
756 Dawon 1 <?php
2 echo "<tr>\n";
758 Dawon 3 $adresar1 = opendir($path.$folder."/".$HTTP_GET_VARS["file"]);
756 Dawon 4 while ($soubor1 = readdir($adresar1)){
5 if ((Is_Dir($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1)) && (substr($soubor1,0,1) <> ".") && (substr($soubor1,0,1) <> "!")) {
6 $img = $soubor1."_Small.jpg";
7  
8  
9  
767 Dawon 10 /* if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img)) {
756 Dawon 11 echo "<td><img src=\"".$www.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img."\"></td>\n";
767 Dawon 12 } else { echo "<td><img src=\"http://www.mlab.cz/Web/PIC/nopicture2.jpg\"></td>\n"; }*/
756 Dawon 13  
769 Dawon 14 echo "<td><img src=\"thumb.php?pth=".$HTTP_GET_VARS["file"]."/".$soubor1."&fname=".$soubor1."\"></td>\n";
767 Dawon 15  
756 Dawon 16 if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html")) {
17 echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html\">".$soubor1."</a></td>\n";
18 } else { echo "<td>".$soubor."/<b>".$soubor1."</b></td>\n"; }
19 if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf")) {
20 echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf\">PDF</a></td>\n";
21 } else { echo "\n<td>-</td>\n"; }
22 // if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$info)) {
23 // echo "<td><a href=".$www.$folder.'/'.$soubor."/".$soubor1."/".$info.">XML</a></td>\n";
24 // } else { echo "<td>-</td>\n"; }
25 echo "<td><a href=\"http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&amp;path=/Modules/".$HTTP_GET_VARS["file"]."/".$soubor1."/\">WebSVN</a></td>\n";
26 if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1)) {
27 $fp = FOpen ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1, "r");
28 $data = FRead ($fp, FileSize ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1));
29 FClose ($fp);
30 echo "<td>".wordwrap($data, 50, "<br>")."</td>\n";
31 } else { echo "\n<td><i>No description available!!</i></td>\n"; }
32 echo "</tr>\n\n";
33 }
34 }
35  
36 ?>