<?xml version="1.0" encoding="utf-8"?>
<?xml-stylesheet type="text/xsl" href="code.xsl" ?>
<dns5.nl>
<voorbeeld>
<title>banner procedure</title>
<verwijzende_link>http://www.dns5.nl/php/automatische-banners.html</verwijzende_link>
<programma_code>
<![CDATA[
<!-- de code begint vanaf hier.

<?php
$debannerdirectory='.';
$mogelijkeextensies=array();
$mogelijkeextensies['gif']='image/gif';
$mogelijkeextensies['jpg']='image/jpeg';
$mogelijkeextensies['jpeg']='image/jpeg';
$mogelijkeextensies['png']='image/png';
$bannertje=null;
if(substr($debannerdirectory,-1) != '/'){$debannerdirectory=$debannerdirectory.'/';}
if(isset($_GET['img'])){$imageInfo=pathinfo($_GET['img']);
if(isset($mogelijkeextensies[strtolower($imageInfo['extension'])]) && file_exists($debannerdirectory.$imageInfo['basename'])){
$bannertje=$debannerdirectory.$imageInfo['basename'];}}
else{$fileList=array();$handle=opendir($debannerdirectory);
while(false!==($file=readdir($handle))){
$file_info=pathinfo($file);
if(isset($mogelijkeextensies[strtolower($file_info['extension'])])){
$fileList[]=$file;}}
closedir($handle);
if(count($fileList)>0){$imageNumber=time() % count($fileList);$bannertje=$debannerdirectory.$fileList[$imageNumber];}}
if($bannertje!=null){$imageInfo=pathinfo($bannertje);
$contentType='Content-type:'.$mogelijkeextensies[$imageInfo['extension']];
header ($contentType);readfile($bannertje);}
else{if(function_exists('imagecreate')){
header ("Content-type: image/png");
$im = @imagecreate(100, 100)
or die ("Oeps, dat gaat fout");
$background_color=imagecolorallocate($im,255,255,255);
$text_color=imagecolorallocate($im,0,0,0);
imagestring ($im,2,5,5,"fout in afbeelding",$text_color);
imagepng($im);
imagedestroy($im);}}
?>

de code is hier geeindigd.
// -->
]]>
</programma_code>
</voorbeeld>
</dns5.nl>
