<%
	'seteaza la produsul cu id
	sub executeUpdate(db,query)
	    dim con
	    err.clear
	    on error resume next
	    set con=server.createObject("adodb.connection")
	    con.open Application("Product")
	    
	    con.execute query
	    
	    con.close
	    set con=nothing
	    response.write err.description
	end sub
	
	
	executeUpdate Application("Product"),"update items set image='" & request("image") & "' where id=" & request("id")
	response.redirect "alterProduct.asp?id=" & request("id")
%>
