select e Update Juntos tem como?

[webfuture 0]

Olá galera, estou com uma dúvida no seguinte, tenho um sisteminha que faz uma busca no banco de dados e exibie os resultados na tela, porém perciso que quando o resultado seja exibido semper seja adicionado mais 1 visualização ao campo de dados exibicoes ou visualizacoes do banco de dados, ou seja quando o usuario pesquisar por exemplo por dvd e ele mostrar os resultados ao campo exibicoes seja sempre adicionado automaticamente + 1 se atualizar a pagina +1 e assim por diante...Até,WebFuture

[mkboy 1]

Primeiro você faz um select e verifica se não existe nenhum registro no banco de dados na tabela de visualizações referente ao produto.

 

Se não houver, você faz um insert e cria o registro, neste ponto ele será igual a 0, então você faz um redirect para mesma pagina.

 

Abaixo, no ELSE, você coloca um update somando mais um, assim ele vem do redirecionamento, cujo valor era 0 e soma mais um, ficando igual a 1.

 

E na proxima vez que o produto for visualizado, no seu if ele irá ver que ja existe um registro, então vai pular o insert e ir para o update somar mais um.

 

 

 

O esquema do update para somar é assim:

 

ASP [/tr][tr]

SQL = "UPDATE tb_suatabeladevisualizacoes SET campo = campo + 1 where iddatabelavisualizacoes = " & objrs("iddoproduto")

[/tr]

Entendeu? É isso que você perguntou?Espero ter ajudado! :rolleyes:

[Mário Monteiro 179]

é bem simples faz uma coisa de cada vez..Seleciona, se existir update +1 senão insert = 1

[webfuture 0]

Tentei fazer isto de algumas formas aqui mas nao consegui, meu select esta assim:rs1.Open "select * from tabela WHERE campo like '%" & varpalavra & "%' order by data desc", "DSN=sistema; UID=; PWD=;", 3, 3Gostaria que ao inves de adicionar um novo registro ao banco de dados ele so aumente um no campo exibicoes da tabela.Até,WebFuture

[Mário Monteiro 179]

se for só pra aumentar nem precisa selecionar, bastars1.Open "update tabela SET exibicoes = exibicoes + 1 WHERE campo like '%" & varpalavra & "%'", "DSN=sistema; UID=; PWD=;", 3, 3

[webfuture 0]

Consegui fazer funcionar so nao sei se esta correto, esta da seguinte forma: <%set rs=Server.CreateObject("ADODB.Recordset")rs.Open "select * from tabela WHERE controle = "& Request("controle"), "DSN=teste; UID=; PWD=;", 3, 3do while not rs.EOFcliques = rs("cliques")if (isNull(cliques)) Thencliques = 1Elsecliques = cliques + 1End Ifurl = rs("url")Set Conn= Server.CreateObject("ADODB.Connection")Conn.Open = "teste"SQL = "UPDATE tabela SET cliques = " & cliques & ", data_clique = '" & now() & "' where controle = " & rs("controle")Conn.Execute(SQL)conn.closeset conn = nothingresponse.Redirect(url)rs.MoveNextLooprs.closeSet rs = Nothing%>Nesta pagina o que eu quero fazer é adicionar sempre + 1 ao campo cliques e a data do clique ao campo data_clique, da forma que esta esta funcionando, só não sei se esta certo, sera que da para melhorar isto? Coloquei um Select * mas na verdade vou mudar depois para puxar somente os dados necessarios,. Na outra pagina que eu tenho que tambem depois de um select ele precisa adicionar sempre mais 1 ao campo exibicoes esta quase igual a este script.. Não manjo muito de ASP se alguém puder me dar uma dica para melhorar este script ou falar se esta correto fico grato.Valeu de novo galera !!WebFuture

[Mário Monteiro 179]

se é pra adicionar mais um sempre não precisa selecionar os valores que tem lá...UPDATE tabela SET campo = campo + 1