Erro de conversão

[apenasestudando 0]

Galera eu tenho que pegar o valor do banco de dados e acrescentar mais 1 olha o código:

 

SQL = "Select * From Controle order by Codigo"	Set objContribuicao = Server.CreateObject("ADODB.Recordset")	objContribuicao.CursorLocation = 3	objContribuicao.Open SQL, objConexao		Do While Not objContribuicao.EOF		var = objContribuicao("refTran")	objContribuicao.MoveNext	Loop	varOK = var+1	Response.Write(varOK)

Só que esta retornando um valor tipo hexadecimal....eu tentei convertei mas não deu certo.....o valor era: 50000000000000000 pela lógica teria que ser 50000000000000001, mas retornou 5E+16 ..

 

alguém pode ajudar?

 

Grato

[birobirosk8 0]

Pra q este loop ae ???Ta sem logica velhinho, você percorre todo o recordset (objContribuicao.MoveNext), mais na verdade só esta pegando o ultimo registro.

[apenasestudando 0]

Pra q este loop ae ???Ta sem logica velhinho, você percorre todo o recordset (objContribuicao.MoveNext), mais na verdade só esta pegando o ultimo registro.

A idéia é essa, eu preciso pegar o último registro e somar 1...valewAlguém..?