PHP技术:回帖脱衣服的图片实现

发表于:2007-07-01来源:作者:点击数: 标签:
randimage. php ?php /* +---------------------------------------------------------+ | By Bleakwind http://www.weaverdream.com +---------------------------------------------------------+ */ $dir = "images/";//图片目录,注意是按照名字排序显示的
randimage.php

<?php
/*
+---------------------------------------------------------+
| By Bleakwind http://www.weaverdream.com
+---------------------------------------------------------+
*/
$dir = "images/";//图片目录,注意是按照名字排序显示的...
$imgwidth = 0;//图片宽度,为0则为原始大小
$iforder = 1;//顺序显示还是随机显示,1为顺序显示,0为随机显示
$ifcircle = 0;//顺序显示的时候是否循环播放,1为循环播放,0为不循环
session_start();
if($imgwidth==0){$imgwidth=="";}else{$imgwidth=="width=@#".$imgwidth."@#";}
$handle=opendir($dir);
while ($file_name=readdir($handle)){
if(($file_name!==".")&&($file_name!=="..")){$file_list[]=$file_name; }
}
closedir($handle);
if($iforder==1){
if(isset($_SESSION[@#sess_order@#])){
if($_SESSION[@#sess_order@#]<count($file_list)-1){
$_SESSION[@#sess_order@#]++;
}else{
if($ifcircle == 1){
$_SESSION[@#sess_order@#]=0;
}
}
}else{
$_SESSION[@#sess_order@#]=0;
}
$i=$_SESSION[@#sess_order@#];
}else{
$num=count($file_list)-1;
$i=rand(0,$num);
}
readfile($dir.$file_list[$i]);
?>

  调用

<img src="randimage.php" border="0">

原文转自:http://www.ltesting.net