arkadaşlar yazdığınız mesajları dün gece okudum şimdi göremedim ama sonuçda burası bi tartışma platformu ama bu tartışmaya hakaretler girmemeli. çünkü sırf bu başlıkda 2-3 sorun çözüldü ve bence çok okunacak ve yararlanıcak bir bölüm oldu. Ben kendi adıma persiste resim uploadında ve bazı konularda zayıflığımı sorarak öğreniyorum. benim gibi kaç kişi var sonuçda biri bişey söylediği diğer yanlış anladı vs. zaten silinmiş yada ben göremedim iyide olmuş. ben sizdende aldığım bilgiler ile bir kod yaptım. ama kod şöyle çoklu resim upload. gayette güzel oldu. ama ben burda uzantı yasaklamak istiyorum ama bi türlüde beceremedim örneklerdeki gibi yaptım ama yok beceremedim şimdi sayfalar şöyle. göndereme sayfası bu
Alıntı
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="kaydet.asp">
<table border="0" align="center">
<tr>
<td width="343"><div align="center">
<INPUT NAME="Dosya" TYPE="FILE" id="1" SIZE="40" >
<INPUT NAME="Dosya" TYPE="FILE" id="1" SIZE="40" >
</div></td>
</tr>
<tr>
<td align="center"><INPUT TYPE=SUBMIT VALUE="Upload!"> </td>
</tr>
</table>
</FORM>
Kaydetme sayfası ise
Alıntı
Set Upload = Server.CreateObject("Persits.Upload")
Upload.OverwriteFiles = False
Path = Server.MapPath(".")
Count=UpLoad.SaveVirtual("images")
For i=1 to Count
DosyaAdi=UpLoad.files("Dosya").filename
Set File = Upload.Files(i)
Set jpeg = Server.CreateObject("Persits.Jpeg")
jpeg.Open( File.Path )
jpeg.Width = 200
jpeg.Height =jpeg.OriginalHeight * Jpeg.Width / jpeg.OriginalWidth
Jpeg.Sharpen 1, 150
jpeg.Save Path & "\images\" &File.ExtractFileName
jpeg.Width = 90
jpeg.Height =jpeg.OriginalHeight * Jpeg.Width / jpeg.OriginalWidth
Jpeg.Sharpen 1, 150
jpeg.Save Path & "\images\s_" &File.ExtractFileName
next
Response.Write("tamam")
kaydetme sayfasıda bu olcak burda gelen resimler sorunsuz ekleniyor ama uzantı kontrolunu bi türlü yaptıramadım. bu son 3 harfi alıyorum sınatıyorum ama diğelim txt doyasını genede atıyor hanca küçük hallerini çıkarırken kurala uyup yüklemiyor ama yasak uzantılı dosyayı yüklüyor genede nasıl yapabilirm.