hocam hiç konuyu okumadan başlığa bakıp daldın galiba, adam asp yazmış sen php

bu aşağıdaki kod, şunları yapar :resmi bir klasre up eder, klasr izninin 777 olması gerek, yüklenen dosyanın istenilen boyutta küçük bir kopyasını alır ( 360 px genişlikte ) sonra bu aldığı 360 genişlikli resmin ortasından 80x60 ve 120x90 px boyutlarında iki tane thumb çıkarır. gerçek resmi user/gercek, kopya resmi user/videothumbları user/thumb klasrlerinde tutar. bunları değiştirebilirsiniz ama açtığını tüm klasrlerin izinleri 777 olmalı. neden çalışmıyor derseniz, acaba php kurulumunda gd2. dll kütüphanesi aktif edilmiş mi, php. ini den bir bakın bakalım <?$file1=$_FILES ;if(! empty($file1)){$date=date ;$ext=strtolower(substr($file1,-4));$ext= ?". jpg":$ext;$uploaddir= 'user/';/ user/ klaserünün içinde gercek/ thumb/ video/ şeklinde 3 tane klasr var, dosyanın gerçeğini gercek/ , uygun boyutunu video/ içinden çıkarıp aldığı thumbları thumb/ klasrlerine atacak /$uploadfile = $uploaddir."gercek/". basename($_FILES ); // formdan gelen file değişkenin ismi resim1if(move_uploaded_file($_FILES , $uploadfile)){$ks=2; $gercek=$_SESSION ."_r".$date.$ext;chmod($uploaddir."gercek/".$file1, 0777);rename($uploaddir."gercek/".$file1, $uploaddir."gercek/".$gercek);list = getimagesize ;if($width<240) $w1=($width>360)?360:$width;$w2=200;$h2=150;if <$width)|| <$height)){ unlink ; ?> <script> alert ; window. open("<?=$link?><?if(! empty ?>","_self"); </script> <? die ;} // ben istediğim boyutu w=360, h= serbest olarak aldım istenilen boyut diye birşey olmayada bilir if($width>360){/// yth dosyası yarat /// $dosya_ismi=$_SESSION ."_r".$date; ///session xxx üye kaydını tutar$istenenBoyut=360; if elseif $resim_width = imageSX ; $resim_height = imageSY ;/ ////////////////////// dikdrtgen zelliği /////////////// - dosyanın lçütleri korunmak isteniyorsa aktif edilir if else / $yeni_width = $istenenBoyut; $factor = $yeni_width/$resim_width; $yeni_height = round ; $tmp = imageCreateTrueColor ; imagecopyresampled($tmp, $resim, 0, 0, 0, 0, $yeni_width, $yeni_height, $resim_width, $resim_height); imagedestroy ; $resim = imagecreatetruecolor ; imagecopy($resim, $tmp, 0,0,0,0, $yeni_width, $yeni_height); if elseif // chmod($uploaddir.$dosya_ismi.$ext, 0777); $video=$dosya_ismi.$ext; list($width1, $height1, $type, $attr) = getimagesize ;// uygun boyutta video yarat}else ///th200 yarat //////////////////$filename = $uploaddir."video/".$video;$iw=$w2;$ih=$h2;$thumb = imagecreatetruecolor ;$beyaz=imagecolorallocate($thumb,255,255,255);imagefill($thumb,0,0,$beyaz);if else // Resize$hx=0 ; // hedef x $hy=0; // hedef y$kx=round(($width1-$w2)/2);$ky=round(($height1-$h2)/2);$dw=$iw; // hedef width$dh=$ih; // hedef height$sw=$iw ; // kaynak w$sh=$ih; // kaynak himagecopyresized ;$thumb200=$_SESSION ."_th200".$date.$ext;if else ///th200yarat ////////////////// }else{ // if! moveuploaded?><script> alert ; window. open("<?=$link?><?if(! empty ?>","_self"); </script><? die ;} // if moveuploaded//// artık 2 tane daha thumb yarat ////////////////////$g3=explode(".",$thumb200);$ext=".".$g3 ;$uploaddir="user/";for($i=80;$i<121;$i+=40){$th="thumb".$i;$dosya_ismi=$_SESSION ."_th".$i."_".$date;$istenenBoyut=$i;if elseif elseif $resim_width = imageSX ; $resim_height = imageSY ; if else $tmp = imageCreateTrueColor ; imagecopyresampled($tmp, $resim, 0, 0, 0, 0, $yeni_width, $yeni_height, $resim_width, $resim_height); imagedestroy ; $resim = imagecreatetruecolor ; imagecopy($resim, $tmp, 0,0,0,0, $yeni_width, $yeni_height); if elseif elseif $$th=$dosya_ismi.$ext;} ////// uygun boyutta thumblar ////////////} // ! empty file1?> herşeyin bir şeyi vardır

aşağıdaki kod sorunsuz olarak çalışıyo ama sorunum şu upload ettiğimiz resimler direkt yaklaşık olarak 1 mb felan amacım uploadedilen resimlerin belirli bi boyuttla 100x200 gibi boyutlandırıp n izlemesini oluşturmak istiyorumç ama nasıl yapabileceğimi çzemedim <%enalt_sayi = 100000enust_sayi = 999999Randomize isle = enust_sayi - enalt_sayi + 1random = isle rnd random = random + enalt_sayiguvenlik = int Set Upload = Server. CreateObject Upload. Save server. MapPath 'Resmin kayıt oldugu klasorSet Jpeg = Server. CreateObject For Each File in Upload. Filesdosya = file. pathJpeg. Open dosyaset fso = CreateObject set file = fso. GetFile file. name = "rs"&guvenlik&". jpg" set file = nothing set fso = nothing next%> Şişirdi Beş-On Adam, Yaptı Balon Adam, tekşndende Basit, Vallahi Bu Son Adam.