bileşen tamam ama yınede hata veriyor sayfa gountulenemıyo
<%
'On Error Resume Next
Server.ScriptTimeout = 240

Set Upload = Server.CreateObject("Persits.Upload")
Set Jpeg = Server.CreateObject("Persits.Jpeg")

Upload.CodePage = 1254
Upload.SetMaxSize 1024000, True
Upload.OverWriteFiles = False
Upload.Save Server.MapPath("images")

hata = 0

For Each File in Upload.Files
If File.ImageType <> "JPG" or File.Size > 256000 Then
File.Delete
hata = hata + 1
Else
Jpeg.Open File.Path
Jpeg.Width = 300
Jpeg.Height = 300
Jpeg.Save Server.MapPath("images") & "\onizleme_" & File.FileName
End if
Next

if Err.Number = 8 Then
hata = hata + 1
End if

hata = Cstr(hata)

cb_oncelikli_listeleme = Session("oncelikli")
cb_vitrin = Session("vitrin")
cb_flash_ilanlar = Session("flash")


if cb_oncelikli_listeleme = "True" or cb_vitrin = "True" or cb_flash_ilanlar = "True" Then
adres = "default.asp?icerik=16&cbol="&cb_oncelikli_listele me&"&cbv="&cb_vitrin&"&cbfi="&cb_flash_ilanlar&"&h ata="& hata
Else
adres = "default.asp?icerik=2&hata="& hata
End if

strSQL = "SELECT * FROM ilanlar WHERE ekleyen ="& Session("OnlineUyeId") &" ORDER BY id DESC"
Set ks1 = baglanti.Execute(strSQL)

For Each File in Upload.Files
if File.ImageType = "JPG" And File.Size <= 256000 Then
strSQL = "INSERT INTO ilan_resimleri (ilan_id, resim) VALUES ('"&CSTR(ks1("id"))&"', '"&File.FileName&"')"
baglanti.Execute(strSQL)
End if
Next

ks1.Close
Set ks1 = Nothing
Set Upload = Nothing
Set Jpeg = Nothing
%>




re_ilan_kaydet.asp


<form action="re_ilan_kaydet.asp" method="post" enctype="multipart/form-data">
<tr><td>
<table width="370" align="center" cellpadding="0" cellspacing="0" class="tborder">
<tr>
<td><table width="370" cellspacing="3">
<tr>
<td height="18" colspan="3" align="center" bgcolor="#D5D5FF"><strong class="baslik">Resim Ekle</strong> </td>
</tr>
<tr>
<td width="54">Resim1</td>
<td width="1">:</td>
<td width="295"><input name="resim1" type="file" id="resim1" class="input"></td>
</tr>
<tr>
<td>Resim2</td>
<td>:</td>
<td><input name="resim2" type="file" id="resim2" class="input"></td>
</tr>
<tr>
<td>Resim3</td>
<td>:</td>
<td><input name="resim3" type="file" id="resim3" class="input"></td>
</tr>
<tr>
<td>Resim4</td>
<td>:</td>
<td><input name="resim4" type="file" id="resim4" class="input"></td>
</tr>
</table>