Ir para conteúdo
Fórum Script Brasil
  • 0

Como Saber quando Chegar Um Registro No Bd?


Ezequiel Batista

Pergunta

9 respostass a esta questão

Posts Recomendados

  • 0

não sei se entendi muito bem...

mas você pode fazer assim

armazena o ultimo cadastro numa variavel de sessão

sei lá.. armazena o valor de algum campo qe seja único, por exemplo o ID, não sei... depende de como tá seu bd!

armazena lá session("ultimocadastro") = RecordSet("campo_unico")

aí quando atualizar, você verifica se tem algum cadastro com ID maior que esse armazenado na variável de sessão

se tiver, você atualiza a variável session("ultimocadastro") com esse valor e mostra que esse é o último cadastro.

entendeu?

Link para o comentário
Compartilhar em outros sites

  • 0

digamos que os cadastros vão pra tabela email e que seus campos sejam

id (autonumeração)

nome (memorando)

email (memorando)

a pessoa se cadastrou... vai gravar um reg no bd... certo

ai quando a página atualizar ...

sql="select top 10 * from email order by id desc"
set rs=conn.execute(sql)
if not rs.eof then
while not rs.eof
response.write rs("nome")&"<br>"
rs.movenext
wend
end if
rs.close
set rs=nothing

Link para o comentário
Compartilhar em outros sites

  • 0

Obrigado Bareta!!

Mas mesmo assim não conseguir registrar que chegou um novo cadastro em meu bd!!!

fiz umas adaptações no seu script pro meu bd e não consegui!!

vou passa meu codigo como estava usando!

eu queria assim quando chegar um novo ele vai executar um som tipo assim "novo cadastro no bd"

segue o codigo!

<%

Dim conexao,constr,rs

set conexao = createobject("AdoDb.connection")

constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("dados.mdb")

conexao.open constr

set rs = conexao.execute("SELECT * FROM cadastros order by codigo desc")

if session("ultimo") < rs("codigo") then response.write "<bgsound src='audios/novo.wav' loop='0'>"& session("ultimo") = rs("codigo")

%>

<meta http-equiv="REFRESH" content="2;URL=novo.asp">

e esse é o novo que fiz com as alterações que você me passou!

<%

Dim conexao,constr,rs

set conexao = createobject("AdoDb.connection")

constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("dados.mdb")

conexao.open constr

set rs = conexao.execute("SELECT top 10 * FROM cadastros order by codigo desc")

%>

<%

if not rs.eof then

while not rs.eof

response.write "<bgsound src='audios/novo.wav' loop='0'>"

rs.movenext

wend

end if

rs.close

%>

<meta http-equiv="REFRESH" content="2;URL=novo.asp">

mas ai com esse executa o audio toda vez que a pagina é atualizada e sem chegar nenhum cadastro novo!!

Editado por Ezequiel Batista
Link para o comentário
Compartilhar em outros sites

  • 0

hauihauihiahihauaia.... você não entendeu.. o que eu disse...

não disse em momento algum que usando select top ia fazer o que tu queria...

o top vai pegar x registros do banco...

agora se quer gerar avisos a kada novo cadastro... o negocio é o seguinte...

adicione um campo chamado alertado (tipo sim/não)...

ai faz um select nessa tabela e busca o que não ta marcado.. e emite o numero de cadastros... depois atualiza a tabela marcando esses campos..

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...