<%
set db = server.createobject("adodb.connection")
db.open("driver={microsoft access driver (*.mdb)}; dbq=" & server.mappath("db/db.mdb"))
set yukle = server.createobject("Persits.Upload")
yukle.overwritefiles = False
count = yukle.savevirtual("img/urun/")
set dosya = yukle.files("resim")
if not dosya is nothing then
dosyaisim=dosya.filename
end if
urun=koru(yukle.form("urun"))
kategori=koru(yukle.form("kategori"))
set rs=server.createobject("adodb.recordset")
rs.open "urun",db,1,3
rs.addnew
rs("kategori")=kategori
rs("isim")=koru(yukle.form("isim"))
rs("bilgi")=cevir(yukle.form("bilgi"))
if dosyaisim<>"" then
rs("resim")=dosyaisim
end if
rs("ozel")=koru(yukle.form("ozel"))
rs.update
rs.close
set rs=nothing
%>
