php图库程序（上传就可以使用）

<HTML><HEAD><TITLE>文件上传</TITLE></HEAD><BODY><FORM ENCTYPE="multipart/form-data" NAME=MyForm METHOD="POST">您的目录：<input type="text" name="UserName" size="5"><TABLE><TR><TD>文件上传</TD><TD><INPUT NAME="MyFile" TYPE="File"></TD></TR><TR><TD COLSPAN="2"><INPUT NAME="submit" VALUE="上传" TYPE="submit">

<?

if(isset($submit)){

if($MyFile != "none"){$v=@opendir("$UserName");

if (!$v){MakeUserDir($UserName);$v=opendir("$UserName");}

$up=copy($MyFile,"$UserName/$MyFile_name");

if($up==1){

print("文件上传成功!<br>这是您的酷照:(喔,真棒!点击可以放大的呦!)<br><a href=\"$UserName/$MyFile_name\" target=\"_blank\" ><img src=\"$UserName/mini/$MyFile_name\"></a>");

$srcFile=$MyFile_name;$dstFile=$MyFile_name;

MakeAMiniPic($srcFile,$dstFile,$UserName);

}

else { print("文件上传失败。");}

@unlink($MyFile);closedir($v);}

else {print("你没有上传任何文件。");}}

function MakeUserDir($UserName){

global $UserName;

mkdir("$UserName", 0777);

$chomd=chmod($UserName,0777);$v=opendir("$UserName");echo "\$v=$v";echo "\$chomd=$chomd";

mkdir("$UserName/mini", 0777);}//建立用户目录

function MakeAMiniPic($srcFile,$dstFile,$UserName){

$srcFile="$UserName/$srcFile";

$dstFile="$UserName/mini/$dstFile";

$data=GetImageSize($srcFile);

switch ($data[2]) {

case 1:

$im = ImageCreateFromGIF($srcFile); break;

case 2:

$im = @imagecreatefromjpeg($srcFile); break;/*此处遇到一个问题，希望那位哥哥能帮忙解答，上传的图片有时候会被生成黑色的一张小图，gif的没有问题，小弟谢谢了，：D */

case 3:

$im = ImageCreateFromPNG($srcFile); break; }//整理成为最合适的大小

$srcW=@ImageSX($im); $srcH=@ImageSY($im); $dstX=0; $dstY=0;

if ($data[0]>$data[1]){

$data[1]=100*$data[1]/$data[0];

$data[0]=100;}else{$data[0]=100*$data[0]/$data[1];$data[1]=100;}//整理成为最合适的大小

$ni=ImageCreate($data[0],$data[1]);

@ImageCopyResized($ni,$im,$dstX,$dstY,0,0,$data[0],$data[1],$srcW,$srcH);

@ImageJpeg($ni,$dstFile); @imagedestroy($im); imagedestroy($ni); }

?></TD></TR></TABLE></form></BODY></HTML>
<

分类广告

推荐文章

热门文章

php图库程序（上传就可以使用）