Erro ao inserir e atualizar o Voto em outra coluna

Boa noite F.I.

Não sei aonde estou errando para inserir e atualizar qdo necessário poderiam me ajudar aonde estou errando?

Bom seria assim... se não existir registro na tabela auxiliar ele da o insert existindo ele da o update... bom estou qse lá... só que ele está apenas dando inser e update da coluna countSim presisava que ele fizesse a msm coisa na coluna countNao.

Obrigado!

Envia

 <form id="RegistraVoto" name="RegistraVoto" method="post" action="RegistraVoto.asp">
 <input name="url" type="hidden" id="url" value="http://www.xxxxxxxxx.com.br<%=Request.ServerVariables("SCRIPT_NAME")%>?id=<%=BRid%>" size="100" maxlength="11" />
 <input name="id_pagina" type="hidden" id="id_pagina" value="<%=BRid%>" size="2" maxlength="11" />
 <input name="tabela" type="hidden" id="tabela" value="<%=BRtabela%>" />
 <%if BRip=Request.ServerVariables("REMOTE_ADDR") then%>
 <img src="img/VotaSim-oFF.png" width="13" height="14" />
 <%else%><input type="image" src="img/VotaSim-oN.png" border="0" nome="votoSim" id="votoSim" value="Sim"><%end if%></span> 
 <%if BRip=Request.ServerVariables("REMOTE_ADDR") then%>
 <img src="img/VotaNao-oFF.png" width="13" height="14" />
 <%else%><input type="image" src="img/VotaNao-oN.png" border="0" nome="votoNao" id="votoNao" value="Nao"><%end if%></span>
 </form>

Grava

<%
BRdata_hora = date()
data_hora_ano = datepart("yyyy",date)
data_hora_mes = datepart("m",date)
if len(data_hora_mes) = 1 then
data_hora_mes = "0"&data_hora_mes
end if
data_hora_dia = datepart("d",date)
if len(data_hora_dia) = 1 then
data_hora_dia = "0"&data_hora_dia
end if
BRdata_hora = data_hora_ano&"/"&data_hora_mes&"/"&data_hora_dia
BRdata_hora = BRdata_hora &" : "&time

BRcodigo = FormatStr(trim(request("codigoVota")))
BRid_pagina = FormatStr(trim(request("id_pagina")))
BRtabela = FormatStr(trim(request("tabela")))
BRvotoSim = FormatStr(trim(request("votoSim")))
BRvotoNao = FormatStr(trim(request("votoNao")))
BRurl = FormatStr(trim(request("url")))

set vota = server.CreateObject("adodb.RecordSet")
sql_vota = "select * from tabela where id_pagina='"&BRid_pagina&"' and tabela='"&BRtabela&"'"
set vota = conn.execute(sql_vota)

if not vota.eof then
BRvotoSimV = vota("countSim")
BRvotoNaoV = vota("countNao")
end if

if BRvotoSimV = "" or request("votoSim") = "Sim" then
BRvotoSimV = 0
sql_inserT = "insert into tabela(id_pagina,tabela,countSim,DataTime,ip) values ('"&BRid_pagina&"','"&BRtabela&"','"&BRvotoSimV+1&"','"&BRdata_hora&"','"&Request.ServerVariables("REMOTE_ADDR")&"')"
set inserT = conn.Execute(sql_inserT)

response.Redirect (BRurl)

else

Set BRupdateSim = conn.Execute("UPDATE tabela SET countSim='"&BRvotoSimV+1&"' WHERE id_pagina="&BRid_pagina&" and tabela='"&BRtabela&"'")
Set BRupdateSim = nothing

response.Redirect (BRurl)

end if

if BRvotoNaoV = "" or request("votoNao") = "Nao" then
BRvotoNaoV = 0
sql_inserTNao = "insert into tabela (id_pagina,tabela,countNao,DataTime,ip) values ('"&BRid_pagina&"','"&BRtabela&"','"&BRvotoNaoV+1&"','"&BRdata_hora&"','"&Request.ServerVariables("REMOTE_ADDR")&"')"
set inserTNao = conn.Execute(sql_inserTNao)

response.Redirect (BRurl)

else

Set BRupdateNao = conn.Execute("UPDATE tabela SET countNao='"&BRvotoNaoV+1&"' WHERE id_pagina="&BRid_pagina&" and tabela='"&BRtabela&"'")
Set BRupdateNao = nothing

response.Redirect (BRurl)

end if