marcos_804 Postado Outubro 20, 2004 Denunciar Share Postado Outubro 20, 2004 GALERA ESTOU TENDO PROBLEMAS COM O MEU CODIGO DE BUSCA, COMO FAÇO PARA DAR O FIM DO QUE FOI INICIADO, OU MELHOR "Microsoft VBScript compilation error '800a0401' Expected end of statement /teajudo/TesteDeBusca/search.asp, line 14 "(nome like '%" & KEY "%') OR (email like '%" & KEY "%');"----------------------^"O ERRO VEM DESCRITO ABAIXO<%Function search( KEY ) valor = ""conn="DRIVER={Microsoft Access Driver (*.mdb)}; " conn=conn & "DBQ=" & server.mappath("banco.mdb") SQL = "SELECT FROM id, nome, email FROM banco WHERE" & _ "(nome like '%" & KEY "%') OR (email like '%" & KEY "%');" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn DO while NOT rs.EOF valor = valor & "<b>nome:</b> " & rs(1) & "<br><b>Email: </b>" & rs(2) & "<br><br>" sr.MoveNext Loop rs.Close set rs = Nothing search = valorend functionkey = trim(request.form("KEY")) linhas = search( key )%>AJUDA AI GALERA Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Outubro 21, 2004 Denunciar Share Postado Outubro 21, 2004 <%Function search( KEY ) valor = ""conn="DRIVER={Microsoft Access Driver (*.mdb)}; " conn=conn & "DBQ=" & server.mappath("banco.mdb") SQL = "SELECT FROM id, nome, email FROM banco WHERE" & _ "(nome like '%" & KEY & "%') OR (email like '%" & KEY & "%');" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn DO while NOT rs.EOF valor = valor & "<b>nome:</b> " & rs(1) & "<br><b>Email: </b>" & rs(2) & "<br><br>" sr.MoveNext Loop rs.Close set rs = Nothing search = valorend functionkey = trim(request.form("KEY"))linhas = search( key )%> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Outubro 21, 2004 Denunciar Share Postado Outubro 21, 2004 outra coisa, porque você colocou PONTO E VIRGULA no fim da linha? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 marcos_804 Postado Outubro 21, 2004 Autor Denunciar Share Postado Outubro 21, 2004 sim, pois no livro que eu estou estudando podia por. Ou melhor, tinha ponto e virgula! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 marcos_804 Postado Outubro 21, 2004 Autor Denunciar Share Postado Outubro 21, 2004 não entendi o que voce quis dizer com aquele "&&" de azul!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 marcos_804 Postado Outubro 21, 2004 Autor Denunciar Share Postado Outubro 21, 2004 a ta, agora me toquei!! Valeu pela ajuda, agora pode fechar o tópico!!HEHEHEdesculpa a burrice! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Outubro 21, 2004 Denunciar Share Postado Outubro 21, 2004 heheo & ali simboliza o uso de uma variavel, ou concatenação.no seu caso, acho que simbolizava uma variavel mesmo.aí, a sintaxe correta é um & antes da variavel e um & depois dela. Faltava o & depois Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
marcos_804
GALERA ESTOU TENDO PROBLEMAS COM O MEU CODIGO DE BUSCA, COMO FAÇO PARA DAR O FIM DO QUE FOI INICIADO, OU MELHOR "
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/teajudo/TesteDeBusca/search.asp, line 14
"(nome like '%" & KEY "%') OR (email like '%" & KEY "%');"
----------------------^"
O ERRO VEM DESCRITO ABAIXO
AJUDA AI GALERA
Link para o comentário
Compartilhar em outros sites
6 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.