Ir para conteúdo

POWERED BY:

Arquivado

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

criacaoi7

[Resolvido] Como Informar que não tem resultados na busca!

Por , em ASP Clássico

Recommended Posts

criacaoi7    0

criacaoi7
Postado

Oi pessoal, gostaria da ajuda de vocês num sistema de busca de notícias.

 

O sistema funciona normal, mas ocorre que quando não encontra resultado nenhum no banco de dados, não exibe nada. Gostaria de que o sistema responde.

 

 

Se alguém puder ajudar...

Obrigado.

 

 

<% @Language = VBScript %><%session.LCID=1046%>
<%strBusca = Request.QueryString("busca")
if strBusca <> "" then
stringConexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\web\olimpiadaconsespcombr\database\dados.mdb"
Set RsConexao = Server.CreateObject("ADODB.Connection")
RsConexao.Open stringConexao
strSQL = "SELECT * FROM Noticias WHERE Noticia LIKE '%"& strBusca &"%'"
Set RS = RsConexao.Execute(strSQL) %>
<STYLE type=text/css>BODY {
	SCROLLBAR-FACE-COLOR: #f8f8f8; SCROLLBAR-HIGHLIGHT-COLOR: #1E7BEF; SCROLLBAR-SHADOW-COLOR: #1E7BEF; SCROLLBAR-3DLIGHT-COLOR: #fcfcfc; SCROLLBAR-ARROW-COLOR: #1E7BEF; SCROLLBAR-TRACK-COLOR: #fcfcfc; SCROLLBAR-DARKSHADOW-COLOR: #fdf5e3
}
.style5 {
	FONT-WEIGHT: bold; FONT-SIZE: 10px; FONT-FAMILY: Tahoma, Verdana, Arial
}
</STYLE>
</STYLE>
<STYLE>
A:link 		{ Color:#4BA0F7;TEXT-DECORATION: none }
A:visited 	{ Color:#4BA0F7;TEXT-DECORATION: none }
A:active 	{ Color:#4BA0F7;TEXT-DECORATION: none }
A:hover 	{ Color:#FF0000;TEXT-DECORATION: underline; background-color:yellow }
</STYLE>
<meta name="generator" content="Namo WebEditor v5.0">
<body bgcolor="white" leftmargin="0" marginwidth="0" topmargin="0" marginheight="0">
<table align="center" cellpadding="0" cellspacing="0">
	<tr>
		<td width="749">			<p></p>
		</td>
	</tr>
</table>
<table align="center" cellpadding="0" cellspacing="0" width="635">
	<tr>
		<td width="125" valign="top" height="39">	  
<p align="center"><!-- #include file="menu.asp" --></p>
</td>
		<td width="510" valign="top" height="39">			<p align="center"><font face="Arial Black" color="red">Resultado(s) Encontrado(s):

  
  </font><p>
<font face="Arial"><span style="font-size:10pt;"><%While not RS.EOF
response.write "" & RS("Classe") & "<BR>"
response.write ("<a href=""Mostra.asp?Noticias=" & RS("ID") & "&classe=" 	& RS("Classe1") & """>" & RS("Topico") & "</a>") & "<BR><BR>"
RS.MoveNext
Wend
end if
 %>			</span></font></p>
		</td>
	</tr>
</table>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Silvafabiano    0

Silvafabiano
Postado

Opa,

 

Só você colocar um if

 

exemplo

<% If Rs.EOF then%>
	  recordset vazio nao trouxe dados
<%else%>   
   <%while not Rs.EOF%>
				 recordset com dados
	<%wend%>
<%end if%>

Espero ter ajudado

 

Fabiano

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito