<% Set bilgi = Server.CreateObject("ADODB.RecordSet") sqli = "SELECT * from urun" bilgi.open sqli,conn,3,3 Set Upload = Server.CreateObject("Persits.Upload.1") Upload.SaveVirtual "urunler/" For Each File in Upload.Files If File.ImageType = "UNKNOWN" Then response.redirect "edit.asp?page=22&o=5" Response.End End If dosyaadi = FILE.filename Next if dosyaadi="" then response.redirect "edit.asp?page=22&o=5" bilgi.addnew bilgi("kate")=upload.form("uu1") bilgi("baslik")=upload.form("uu2") bilgi("baslik_eng")=upload.form("uu2i") bilgi("aciklama")=upload.form("uu3") bilgi("aciklama_eng")=upload.form("uu3i") bilgi("fiyat")=upload.form("uu4") bilgi("doviz")=upload.form("uu5") bilgi("ukodu")=upload.form("uu7") bilgi("ukodu_eng")=upload.form("uu7i") if upload.form("uu6")="1" then bilgi("yeni")="1" else bilgi("yeni")="0" end if if dosyaadi<>"" then bilgi("foto")=dosyaadi end if bilgi.update bilgi.close response.redirect "edit.asp?page=21&o=2" %>