| 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 |
|
|
|
10 |
if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img)) { |
|
|
11 |
echo "<td><img src=\"".$www.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$img."\"></td>\n"; |
|
|
12 |
} else { echo "<td><img src=\"http://www.mlab.cz/Web/PIC/nopicture2.jpg\"></td>\n"; } |
|
|
13 |
|
|
|
14 |
if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html")) { |
|
|
15 |
echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/HTML/".$soubor1.".".$lang.".html\">".$soubor1."</a></td>\n"; |
|
|
16 |
} else { echo "<td>".$soubor."/<b>".$soubor1."</b></td>\n"; } |
|
|
17 |
if (file_exists($path.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf")) { |
|
|
18 |
echo "<td><a href=\"".$www.$folder."/".$HTTP_GET_VARS["file"]."/".$soubor1."/DOC/".$soubor1.".".$lang.".pdf\">PDF</a></td>\n"; |
|
|
19 |
} else { echo "\n<td>-</td>\n"; } |
|
|
20 |
// if (file_exists($path.$folder.'/'.$soubor."/".$soubor1."/".$info)) { |
|
|
21 |
// echo "<td><a href=".$www.$folder.'/'.$soubor."/".$soubor1."/".$info.">XML</a></td>\n"; |
|
|
22 |
// } else { echo "<td>-</td>\n"; } |
|
|
23 |
echo "<td><a href=\"http://www.mlab.cz/WebSVN/listing.php?repname=MLAB&path=/Modules/".$HTTP_GET_VARS["file"]."/".$soubor1."/\">WebSVN</a></td>\n"; |
|
|
24 |
if (file_exists($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1)) { |
|
|
25 |
$fp = FOpen ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1, "r"); |
|
|
26 |
$data = FRead ($fp, FileSize ($path.$folder.'/'.$HTTP_GET_VARS["file"]."/".$soubor1."/".$info1)); |
|
|
27 |
FClose ($fp); |
|
|
28 |
echo "<td>".wordwrap($data, 50, "<br>")."</td>\n"; |
|
|
29 |
} else { echo "\n<td><i>No description available!!</i></td>\n"; } |
|
|
30 |
echo "</tr>\n\n"; |
|
|
31 |
} |
|
|
32 |
} |
|
|
33 |
|
|
|
34 |
?> |