8 replies to this topic

[Israelf]

Salve Galera.

Preciso criar um sitema de busca no meu site, mas nao estou conseguindo visualizar os resultados da busca, tentei usar os codigos conforme tutorial postado pelo Luis Otavio [Fazer Uma Busca No Db] em http://forum.wmonlin...showtopic=81802 porem os resultados nao aparecem.

Alguem poderia testar se estes codigos funcionam, ou disponibilizar algum outro link com exemplos semelhantes.

Grato.
Israel Alves Ferreira

[Luis Otávio]

como esta seu cod?

[Israelf]

como esta seu cod?

<%
Busca = Trim(Request.form("buscando"))
%>
<%
set DB = createobject("adodb.connection")
constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.Mappath("banco.mdb")
DB.open constr
Set objRS = Server.CreateObject("ADODB.Recordset")
%>
<%
function TiraAspas(str)
str = replace(str,"'","""")
TiraAspas = str
End function
%>

<%
Busca=TiraAspas(Busca)

strSql = "SELECT * FROM cadastro WHERE nome LIKE '%"&Busca&"%'"
objRS.Open strSQL,DB,1,1
%>

Resultado da busca<br>
<%
if (len(busca)<=2) then
Response.write("Digite uma palavra com o mínimo de 3 letras para fazer a busca.")

ElseIf (Busca = "") then
Response.write("Você precisa escrever uma palavra para fazer uma busca.")

ElseIf (objRS.EOF = true) then
response.write "Sua busca por <b>"&Busca&"</b> não retornou nenhum resultado, por favor tente ser menos específico."
Else
do While not objRS.EOF
%>
<%=objRS(TiraAspas("nome"))%><br>
<%
objRS.MoveNext
Loop
End IF
%>

Criei um banco de dados no Access2003 conforme mencionado em seu tuto. La especifiquei uma tabela chamada cadastro e add. alguns nomes para busca.

A pagina busca.asp esta funcionado corretamente. Porem qd clico no botao busca a pagina resultado.asp com os ccdigos descritos acima nao aparece.
estou usando browser IE7 e Mozila 1.0.6 para realizar os teste.

Pstei este teste no meu site.

http://www.israelf.xpg.com.br/ e clica no link Bem Vindos.

atenciosamente.
Israel.

Edição feita por: Israelf, 12/01/2007, 10:04.

[Luis Otávio]

Muito lento o link.. naum abre..

mas este xpg tem suporte a asp?

[sk15]

XPG não tem suporte a ASP nem nenhuma linguagem no Plano Free ...
Memos no plano pago ele não tem ASP no máximo PHP...

Mas aqui não ta entrando sua página ...

[Israelf]

XPG não tem suporte a ASP nem nenhuma linguagem no Plano Free ...
Memos no plano pago ele não tem ASP no máximo PHP...

Valew pela dica. vou procura outro servidor para fazer os teste.

Existe uma maneira de testar os codigos ASP sem precisar postar num servidor?

Mas aqui não ta entrando sua página ...

Problemas com o servidor XPG, eh gratis, fazê o que?

Valew. e obrigado por enquanto...

[replay]

Existe uma maneira de testar os codigos ASP sem precisar postar num servidor?

Sim é so vc instalar o IIS que ja vem junto no cd do windows...

Pra saber mais so procurar IIS no google que tem muitos tutoriais que ensinam a instalar e configurar o IIS

Valeu

[sk15]

Bem free acredito que no fórum tem uma pequena lista ...
Tem essa pequena lista tbm ...

http://oinko.net/freeasp/

Quanto a rodar off-line é como o "replay" disse

Para Window 98 (velho d+) existe o PWS (que eu achava legazinho) que vc acha no CD do Win98
Para Window XP tem o IIS que ele é chato d+ o meu ta travado que vc tbm acha no cd de instalacao ...

[Israelf]

Falow Rapaziada.

Consegui utilizar o IIS e visualizar o sistema de busca q o Luis criou.

Obrigado pelas dicas, e sempre q puder estarei pronto a ajudar tbm.



Pra quem quizer aprender mais sobre IIS acessa aqui http://www.criarweb.com/iis/

Abraços...

Edição feita por: Israelf, 13/01/2007, 19:07.