asp mysql ve persist (yardım)

14-10-2010, 23:34:58

Arkadaşlar pertsis ile resim yüklerken aşağıdaki gibi hata kodu alıyorum.

Alıntı

hata kodu ; Persits.Upload.1 (0x800A0001)

Alıntı

burda formdan gelen degerleri çekiyorum.
<%
aciklama=Request.Form("aciklama")
webadresi=Request.Form("webadresi")
sayi=Request.Form("sayi")
%>

Alıntı

formdan gelen veri
<form action="webtasarim_referans_ekle.asp?islem=ekle"

Alıntı

<%
if request.QueryString("islem")="ekle" then
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 100000000, True
Upload.Save
Path = Server.MapPath("../images")
Upload.CreateDirectory Path, True
randomize
sayi=int(rnd * 123456789) +1
sayi= sayi & ".jpg"
For Each File in Upload.Files
resimyukleme=1
File.SaveAs Path & "\" & sayi
next
aciklama = Upload.form("aciklama")
webadresi = Upload.form("webadresi")
sayi = Upload.form("sayi")

Set kayit=db.execute("insert into webtasarim set `aciklama`='"& aciklama&"',`webadresi`='"& webadresi&"',`sayi`='"& sayi&"', ")

%>

bildiğim kadarıyla upload.form kullanınca request.form kullanmaya gerek yokmuş fakat request.form'u yazmaz isem sayfa hiç açılmıyor

Yardımlarınız için şimdiden teşekkürederim.

14-10-2010, 23:51:48

#2

EuDownload

upload yaptığınız klasore ve alt klasorlere gerekli izinleri verdiğinizden eminmisiniz ?
birde buraya göz at istersen işine yarayacak bilgiler var.

http://translate.google.com.tr/trans...80%26bih%3D765

14-10-2010, 23:58:51

#3

beyogluhosting

yazma izni vermeyi unutmuşum. normalde bütün klasöre everyone veriyorum.

yazma izni verdim fakat aynı hata devam ediyor.

cermiş olduğunuz linkten bir kaçını inceledim benim değindiğim noktaya deyinmiş. Upload.form kullanmamız gerekiyor. Henüz çözüm bulamadım.

15-10-2010, 00:05:44

#4

tolgasen

🌐 𝘀𝗼𝗰𝗶𝗳𝗹𝘆.𝗰𝗼𝗺

Açıklamalara falan upload.form vermişsiniz. Sadece upload formun adına upload form diyin gelen veriyi almak için

15-10-2010, 00:14:22

#5

beyogluhosting

Maleysef hata devam ediyor.
182. satırda hata veriyor o satırda da şu kod var = "Upload.Save"

15-10-2010, 23:08:00

#6

beyogluhosting

yardım edebilecek arkadaş varmı ?

16-10-2010, 13:14:28

#7

denom

form sayfasının bu şekilde olması gerek "enctype"
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="webtasarim_referans_ekle.asp">

bu bölümü ise "?islem=ekle" form içine hidden olarak ekle bu şekilde
<input name="islem" type="hidden" id="islem" value="ekle">
request satırlarını ise upload.form olarak değiştir

<%
aciklama=Upload.Form("aciklama")
webadresi=Upload.Form("webadresi")
sayi=Upload.Form("sayi")

if Upload.Form("islem")="ekle" then
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 100000000, True
Upload.Save
Path = Server.MapPath("../images")
Upload.CreateDirectory Path, True
randomize
sayi=int(rnd * 123456789) +1
sayi= sayi & ".jpg"
For Each File in Upload.Files
resimyukleme=1
File.SaveAs Path & "\" & sayi
next
aciklama = Upload.form("aciklama")
webadresi = Upload.form("webadresi")
sayi = Upload.form("sayi")

Set kayit=db.execute("insert into webtasarim set `aciklama`='"& aciklama&"',`webadresi`='"& webadresi&"',`sayi`='"& sayi&"', ")

%>

16-10-2010, 19:07:28

#8

makrohizmet

Eğer bu hatanın üstünde ya da altında geçersiz sınıf dizesi diyorsa Persits upload bileşeni sunucuda olmadığı zaman bu hatayı verir.

16-10-2010, 19:19:11

#9

beyogluhosting

işlemimi aşagıdaki gibi çözdüm. yardımlarınız için teşekkürler..

formdan gelen veri;

Alıntı

Kayıt eklemek;

Alıntı

<%
if request.QueryString("islem")="ekle" then
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 100000000, True
Upload.Save
Path = Server.MapPath("../images")
Upload.CreateDirectory Path, True
randomize
sayi=int(rnd * 123456789) +1
sayi= sayi & ".jpg"
For Each File in Upload.Files
resimyukleme=1
File.SaveAs Path & "\" & sayi
next
aciklama = Upload.form("aciklama")
webadresi = Upload.form("webadresi")

db.execute("INSERT INTO `webtasarim` (`id`,`webadresi`,`aciklama`,`sayi`) VALUES (NULL,'"&webadresi&"','"&aciklama&"','"&sayi&"')")
%>