Organisatorisches zum Studium am TMB
telo skripta, vstavit v "Script, das in OpenText und auf dem Webserver ausgeführt wird:"






<!-- File List Script  -->
<!-- Author: J. Dinger, DSN Research Group, UKA  -->
<!-- ---------------------------------  -->
<?php
// configuration
// Titel der Liste
$flTitle = "Organisatorisches zum Studium am TMB";
// Verzeichnis das angezeigt werden soll
$flDirStr = "lehre/vorlesungsplan";
// Dateinamen pattern
$flFileNPattern ="*";
// Verzeichnis in dem die FileType Icons liegen
$flIconDirStr = "lehre/fileicons";
?>

<table class="tabelle3" style="table-layout:fixed;" cellspacing="0" cellpadding="0"> <caption align="top"><?php echo $flTitle; ?></caption>
 <tbody>
  <tr>
         <th scope="col" class="sort" style=" width:120px;">Datum</th>
            <th scope="col" class="sort" style="width:18px;">&nbsp;</th>
         <th scope="col" class="sort">Name</th>
        </tr>
 
<?php
$background = "";
$dateformat = 'd. M Y:';
$flDir=opendir($flDirStr);
$flFileList = array();
while ($flFile = readdir ($flDir)){
 if($flFile != "." && $flFile != ".." && (is_file("$flDirStr"."/"."$flFile")) && (!fnmatch(".*",$flFile)) && (!fnmatch("[Tt]humbs.db",$flFile)) && fnmatch($flFileNPattern,$flFile) ) {
 $flFileList[$flFile] = filemtime("$flDirStr"."/"."$flFile");
 }
}//while end
arsort ($flFileList); //Das Array wird nach Datum absteigend sortiert
$flFileList = array_keys ($flFileList);
foreach($flFileList as $flFileName){
 $flLastChange = filemtime("$flDirStr"."/"."$flFileName");
 // file type icon
 $flFileTypeStr = substr($flFileName, -3);
 if (strnatcasecmp($flFileTypeStr,"PDF")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/pdf.png" alt="pdf-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,".PS")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/ps.png" alt="ps-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"ZIP")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/zip.png" alt="zip-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,".gz")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/zip.png" alt="zip-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"DOC")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/doc.png" alt="doc-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"XLS")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/xls.png" alt="xls-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"PPT")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/ppt.png" alt="ppt-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"TXT")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/txt.png" alt="txt-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"GIF")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/gif.png" alt="gif-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"JPG")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/jpg.png" alt="jpg-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"PNG")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/jpg.png" alt="png-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"CER")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/cer.png" alt="cer-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"DER")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/cer.png" alt="cer-Icon" />';
 }elseif (strnatcasecmp($flFileTypeStr,"CRT")==0) {
 $icon = '<img src="/'.$flIconDirStr.'/cer.png" alt="cer-Icon" />';
 }
 
 //create title
 $flFileDetails=pathinfo($flFileName);
 $flFileTitle=basename($flFileName, ".".$flFileDetails["extension"]);
 // file name and link
 $flFile_Link = '<A target="_blank" href="/'.$flDirStr."/".$flFileName.'" >'.$flFileTitle.'</A>';
 // echo filetype("$flDirStr"."/"."$flFileName");
 ?>
    <tr class="<?php echo $background  ?>" onmouseover="this.className='hover'; this.style.cursor='pointer'" onmouseout="this.className='<?php echo $background  ?>'">
 
     <td style="vertical-align:middle; width:70px;"><?php echo(date($dateformat, $flLastChange))?></td>
        <td style="vertical-align:middle; width:26px;"><?php echo $icon?></td>
     <td style="vertical-align:middle;"><?php echo($flFile_Link)?></td>
    </tr>
<?php
 $background == "grey"?$background="":$background="grey";
}//foreach-loop end
closedir($flDir);
?>
 </tbody>
</table>
<!-- -------------------- -->
<!-- File List Script End -->