Oi pessoal eu fiz uma pagina em asp que serve para buscar num banco de dados o que eu digitar num text de um formulario, mas sempre da um erro e não sei como conserta-lo, sera que alguém poderia me ajudar?
já possui uma pagina a parte que é o formulario que envia o trexto digitado pra essa:
<html>
<head>
</head>
<body>
<%
dim conexao , busca
Set conexao = Server.CreateObject("ADODB.Connection")
Pergunta
Guest - Rodrigo -
Oi pessoal eu fiz uma pagina em asp que serve para buscar num banco de dados o que eu digitar num text de um formulario, mas sempre da um erro e não sei como conserta-lo, sera que alguém poderia me ajudar?
já possui uma pagina a parte que é o formulario que envia o trexto digitado pra essa:
<html>
<head>
</head>
<body>
<%
dim conexao , busca
Set conexao = Server.CreateObject("ADODB.Connection")
conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/") & "\db1.mdb" & ";pwd="
sub fecha_conexao
conexao.close
Set conexao = nothing
end sub
set busca = Server.CreateObject("ADODB.RecordSet")
busca.open = "SELECT * FROM Produto WHERE Nome_Do_Produto like '%"&Request.Form("nom1")&"%'",conexao,3,3
If busca.EOF Then
Response.Write "Não foi encontrado nenhum registro!"
Else
WHILE not busca.EOF
response.write "<tr><td>"&busca("Nome_Do_Produto")&"</td></tr>"
busca.MoveNext
WEND
end if
call fecha_conexao
%>
</body>
</html>
Obrigado a todos tenha m uma Ótima Semana :)
Link para o comentário
Compartilhar em outros sites
5 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.