缩略图生成的php程序[转自奥索]

程序|缩略图

客户端上载的页面：
--------------------          upload.htm        ---------------------
<form enctype="multipart/form-data"
method="post" action="upload.php">
<input type="hidden" name="MAX_FILE_SIZE" value="10240000000">请选择或输入上传文件名:<input name="upfile" type="file">
<input type="submit" value="开始上传">

---------------------       upload.php        -------------------
<?
if(empty($upfile)){
print("No file was transfered!\n无文件上传!");
    exit;
}
$image_path=$upfile;
@$image_info=getimagesize($image_path);
if($image_info[2]==2)
{@$image2=imagecreatefromjpeg($image_path);
}
else if($image_info[2]==1){
@$image2=imagecreatefromgif($image_path);
}
else{print("不接受的图片！");exit;}
if(empty($image2)){print("系统错误，请重试");exit;}
$image2_x=imagesx($image2);
$image2_y=imagesy($image2);
if($image2_x==$image2_y){
$x=150;
$y=0;
}
else if($image2_x>$image2_y){
$x=150;
$y=intval(150*$image2_y/$image2_x);
}
else{
$y=150;
$x=intval(150*$image2_x/$image2_y);
}
$image1=imagecreate($x,$y);

imagecopyresized($image1,$image2,0,0,0,0,$x,$y,$image2_x,$image2_y);
imagegif($image1,"new.gif");
?>

-------------------------     说明       ----------------------
本代码特点在于将所有难看的warning转换为可以自已设计输出的出错提示，@作用在于抑制出借信息。此代码默认的是将图片转换为长宽不超过150像素的缩略图，并保存为new.gif  。使用时可以随意修改。
本代码由turtlevan( turtlevan@263.net )制作，您可以任意使用与修改，也可在网络上任意传播，但不得剽窃为已有。