Incremetando de 1 em 1

Estou tentando fazer o controle de usuário, ao tentar logar três vezes ele bloqueia o usuário.

Porém o sistema está incrementando de dois em dois, segue abaixo o trexo q adiciona:

tentativas = Session("tentativas") if(tentativas = "") then tentativas = 1 end ifif(password = senha)then Response.Redirect("...") Session("tentativas") = 0else tentativas = tentativas + Cint(1) Session("tentativas") = tentativasAlguem saber dizer pq o sistema está incrementando de duas em duas tentativas.