<%
  if session("permissaomaxima")="zero" and session("permissaoferramenta")<>7 then
  
    ' ---------------------------------------------- Permissão - Verifica se a ferramenta está ativa para o usuário que está tentando acessar.
	' Aviso: Nesse select no fer_codigo colocar o código da ferramenta em questão.
    validapaginasql = "select rel.*, fer.* from tab_permissaorelacionamento rel inner join tab_ferramenta fer on fer.fer_codigo=rel.rel_ferramentacodigo where rel.rel_status=0 and fer.fer_contrato<>0 and fer.fer_codigo=7 and rel.rel_usuariocodigo="&session("codigo")
    set validapagina = objconexao.execute(validapaginasql)

      if validapagina.eof then
      response.redirect("logout.asp")
      elseif validapagina("fer_codigo")=7 then 'Onde está 1 deve ser por o número da ferramenta no Sistema (isso você encontra em Configurações / Adicionar Ferramenta / Codigo
	  session("permissaoferramenta")=empty 
	  session("permissaoferramenta")=7
	  response.addheader "refresh","0"
	  else
	  response.redirect("logout.asp")
	  end if
	  
	validapagina.close
	set validapagina=nothing

  elseif (session("permissaomaxima")="zero" and session("permissaoferramenta")=7) or session("permissaomaxima")="admgeral" then
%>

<!--#include file="conectabd.asp" -->

<%
idp = request("idp")
ref = request("ref")
foto1 = request("foto1")
foto2 = request("foto2")
foto3 = request("foto3")
foto4 = request("foto4")
foto5 = request("foto5")
foto6 = request("foto6")
foto7 = request("foto7")
foto8 = request("foto8")
foto9 = request("foto9")
foto10 = request("foto10")
legenda1 = request("legenda1")
legenda2 = request("legenda2")
legenda3 = request("legenda3")
legenda4 = request("legenda4")
legenda5 = request("legenda5")
legenda6 = request("legenda6")
legenda7 = request("legenda7")
legenda8 = request("legenda8")
legenda9 = request("legenda9")
legenda10 = request("legenda10")
codigoproduto1 = request("codigoproduto1")
codigoproduto2 = request("codigoproduto2")
codigoproduto3 = request("codigoproduto3")
codigoproduto4 = request("codigoproduto4")
codigoproduto5 = request("codigoproduto5")
codigoproduto6 = request("codigoproduto6")
codigoproduto7 = request("codigoproduto7")
codigoproduto8 = request("codigoproduto8")
codigoproduto9 = request("codigoproduto9")
codigoproduto10 = request("codigoproduto10")
opiniao = request("opiniao")
opniao2 = request("opniao2")
opniao3 = request("opniao3")
opniao4 = request("opniao4")
opniao5 = request("opniao5")
opniao6 = request("opniao6")
opniao7 = request("opniao7")
opniao8 = request("opniao8")
opniao9 = request("opniao9")
opiniao0 = request("opiniao0")
principal1 = request("principal1")
	if principal1="on" then
		principal1=1
	else
		principal1=0
	end if
principal2 = request("principal2")
	if principal2="on" then
		principal2=1
	else
		principal2=0
	end if
principal3 = request("principal3")
	if principal1="on" then
		principal3=1
	else
		principal3=0
	end if
principal4 = request("principal4")
	if principal1="on" then
		principal4=1
	else
		principal4=0
	end if
principal5 = request("principal5")
	if principal5="on" then
		principal5=1
	else
		principal5=0
	end if
principal6 = request("principal6")
	if principal6="on" then
		principal6=1
	else
		principal6=0
	end if
principal7 = request("principal7")
	if principal7="on" then
		principal7=1
	else
		principal7=0
	end if
principal8 = request("principal8")
	if principal8="on" then
		principal8=1
	else
		principal8=0
	end if
principal9 = request("principal9")
	if principal9="on" then
		principal9=1
	else
		principal9=0
	end if
principal10 = request("principal10")
	if principal10="on" then
		principal10=1
	else
		principal10=0
	end if
	
	
oculto1 = request("oculto1")
	if oculto1="on" then
		oculto1=1
	else
		oculto1=0
	end if
oculto2 = request("oculto2")
	if oculto2="on" then
		oculto2=1
	else
		oculto2=0
	end if
oculto3 = request("oculto3")
	if oculto1="on" then
		oculto3=1
	else
		oculto3=0
	end if
oculto4 = request("oculto4")
	if oculto1="on" then
		oculto4=1
	else
		oculto4=0
	end if
oculto5 = request("oculto5")
	if oculto5="on" then
		oculto5=1
	else
		oculto5=0
	end if
oculto6 = request("oculto6")
	if oculto6="on" then
		oculto6=1
	else
		oculto6=0
	end if
oculto7 = request("oculto7")
	if oculto7="on" then
		oculto7=1
	else
		oculto7=0
	end if
oculto8 = request("oculto8")
	if oculto8="on" then
		oculto8=1
	else
		oculto8=0
	end if
oculto9 = request("oculto9")
	if oculto9="on" then
		oculto9=1
	else
		oculto9=0
	end if
oculto10 = request("oculto10")
	if oculto10="on" then
		oculto10=1
	else
		oculto10=0
	end if

if principal1=1 or principal2=1 or principal3=1 or principal4=1 or principal5=1 or principal6=1 or principal7=1 or principal8=1 or principal9=1 or principal10=1 then
	zera_principal_sql = "update tab_c_arvore set a_principal=0 where a_cod_pai="&idp
	set zera_principal = objconexao.execute(zera_principal_sql)
end if

if foto1<>0 then
	um_sql = "update tab_c_arvore set a_legenda='"&legenda1&"', a_novocod='"&codigoproduto1&"', a_descricao_nova='"&opiniao&"', a_cod_pai="&idp&", a_oculto="&oculto1&", a_principal="&principal1&" where a_codigo="&foto1
	set um = objconexao.execute(um_sql)

	if request("girar1")=1 or request("girar1")=2 then
		'seleciona o arquivo em questao
		seleciona1_sql = "select * from tab_c_arvore where a_codigo="&foto1
		set seleciona1 = objconexao.execute(seleciona1_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem1 = server.mappath("../../img/galeria_fotos/"&seleciona1("a_arquivo"))
		jpg.open imagem1
		if request("girar1") = 1 then jpg.RotateL
		if request("girar1") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem1
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem1_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona1("a_arquivo"))
		jpg_mini.open imagem1_mini
		if request("girar1") = 1 then jpg_mini.RotateL
		if request("girar1") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem1_mini
		set jpg_mini = nothing
	end if

end if

if foto2<>0 then
	dois_sql = "update tab_c_arvore set a_legenda='"&legenda2&"', a_novocod='"&codigoproduto2&"', a_descricao_nova='"&opniao2&"', a_cod_pai="&idp&", a_oculto="&oculto2&", a_principal="&principal2&" where a_codigo="&foto2
	set dois = objconexao.execute(dois_sql)

	if request("girar2")=1 or request("girar2")=2 then
		'seleciona o arquivo em questao
		seleciona2_sql = "select * from tab_c_arvore where a_codigo="&foto2
		set seleciona2 = objconexao.execute(seleciona2_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem2 = server.mappath("../../img/galeria_fotos/"&seleciona2("a_arquivo"))
		jpg.open imagem2
		if request("girar2") = 1 then jpg.RotateL
		if request("girar2") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem2
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem2_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona2("a_arquivo"))
		jpg_mini.open imagem2_mini
		if request("girar2") = 1 then jpg_mini.RotateL
		if request("girar2") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem2_mini
		set jpg_mini = nothing
	end if

end if

if foto3<>0 then
	tres_sql = "update tab_c_arvore set a_legenda='"&legenda3&"', a_novocod='"&codigoproduto3&"', a_descricao_nova='"&opniao3&"', a_cod_pai="&idp&", a_oculto="&oculto3&", a_principal="&principal3&" where a_codigo="&foto3
	set tres = objconexao.execute(tres_sql)

	if request("girar3")=1 or request("girar3")=2 then
		'seleciona o arquivo em questao
		seleciona3_sql = "select * from tab_c_arvore where a_codigo="&foto3
		set seleciona3 = objconexao.execute(seleciona3_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem3 = server.mappath("../../img/galeria_fotos/"&seleciona3("a_arquivo"))
		jpg.open imagem3
		if request("girar3") = 1 then jpg.RotateL
		if request("girar3") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem3
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem3_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona3("a_arquivo"))
		jpg_mini.open imagem3_mini
		if request("girar3") = 1 then jpg_mini.RotateL
		if request("girar3") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem3_mini
		set jpg_mini = nothing
	end if

end if

if foto4<>0 then
	quatro_sql = "update tab_c_arvore set a_legenda='"&legenda4&"', a_novocod='"&codigoproduto4&"', a_descricao_nova='"&opniao4&"', a_cod_pai="&idp&", a_oculto="&oculto4&", a_principal="&principal4&" where a_codigo="&foto4
	set quatro = objconexao.execute(quatro_sql)

	if request("girar4")=1 or request("girar4")=2 then
		'seleciona o arquivo em questao
		seleciona4_sql = "select * from tab_c_arvore where a_codigo="&foto4
		set seleciona4 = objconexao.execute(seleciona4_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem4 = server.mappath("../../img/galeria_fotos/"&seleciona4("a_arquivo"))
		jpg.open imagem4
		if request("girar4") = 1 then jpg.RotateL
		if request("girar4") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem4
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem4_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona4("a_arquivo"))
		jpg_mini.open imagem4_mini
		if request("girar4") = 1 then jpg_mini.RotateL
		if request("girar4") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem4_mini
		set jpg_mini = nothing
	end if

end if

if foto5<>0 then
	cinco_sql = "update tab_c_arvore set a_legenda='"&legenda5&"', a_novocod='"&codigoproduto5&"', a_descricao_nova='"&opniao5&"', a_cod_pai="&idp&", a_oculto="&oculto5&", a_principal="&principal5&" where a_codigo="&foto5
	set cinco = objconexao.execute(cinco_sql)

	if request("girar5")=1 or request("girar5")=2 then
		'seleciona o arquivo em questao
		seleciona5_sql = "select * from tab_c_arvore where a_codigo="&foto5
		set seleciona5 = objconexao.execute(seleciona5_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem5 = server.mappath("../../img/galeria_fotos/"&seleciona5("a_arquivo"))
		jpg.open imagem5
		if request("girar5") = 1 then jpg.RotateL
		if request("girar5") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem5
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem5_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona5("a_arquivo"))
		jpg_mini.open imagem5_mini
		if request("girar5") = 1 then jpg_mini.RotateL
		if request("girar5") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem5_mini
		set jpg_mini = nothing
	end if

end if


if foto6<>0 then
	seis_sql = "update tab_c_arvore set a_legenda='"&legenda6&"', a_novocod='"&codigoproduto6&"', a_descricao_nova='"&opniao6&"', a_cod_pai="&idp&", a_oculto="&oculto6&", a_principal="&principal6&" where a_codigo="&foto6
	set seis = objconexao.execute(seis_sql)

	if request("girar6")=1 or request("girar6")=2 then
		'seleciona o arquivo em questao
		seleciona6_sql = "select * from tab_c_arvore where a_codigo="&foto6
		set seleciona6 = objconexao.execute(seleciona6_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem6 = server.mappath("../../img/galeria_fotos/"&seleciona6("a_arquivo"))
		jpg.open imagem6
		if request("girar6") = 1 then jpg.RotateL
		if request("girar6") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem6
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem6_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona6("a_arquivo"))
		jpg_mini.open imagem6_mini
		if request("girar6") = 1 then jpg_mini.RotateL
		if request("girar6") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem6_mini
		set jpg_mini = nothing
	end if

end if


if foto7<>0 then
	sete_sql = "update tab_c_arvore set a_legenda='"&legenda7&"', a_novocod='"&codigoproduto7&"', a_descricao_nova='"&opniao7&"', a_cod_pai="&idp&", a_oculto="&oculto7&", a_principal="&principal7&" where a_codigo="&foto7
	set sete = objconexao.execute(sete_sql)

	if request("girar7")=1 or request("girar7")=2 then
		'seleciona o arquivo em questao
		seleciona7_sql = "select * from tab_c_arvore where a_codigo="&foto7
		set seleciona7 = objconexao.execute(seleciona7_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem7 = server.mappath("../../img/galeria_fotos/"&seleciona7("a_arquivo"))
		jpg.open imagem7
		if request("girar7") = 1 then jpg.RotateL
		if request("girar7") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem7
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem7_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona7("a_arquivo"))
		jpg_mini.open imagem7_mini
		if request("girar7") = 1 then jpg_mini.RotateL
		if request("girar7") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem7_mini
		set jpg_mini = nothing
	end if

end if


if foto8<>0 then
	oito_sql = "update tab_c_arvore set a_legenda='"&legenda8&"', a_novocod='"&codigoproduto8&"', a_descricao_nova='"&opniao8&"', a_cod_pai="&idp&", a_oculto="&oculto8&", a_principal="&principal8&" where a_codigo="&foto8
	set oito = objconexao.execute(oito_sql)

	if request("girar8")=1 or request("girar8")=2 then
		'seleciona o arquivo em questao
		seleciona8_sql = "select * from tab_c_arvore where a_codigo="&foto8
		set seleciona8 = objconexao.execute(seleciona8_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem8 = server.mappath("../../img/galeria_fotos/"&seleciona8("a_arquivo"))
		jpg.open imagem8
		if request("girar8") = 1 then jpg.RotateL
		if request("girar8") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem8
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem8_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona8("a_arquivo"))
		jpg_mini.open imagem8_mini
		if request("girar8") = 1 then jpg_mini.RotateL
		if request("girar8") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem8_mini
		set jpg_mini = nothing
	end if

end if


if foto9<>0 then
	nove_sql = "update tab_c_arvore set a_legenda='"&legenda9&"', a_novocod='"&codigoproduto9&"', a_descricao_nova='"&opniao9&"', a_cod_pai="&idp&", a_oculto="&oculto9&", a_principal="&principal9&" where a_codigo="&foto9
	set nove = objconexao.execute(nove_sql)

	if request("girar9")=1 or request("girar9")=2 then
		'seleciona o arquivo em questao
		seleciona9_sql = "select * from tab_c_arvore where a_codigo="&foto9
		set seleciona9 = objconexao.execute(seleciona9_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem9 = server.mappath("../../img/galeria_fotos/"&seleciona9("a_arquivo"))
		jpg.open imagem9
		if request("girar9") = 1 then jpg.RotateL
		if request("girar9") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem9
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem9_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona9("a_arquivo"))
		jpg_mini.open imagem9_mini
		if request("girar9") = 1 then jpg_mini.RotateL
		if request("girar9") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem9_mini
		set jpg_mini = nothing
	end if

end if


if foto10<>0 then
	dez_sql = "update tab_c_arvore set a_legenda='"&legenda10&"', a_novocod='"&codigoproduto10&"', a_descricao_nova='"&opiniao0&"', a_cod_pai="&idp&", a_oculto="&oculto10&", a_principal="&principal10&" where a_codigo="&foto10
	set dez = objconexao.execute(dez_sql)

	if request("girar10")=1 or request("girar10")=2 then
		'seleciona o arquivo em questao
		seleciona10_sql = "select * from tab_c_arvore where a_codigo="&foto10
		set seleciona10 = objconexao.execute(seleciona10_sql)
		'gira a foto original
		set jpg = server.createobject("persits.jpeg")
		imagem10 = server.mappath("../../img/galeria_fotos/"&seleciona10("a_arquivo"))
		jpg.open imagem10
		if request("girar10") = 1 then jpg.RotateL
		if request("girar10") = 2 then jpg.RotateR
		jpg.quality = 85
		jpg.save imagem10
		set jpg = nothing
		'gira a miniatura da foto
		set jpg_mini = server.createobject("persits.jpeg")
		imagem10_mini = server.mappath("../../img/galeria_fotos/mini_"&seleciona10("a_arquivo"))
		jpg_mini.open imagem10_mini
		if request("girar10") = 1 then jpg_mini.RotateL
		if request("girar10") = 2 then jpg_mini.RotateR
		jpg_mini.quality = 85
		jpg_mini.save imagem10_mini
		set jpg_mini = nothing
	end if

end if


response.redirect "../default2.asp?galerias=adicionar_foto&idp="&idp&"&ref="&ref
%>

<%
  else
      response.redirect("logout.asp")
end if
%>