Busca

[Annelise]

Ola amigos...

aki...estou precisando de um pequeno sisteminha de busca...estou comecando no mundo asp agora então....

tenho uma tabela "email"

com os campos "nome" e "email"

preciso do seguinte:

o usuario digita o nome da pessoa e ai e listado o email desta...temjeito....?sera que e mt dificil?

Brigadim hein gente...

[cyberalexxx]

recupere os dados do formulário:

nome=request("nome") ' recupera o campo do form que tinha o nome

depois quando criar o recordset faça assim:

select * from tabela where camponome='nome'

tendeu??

[Annelise]

tendi +ou-

to bem no inico do asp...

se puder me ajudar mais um pokinho....

brigadim

[fertel]

Oi Annelise:

Faz assim ói:

Cria um formulário com o campo pra pessoa digitar o nome, ok?

O action do form vai ser o arquivo com isso aqui:

<%
Set Conexao = Server.CreateObject("ADODB.Connection")
    Conexao.Open "DBQ=C:\sites\meusite\dados\email.mdb;Driver={Microsoft Access Driver (*.mdb)};"

ComandoSQL = "SELECT * FROM email WHERE nome LIKE '%" + Replace(Request.Form("nome"), "'", "''") + "%'"
Set bd = Conexao.Execute(ComandoSQL)
If NOT bd.EOF Then
nome = bd("nome")
email = bd("email")
End If

Response.Write nome & "<br>"
Response.Write email
%>

A partir disto, você já pode modificar o que for preciso!

Obs.: Assim é como você pediu, mas vale lembrar que a busca por nome ela não será exata. Pois pode haver Maria da Silva, Maria José, etc... Se a pessoa digitar Maria apenas vai aparecer apenas o primeiro registro que contém Maria.

Boa sorte

[Annelise]

ta......e tenho que criar um botao tb......tem algum codigo nele??

ou...brigadao.c ta me ajudando d+

[fertel]

Qual vai ser a função do botão e onde ele irá ficar?

[Annelise]

pensei em um botao...buscar por exemplo.....

ou não.!!!

tipo...escrevo o nome e clico

[fertel]

Então...

Na página onde tem o formulário e o campo que a pessoa vai digitar, você tem que por o botão... senão como a pessoa vai enviar o form?

Você está usando qual programa editor? O Dreamweaver ou Frontpage?

Se for Dreamweaver, beleza porque eu sei...

Dentro do form põe:

Lá em cima no menu: "inserir" > Objetos de formulário > Botão

Senão você mete pelo HTML:

<input name="Submit" type="submit">

Se ainda tiver dúvida meu MSN: cinzaprata@hotmail.com

[Annelise]

[Annelise]

Erro 405 de HTTP

405 método não-permitido

O método especificado na linha de requisição não é permitido para o recurso identificado pela requisição. Certifique-se de ter configurado o tipo MIME apropriado para o recurso requerido.

Contate o administrador do servidor se o problema persistir.

[fertel]

posta o seu código aqui para que eu possa ver, ok?

[Annelise]

<input name="nome" type="text" id="nome">

<form name="form1" method="post" action="

<%

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "DBQ=C:inetpub\wwwroot\sc_desa\bdintranet.mdb;Driver={Microsoft Access Driver (*.mdb)};"

ComandoSQL = "SELECT * FROM email WHERE nome LIKE '%" + Replace(Request.Form("nome"), "'", "''") + "%'"

Set bd = Conexao.Execute(ComandoSQL)

If NOT bd.EOF Then

nome = bd("nome")

email = bd("email")

End If

Response.Write nome & "<br>"

Response.Write email

%>

">

<input name="Submit" type="submit">

</form>

[fertel]

Tá errado...

Assim ó:

<form name="form1" method="post" action="email.asp">
<input name="nome" type="text" id="nome">
<input name="Submit" type="submit">
</form>

Aí você vai ter que criar outra página email.asp com este código:

<%
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "DBQ=C:inetpub\wwwroot\sc_desa\bdintranet.mdb;Driver={Microsoft Access Driver (*.mdb)};"

ComandoSQL = "SELECT * FROM email WHERE nome LIKE '%" + Replace(Request.Form("nome"), "'", "''") + "%'"
Set bd = Conexao.Execute(ComandoSQL)
If NOT bd.EOF Then
nome = bd("nome")
email = bd("email")
End If

Response.Write nome & "<br>"
Response.Write email
%>

[Annelise]

MILHOES DE BRIAGIM PRA você...

VALEU MESMO.

[fertel]

Conseguiu? maravilha.

Agora estuda isso direitinho hein? Se não entender a lógica de alguma coisa pergunta. O importante é você entender.