<!--#include file="view.asp"-->
<%
id=Request.form("id")
marka=sqlkont(request.form("marka"))
model=sqlkont(request.form("model"))
fiyat_1_3=sqlkont(request.form("fiyat_1_3"))
fiyat_3_15=sqlkont(request.form("fiyat_3_15"))
fiyat_15=sqlkont(request.form("fiyat_15"))
yakit=sqlkont(request.form("yakit"))
birim=sqlkont(request.form("birim"))
ozellik=sqlkont(request.form("ozellik"))
video=sqlkont(request.form("video"))




if id="" then
	bag.execute("insert into urun(marka,model,fiyat_1_3,fiyat_3_15,fiyat_15,yakit,birim,ozellik,video) values("& marka &","& model &",'"& fiyat_1_3 &"','"& fiyat_3_15 &"','"& fiyat_15 &"','"& yakit &"','"& birim &"','"& ozellik &"','"& video &"')")
	set urn=bag.execute("select*from urun where arac='"& arac & "' order by id desc")
	
else
	bag.execute("update urun set marka="& marka &", model="& model &", fiyat_1_3='"& fiyat_1_3 &"', fiyat_3_15='"& fiyat_3_15 &"', fiyat_15='"& fiyat_15 &"', yakit='"& yakit &"', birim='"& birim &"', ozellik='"& ozellik &"', video='"&video&"' where id="&id)
end if

for each alan in request.form
	if left(alan,5)="foto_" then
		if not request.Form(alan)="" then
			if request.Form("def")=alan then
				def=",def=true"
			else
				def=",def=false"
			end if
			bag.execute("update resim set uid='"& id &"', resim='"& sqlkont(request.form(alan)) &"'"& def &" where id="& mid(alan,6) )
		else
			bag.execute("delete from resim where id="& mid(alan,6) )
		end if
	elseif left(alan,4)="foto" then
	   if not request.Form(alan)="" then
		if request.Form("def")=alan then
				def1=",def"
				def2=",true"
			else
				def1=""
				def2=""
			end if
		Set resimekle = Server.CreateObject("ADODB.Recordset") 
SQL = "Select * From resim" 
resimekle.Open SQL,bag,1,3      
         
resimekle.AddNew 
resimekle("uid")    =    Request.form("id")         
resimekle("resim")    =    sqlkont(request.form(alan))     

if request.Form("def")=alan then 

resimekle("def")    =    True 
Else 
resimekle("def")    =    False 

End If 

resimekle.Update 
resimekle.Close   
			end if
	elseif left(alan,3)="oz_" then
		if not request.Form(alan)="" then
			bag.execute("update ozellik set urun='"& id &"', ozellik='"& sqlkont(request.form(alan)) &"', icerik='"& sqlkont(request.form("ic_" & mid(alan,4))) &"' where id="& mid(alan,4) )
		else
			bag.execute("delete from ozellik where id="& mid(alan,4) )
		end if
	elseif left(alan,4)="_oz_" then
	   if not request.Form(alan)="" then
			bag.execute("insert into ozellik(urun,ozellik,icerik) values("& id &",'"& sqlkont(request.form(alan))&"','"& sqlkont(request.form("_ic_" & mid(alan,5))) &"')")
	   end if
	end if
next

response.Redirect("urun.asp")
%>