Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

leozeferino

CONTAR CLICKS

Recommended Posts

Olá.Fiz um banco de dados no access com os campos "codigo" (auto-numeração) e "Texto" (aonde ficam os textos) e "Clicks"(vai contar qtos clicks cada texto vai ter. Quero que quando se clica num determinado link, conte um a mais no campo "clicks". Para isso, pus no link clicado assim: action.asp?cod=3 onde "cod" é o codigo do registro que está o texto determinado.Então, quando vou abrir o banco de dados já na outra página pus assim:<%Ncod = request.queryString("cod")'Criando ConexãoSet Conexao = Server.CreateObject ("ADODB.Connection")Conexao.Open "DBQ=" & Server.MapPath("db1.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 'criando recordset Set rstAtualizar = Server.CreateObject("ADODB.Recordset") rstAtualizar.cursorlocation=2 rstAtualizar.cursortype=1 rstAtualizar.locktype=3 rstAtualizar.open "Update Tabela1 SET Clicks= clicks+1 where Codigo = '" & Ncod & "'", Conexao....%>Porém aparece o seguinte erro:Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério.Acho que tem alguma coisa a ver com os "números que se põe após abrir o recordset.Porém, quando tiro a clausula "where Codigo = '" & Ncod & "', ele funciona normalmente. Não pode por no where um campo de auto-numeração?Espero ajudas.Valews

Compartilhar este post


Link para o post
Compartilhar em outros sites

Seu campo para de codigo é numerico e você esta compárando por uma striingpor isso o erro Tipo de dados imcompatível na expressão de critério."""tente tirar as aspas simplesficando assimwhere Codigo = " & Ncod & "t++

Compartilhar este post


Link para o post
Compartilhar em outros sites

Seu campo para de codigo é numerico e você esta compárando por uma striing

 

por isso o erro

 

Tipo de dados imcompatível na expressão de critério.

 

"""

tente tirar as aspas simples

ficando assim

 

where Codigo = " & Ncod & "

 

t++

bem eh o que o mx disse mas faltou ele finalizar aqui

 

where Codigo = " & Ncod & "

 

ou poe mais uma aspa dupla ou tira a que tem

 

"Update Tabela1 SET Clicks= clicks+1 where Codigo = " & Ncod & ""

 

ou

 

"Update Tabela1 SET Clicks= clicks+1 where Codigo = " & Ncod

 

uma coisa que não entendi é o porque de uma virgula depois disso...

 

isso vai gerar erros....

Compartilhar este post


Link para o post
Compartilhar em outros sites

Podicrer, não tinha pensado nisso.

 

 

Brigadão galera!

 

 

Valewss! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif   http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

beleza então http://forum.imasters.com.br/public/style_emoticons/default/bye1.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.