retorno de consulta em popup message

[hunger 0]

fala pessoal!!

 

seguinte:

 

criei uma página onde pode ser visualizada a lista de visitas agendadas em seu consultorio. para facilitar, a idéia é que, qdo entrar na página, ele já liste as visitas do dia. fora isso há um form para ele escolher outras datas e consultar.

 

ate ae td bem, td isso está funcionando.

 

o unico problema é no retorno da consulta. pq tp, qdo ele faz a verificação se há visitas para a data de hoje (por exemplo) e nao tem, ele retorna apenas a mensagem "nenhum registro encontrado", só q em uma página sozinho.....entende? Tp, ele some com td o que tem na pagina e apenas escreve isso. o problema é q assim, toda vez q no dia atual nao tiver visitas agendadas, a pessoa nao conseguirá nem sequer escolher outra data pra verificar, pq o retorno da consulta faz com q a resposta venha sozinha na pagina.

 

minha dúvida é: tem como mandar ele retornar esta mensagem em outra janela? como um pop message por exemplo.... ou tp, escrever esta mensagem na propria pagina, mas mantendo todo o resto...?

 

o código deste trecho está assim:

 

 

Set RS = Server.CreateObject("adodb.recordset")RS.PageSize = 10SQL = "SELECT * FROM consultas where CRM='"&S&"' and dia = '"&Dia&"' and mes = '"&Mes&"' and ano = '"&Ano&"' Order By HORA ASC"RS.Open SQL,Conn,3,3IF RS.EOF then Response.Write "Nenhum registro encontrado! <br><a href='javascript:history.go(-1);'>Clique aqui para voltar à página anterior</a>"Response.EndELSEIF Request.QueryString("pagina")="" then intpagina=1 ELSEIF cint(Request.QueryString("pagina"))<1 thenintpagina=1 ELSEIF cint(Request.QueryString("pagina"))> RS.PageCount then intpagina=RS.PageCount ELSEintpagina=Request.QueryString("pagina")END IFEND IFEND IFEND IF

agradeço a todos!!! eu tenho q entregar este trampo hj...no maximo amanha...rs...e ta fd!!!

 

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

[adilsonb 0]

Olá Hunger

 

Porque você não faz a pesquisa retornar para a mesma página, em vez de ir para outra? (faz um submit para ela mesma)

 

Dai na página você faria apenas uma tabela (uma linha) para exibir a mensagem "Nenhum registro encontrado".

 

Coloque essa linha dentro de um If, pois ela só irá aparecer se tiver vazio o conteúdo:

 

IF RS.EOF thenResponse.Write ("Nenhum registro encontrado!")Aqui vai o conteudo que você quer se o resultado for vazio.ElseAqui vai o conteudo normal do resultado da buscaEnd If

Entendeu?

 

Qualquer dúvida me avise.