Nº De Resultados Da Busca ?

[Guest - Telo -]

Estou com um sistema de busca funcionando só que ele tem um problema não da o numero de resultados da busca ou se não encontra nada na busca não escreve nada na página fica em branco , se tiver alguém que possa me ajudar ...

<%
vpalavrachave = request.form("palavrachave")

DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("db.mdb")
sqlstmt = "SELECT * FROM cadastro WHERE palavrachave like '%" & vpalavrachave & "%'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, DSNtemp, 3, 3
totalrecs = rs.recordcount

x = 0 
for x = 1 to totalrecs
if rs.eof then
exit for
else

id = rs("ID")
produto = rs("produto")
especificacoes = rs("especificacoes")
marca = rs("Marca")
link = rs("link")
foto = rs("foto")
preço = rs("preço")

%>
<%=foto%><a href=<%=link%>><b><%=produto%></b>-<%=marca%>- <%=especificacoes%><b><%=preço%></b></a>


<% rs.MoveNext %><% end if
next
%>

[ursolouco]

<%
	'vUrsolouco 1.0

	vpalavrachave = request.form("palavrachave")

	cBanco = Server.MapPath("db.mdb")
	strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source = "& cBanco &";"
	Set Conn = Server.CreateObject("adodb.connection")
	Conn.Open(strConn)

	cSQL = "SELECT * FROM cadastro WHERE palavrachave like '%" & vpalavrachave & "%'"
	Set Rs = Server.CreateObject("adodb.recordset")
	Set Rs = Conn.Execute(cSQL)

	Contador = 0

	If Rs.Eof Then
  Response.Write("Não há registros a serem exibidos.")
	Else

	While Not Rs.Eof

	Response.Write(Rs("foto") & "<br>")
	Response.Write("<a href=" & Rs("Link") & ">" & "<b>" & Rs("Produto") & "</b>-"  & Rs("Marca") & Rs("especificacoes") & "</a>")
	Response.Write("<br>")

	Rs.MoveNext
	Contador = Contador + 1
	Wend
	End if

	Response.Write("Total:" & Contador)

	Rs.Close
	Set Rs = Nothing
	Conn.Close
	Set Conn = Nothing
%>

Tenta ai kara

[Guest - telo -]

Ow muito obrigado deu certinho ....

[dark0]

Ok.. Duvida resolvida

Telo, cadastre-se no nosso fórum! Participe conosco!

Estou Fechando o Tópico. Se tiver mais alguma duvida sobre isso, mande PM pedindo, que eu re-abro o tópico!

Até mais!

Dark