Acumular Valor ?

[joao.vanelli]

Olá pessoas

Tenho uma situação no meu site que é a seguinte:

O visitante quer indicar um site, cadastra os dados no DB, quando o moderador acessa a central de administração tem um aviso para ele "tem site para ser validado", pois os sites tem que se enquadrarem em algumas normas certo.

Então na ultima vez que ele validou os sites tem uma variavel que aponta para um determinado valor por ex. 20, dai volta a rotina e na proxima logado do moderador essa variavel estara com 21 por ex.

A questão tenho uma forma de fazer via codigo ou vou ter que gravar em alguma tabela no banco?

* lembro que tenho que fazer assim, pois não tenho como utilizar algum componente de e-mail.

Outra duvida

Como que eu utilizo o RecordCount?

Faço a rotina de sql, execução do sql e dai?

Falow

[Decio]

A questão tenho uma forma de fazer via codigo ou vou ter que gravar em alguma tabela no banco?

Eu faria esta função salvando em banco de dados.Não tem outro jeito melhor.

Para saber a quantidade de registro você pode abrir o recordset assim:

Dim TotalRegistro

Set RS = Server.CreateObject("ADODB.Recordset")

SQL = "select * From Tabela WHERE Campo = 'xxx'"

RS.CursorType = 3

RS.Open SQL,conn,3,3

TotalRegistro=RS.recordcount

[joao.vanelli]

A questão tenho uma forma de fazer via codigo ou vou ter que gravar em alguma tabela no banco?

Eu faria esta função salvando em banco de dados.Não tem outro jeito melhor.

Para saber a quantidade de registro você pode abrir o recordset assim:

Dim TotalRegistro

Set RS = Server.CreateObject("ADODB.Recordset")

SQL = "select * From Tabela WHERE Campo = 'xxx'"

RS.CursorType = 3

RS.Open SQL,conn,3,3

TotalRegistro=RS.recordcount

Eu fiz o que me orientaram mas o retorno esta sendo sempre -1

Só que o meu sql esta assim

sql="SELECT * FROM TBTitulos"

Falow

[Victor]

RecSet.Open "select * from tabela where login = '"&login&"' and senha = '"&senha"'", conn, 3

Qualquer coisa posta ae1!!!

[Decio]

Ola,

Mostra como você esta abrindo a conexão, no exemplo que eu mostrei, a conexão deve ser aberta com o cursor 3, senão não funciona:

RS.CursorType = 3

RS.Open SQL,conn,3,3

[joao.vanelli]

Ola,

  Mostra como você esta abrindo a conexão, no exemplo que eu mostrei, a conexão deve ser aberta com o cursor 3, senão não funciona:

RS.CursorType = 3

RS.Open SQL,conn,3,3

Ops... não estou utilizando o cursor .

Vou colocar e vamos ver.

Obrigado