“Hikayeler ikiye ayrılır; Gerçek olanlar, gerçek olması gerekenler.” - J. R. R. Tolkien

Nomly Soru-Cevap'a Katılın

Persits Upload ( Virtual Save )

İlk önce bir form sayfası hazırlayalım ismide form.asp olsun kodları şöyle :

——————————————— Form.asp ———————————————-

<html>

<head>
<meta http-equiv=”Content-Type” content=”text/html; charset=windows-1254″>
<title>Form Sayfası</title>
</head>

<body>

<form method=”POST” enctype=”multipart/form-data” action=”upload.asp”>
<p><input type=”file” name=”File” size=”20″></p>
<p><input type=”submit” value=”Gönder” name=”B1″></p>
</form>

</body>

</html>

———————————————————————————————————–

Şimdi de asıl olayın koptuğu upload.asp’yi yapalım kodlar şöyle :

——————————————— Upload.asp ———————————————-

<%

Set Upload = Server.CreateObject(”Persits.Upload.1″) ‘ Burada persitsi oluşturuyoruz

Upload.OverwriteFiles = False ‘ Dosya Üzerine Yazmasın Demek, Eğer yazmasını istiyosanız False bölümünü True yapın

Upload.SetMaxSize 10485761 ‘ Maksimum dosya büyüklüğü Byte cinsinden

%>
<%

Upload.SaveVirtual “/uploadklasoru/” ‘ Uploadklasoru isimli klasöre dosyanız kaydediliyor, klasor ismini değiştirebiliriniz.

For Each File in Upload.Files ‘ For Döngüsüyle Kontrol Yapacağız

If FILE.IMAGEtype=”UNKNOWN” Then ‘ Eğer dosya resim değilse şunları yap, herşeyi yüklemek isterseniz bu korumayı kaldırabilirsiniz.
File.Delete ‘ Dosyayı sil
response.redirect “Hata.asp” ‘ Sayfayı yönlendir, hata sayfası
end if ‘ Eğer bitişi

If FILE.ext = “.mp3″ OR FILE.ext = “.Mp3″ or FILE.ext = “.mP3″ or FILE.ext = “.MP3″ then ‘ Veya örnek olarak sadece mp3 dosyalarını almak istiyorsanız bu gibi bir döngü oluşturabilirsiniz.

end if

dosyaadi = FILE.filename ‘ Dosya ismini almak için bu kodu kullanabilirsiniz

next

Response.Redirect “Bitti.asp” ‘ En son işlemler bitince başka bir adrese yönlendiriyoruz
%>

———————————————————————————————————

Hata.asp^’yi ve Bitti.asp’yi siz yaparsınız artık.

Bazı Kodlar ve Açıklamaları :

File.filename : Dosya adını gösterir

File.ext : Dosya uzantısını gösterir ( örn: .exe gibi )

File.ImageType : Resim mi değil mi? Eğer değer UNKNOWN ise değil :)

File.Delete : Dosyayı siler

şimdilik bu kadar, aklınıza takılan birşey varsa sorun cevapliyim :)

ÖNEMLİ NOT 1 : Upload yapacağınız klasörün yolunu roottan itibaren verin. Mesela benim klasörümün yeri şu şekilde

Root > Site > Dosyalar > Upload

Upload.asp dosyası hostingin hangi bölümünde olursa olsun klasör ismini şu şekilde verin “/Site/Dosyalar/Upload/”

ÖNEMLİ NOT 2 : Dosyaların upload edileceği klasör yazma izinli olması gerekir aksi halde program hata verecektir. Yazma iznini ise ya hosting yönetim panelinden yapabilirsiniz yada hostingle irtibata geçmeniz gerekir.



Toplam Okunma: 76 | Bugunku Okunma: 3 | En Son Okunma: 02.07.2008 - 23:16

 

 

eXTReMe Tracker