Ir para conteúdo

POWERED BY:

Arquivado

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

Debukis Ondeteibou

Busca com Like

Por , em ASP Clássico

Recommended Posts

Debukis Ondeteibou    0

Debukis Ondeteibou
Postado 
<% Digitado = Request("Busca") %><body><%Set CONEXAO = CreateObject("ADODB.Connection")CONEXAO.Provider = "Microsoft.Jet.OLEDB.4.0"CONEXAO.Open server.MapPath("administracao\database_site.mdb")Sqlsoma = "Select Count(digitado) as Soma From noticias where titulo='"&digitado&"'"Set rssoma = CONEXAO.Execute(Sqlsoma)Sql = "Select * From noticias where noticia like '%"& digitado &"%'"Set rsdados = CONEXAO.Execute(Sql)Response.Write(rssoma("Soma"))While not rsdados.eof %><a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwend%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

shumi    0

shumi
Postado

tenta assim:

<% Digitado = Request("Busca") %><body><%Set CONEXAO = CreateObject("ADODB.Connection")CONEXAO.Provider = "Microsoft.Jet.OLEDB.4.0"CONEXAO.Open server.MapPath("administracao\database_site.mdb")Sqlsoma = "Select Count(digitado) as Soma_valores From noticias where noticia='"&Digitado&"'"Set rssoma = CONEXAO.Execute(Sqlsoma)Sql = "Select * From noticias where noticia like '%"& Digitado &"%'"Set rsdados = CONEXAO.Execute(Sql)Response.Write(rssoma("Soma_valores"))While not rsdados.eof %><a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwend%>

se não for faz isso:

<% Digitado = Request("Busca") %><body><%Set CONEXAO = CreateObject("ADODB.Connection")CONEXAO.Provider = "Microsoft.Jet.OLEDB.4.0"CONEXAO.Open server.MapPath("administracao\database_site.mdb")Sql = "Select * From noticias where noticia like '%"& Digitado &"%'"Set rsdados = CONEXAO.Execute(Sql)While not rsdados.eofsoma = soma + 1%><a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwendResponse.Write(soma)%>

Abraços

Compartilhar este post

Link para o post
Compartilhar em outros sites

Debukis Ondeteibou    0

Debukis Ondeteibou
Postado

DEU CERTO COM:

<% Digitado = Request("Busca") %><body><%Set CONEXAO = CreateObject("ADODB.Connection")CONEXAO.Provider = "Microsoft.Jet.OLEDB.4.0"CONEXAO.Open server.MapPath("administracao\database_site.mdb")Sql = "Select * From noticias where noticia like '%"& Digitado &"%'"Set rsdados = CONEXAO.Execute(Sql)While not rsdados.eofsoma = soma + 1%><a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwendResponse.Write(soma)%>

VLWWWWWWWW

Compartilhar este post

Link para o post
Compartilhar em outros sites

shumi    0

shumi
Postado

logico que explico!

 

While not rsdados.eofsoma = soma + 1%><a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwendResponse.Write(soma)
para você trazer os resultados você faz isso certo?

While not rsdados.eof<a href="<%=(rsdados("id"))%>"><%=(rsdados("titulo"))%></a> <br /><%rsdados.movenextwend%>
Isso nada mais é que ele pega o resultado e vai dando um "proximo"!

 

você fazendo isso no meio desse script:

soma = soma + 1
Ele vai criar a variavel soma que vai ser igual a variavel soma + 1

 

ele vai fazer de primeira isso

 

soma = vazio + 1 que é igual a 1

a segunda ele faz isso

soma = 1 + 1 que é igual a 2 - esse primeiro 1 é o que tinha na var soma que era o valor 1 do primeiro "loop"

 

e assim vai!

 

Abraços

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