Guest Guest Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Pessoal,To quebrando a cabeça aqui, mas não to conseguindo. Tenho uma pagina de pesquisa:PAGINA PESQUISA.ASPSet objConn = Server.CreateObject("ADODB.Connection")objConn.ConnectionString = "DSN=banco"objConn.OpenSet objRS = Server.CreateObject("ADODB.Recordset")Set objRS.ActiveConnection = objConnbEncontrado = FalseSET objRS = objConn.execute("SELECT * FROM Clientes WHERE nome_cliente LIKE '%" & strPesq & "%'")Response.Write("<table width=50% border=2 align=center bordercolor=Black CELLSPACING=0>")while not objRS.eof'Aqui mostra os registros encontrados'da tabela CLIENTES, já com um link'no registro telefone para a pagina'SOLIC_LIGACAO.ASP'Eis os links:Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codcli") &"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel_cli") &"</font></td>"&"</a>")Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codcli")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel2_cli") &"</font></td>"&"</a>")objRS.MoveNextbEncontrado = TrueWendSET objRS = objConn.execute("SELECT * FROM Fornecedores WHERE nome_for LIKE '%" & strPesq & "%'")while not objRS.eof'Aqui mostra os registros encontrados'da tabela FORNECEDORES, já com um link'no registro telefone para a pagina'SOLIC_LIGACAO.ASP'Eis os links:Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codfor") &"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel_for") &"</font></td>"&"</a>")Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codfor")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel2_for") &"</font></td>"&"</a>")objRS.MoveNextbEncontrado = TrueWendResponse.Write("</table>")If Not bEncontrado ThenResponse.Write("Registros não encontrado!")End ifOu seja os registros tanto da tabela CLIENTES quanto da tabela FORNCEDORES são mostrados na tela em forma de tabela.Dependendo da palavra digitada no campo pesquisa é claro.Por exemplo digito 'GAB'Ele mostra:Fabiano 'Gab'riel - tabela clientestel1 3212 -2566 (link)tel2 3222-5555 (link)'Gab'riel Silva - tabela fornecedorestel1 3222 -2525 (link)tel2 3222-5565 (link)PAGINA SOLIC_LIGACAO.ASPE nessa página ele terá que saber qual SQL executar:<html>strCodigo = request.querystring("cod")SET objRS = objConn.execute("SELECT * FROM clientes WHERE codcli = " & strCodigo)'Aqui preenche o formulario<form action="grava_solicitacao.asp" method="post"><input name="txt_dest" value="<%= objRS("nome_cliente")%>" >...</form></html>ou<html>strCodigo = request.querystring("cod")SET objRS = objConn.execute("SELECT * FROM fornecedores WHERE codcli = " & strCodigo)<form action="grava_solicitacao.asp" method="post"><input name="txt_dest" value="<%= objRS("nome_for")%>" >...</form></html>Sem falar que preciso de uma lógica para na hora saber tb em qual link foi clicado: tel1 ou tel2 certo?? Para que preencha o formulário com o link clicado...Se alguém tiver uma ideia, e quiser me auxiliar fico muito agradecido!!!Falow!!Fabiano. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Olá brother!!Vamos por partes então.. (Vamos dar uma de jack estripador: "Vamos esquartejar o problema.." huauhahua)você conseguiu fazer a busca toda? ou tem duvida nela também?você escreveu bastante.. mas não deixou muito claro quais eram suas duvidas em si.O que eu entendi, é que você quer saber como criar o link, do telefone, e como saber qual foi clicado.Antes.. a pergunta é: Porque criar o link? O que vai abrir?Pra você identificar.. seria interessante você jogar algum parametro no Link.. pode ser o proprio telefone.. como tb pode ser o campo ID da sua tabela! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Ok! o link vai abrir uma pagina solic_ligacao.asp (como você pode observar no fonte ele abre essa pagina em uma janela pop-up) e a pagina solic_ligacao.asp, tem um formulario que será preenchido com o prórpio registro clicado... entendeu???tipo encontrou os registros Fabiano Gabriel (TABELA CLIENTES)Tel1 3212-2323 (link)Tel2 3222-1411 (link)Gabriel de Oliveira (TABELA FORNECEDORES)Tel1 3212-5656 (link)Tel2 3212-1234 (link)Se eu clicar em um dos telefone ele vai para a pagina solic_ligacao.aspE essa pagina tem um formulario com os texts: Destinatário (que vai ser preenchido com Fabiano Gabriel ou Gabriel Oliveira, depende de qual eu clicar)Telefone (que vai ser preenchido com o telefone do link que eu clicar)E depois tem tb um botão para gravar esse formulario em uma outra tabela.Ou seja será registrado as ligações solicitadas. Depois pretendo amarrar essas ligaçoes com o usuario que logar no sistema certo ???Fabiano. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 certo.não vejo problema nenhum então.Veja só:- Em cada telefone que você colocar o link, você coloca: solic_ligacao.asp?nome=<%=variavel_nome%>&telefone=<%=variavel_telefone%>assim, sempre que clicar no link, vai ser passado como parametro o nome e o telefone.no lugar de variavel_nome e variavel_telefone, você coloca a variavel certa.. que faz escrever no nome e o telefone na tela aí.. (creio eu, que deva vim do banco..)Entendeu a ideia?Ate mais Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Então quer dizer que:solic_ligacao.asp?nome=<%=variavel_nome%>&telefone=<%=variavel_telefone%>Onde nome é uma variável que receberia objRS("nome_cli") depois telefone receberia obRS("tel_cli") ????Daí no SOLIC_LIGACAO.ASPvar1=request.querystring("nome")var2=request.querystring("tel_cli")<input name="txt_nome" value="<%= var1 %>><input name="txt_tel" value="<%= var2 %>>É isso??? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 quase isso.. heheé exatamente o que você falou ali, mas no request:var1=request.querystring("nome")var2=request.querystring("tel_cli")o campo em vermelho, é o mesmo campo que você passou no link como parametro aqui:solic_ligacao.asp?nome=<%=variavel_nome%>&telefone=<%=variavel_telefone%>ou seja.. no lugar de tel_cli, você coloca telefoneabraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Ah!!! Sim!Falta de atenção!!beleza cara!! Vou tentar aqui!!!Fabiano. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 certose precisar de algo, estamos aí!abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 Cara beleza!!!Funcionou em cima do pedido!!!O único problema é que se pesquisar um campo com espaço em branco, dá erro de script na pagina "pesquisa.asp" por que será????Tipo registro com nome= Fabiano (funciona beleza!) nome=Fabiano Gabriel (dá erro de script)Erro= Constante de sequencia não finalizada!!Dá uma olhada no código:Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solci_ligacao.asp?dest="&objRS("nome_cli")&"&tel="&objRS("tel_cli")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"&objRS("tel_for")&"</font></td>"&"</a>")Muito estranho isso não acha??Fabiano Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 27, 2004 Denunciar Share Postado Julho 27, 2004 então, dá um replace na variaveltroca o espaço por %20se não me engano, é assim que fica links com espaços..testa aí..t+ Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest Guest Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 Response.write("<td><font size=2><a href=# onClick=open('confirmacao.asp?dest="&objRS("nome_cliente")&"&tel="&objRS("tel2_cli")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"&objRS("tel2_cli")&"</font></td>"&"</a>")dest = replace(dest," ","%20")tel = replace(tel," ","%20")Seria isso ??não deu certo não !!!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 aholha sóvocê disse que dá erro, se fizerem uma busca em branco, né?Mas existe a necessidade de permitir uma busca em branco?Pois, se não existe, você pode fazer um IF, e testar.. se a busca for vazia, você não prossegue, e dá uma mensagem, dizendo que o campo é obrigatorio o preenchimento...Que me diz? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest Guest Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 não, não!!Essa rotina o sistema já tem!!! Digo o seguinte:Se mando pesquisar "Fabiano"Ele acha "Fabiano Gabriel"Chega a mostrar o registro encontrado mas dá erro de script!!!!Erro= Constante de sequencia não finalizadaClico no link e não funciona!!!!Se mando pesquisar "Gabriel"Ele acha "Gabriel"Mostra o registro encontradoFuncioana Perfeitamente!!!Entendeu???Resumindo: não posso ter registros com espaço em branco que dá erro!!!Muito estranho isso!!!Acho que talvez seja por mandar abrir uma janela pop-up, se for o caso vou mudar o código para abrir em uma janela normal o que acha????Valeu!!Fabiano Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 é esquisito isso.. realmenteMas, acho que deve ser por causa do espaço mesmo.usando o replace, trocando o espaço por %20 ?Num codigo que eu fiz à um tempo atras, eu fiz essa troca com o replace, e funcionou..mas o problema, para mim, era que ele não achava a pagina, com o nome de usuario com espaço! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest Guest Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 Então você viu o comando que eu fiz???Logo abaixo da linha de código do link coloquei:dest = replace(dest," ","%20")tel = replace(tel," ","%20")Se fosse o caso seria isso mesmo??Valeu!!!Fabiano! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 quem sabe se você tentar usar o espaço que o html entenda:replace (variavel," ","%20") Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 Tentei tb!! não deu certo??Cara, andei pesquisando sobre esse problema. Será que o Server.URLENCODE resolveria???você já usou isso antes???Eu nunca usei!!!O que você acha???Fabiano. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Fabiano_Gabriel Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 Consegui cara!!!Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('confirmacao.asp?dest="& Server.URLEncode(teste) &"&tel="& Server.URLEncode(objRS("tel_cli")) &"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"&objRS("tel_cli")&"</font></td>"&"</a>")Grande Dark!!!Obrigado por tudo aí bicho!Valeu mesmo!!! Pode fechar o post!!!Fabiano!!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 dark0 Postado Julho 28, 2004 Denunciar Share Postado Julho 28, 2004 hehehetá certo.. eu havia me esquecido do URLEncode!É isso aí mesmo!To fechando o tópico então.. Abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest Guest
Pessoal,
To quebrando a cabeça aqui, mas não to conseguindo. Tenho uma pagina de pesquisa:
PAGINA PESQUISA.ASP
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DSN=banco"
objConn.Open
Set objRS = Server.CreateObject("ADODB.Recordset")
Set objRS.ActiveConnection = objConn
bEncontrado = False
SET objRS = objConn.execute("SELECT * FROM Clientes WHERE nome_cliente LIKE '%" & strPesq & "%'")
Response.Write("<table width=50% border=2 align=center bordercolor=Black CELLSPACING=0>")
while not objRS.eof
'Aqui mostra os registros encontrados
'da tabela CLIENTES, já com um link
'no registro telefone para a pagina
'SOLIC_LIGACAO.ASP
'Eis os links:
Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codcli") &"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel_cli") &"</font></td>"&"</a>")
Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codcli")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel2_cli") &"</font></td>"&"</a>")
objRS.MoveNext
bEncontrado = True
Wend
SET objRS = objConn.execute("SELECT * FROM Fornecedores WHERE nome_for LIKE '%" & strPesq & "%'")
while not objRS.eof
'Aqui mostra os registros encontrados
'da tabela FORNECEDORES, já com um link
'no registro telefone para a pagina
'SOLIC_LIGACAO.ASP
'Eis os links:
Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codfor") &"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel_for") &"</font></td>"&"</a>")
Response.write("<td bgcolor=#e6e6e6 align=left><font size=2><a href=# onClick=open('solic_ligacao.asp?cod="&objRS("codfor")&"','','width=380,height=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbar=no,resizable=no')>"& objRS("tel2_for") &"</font></td>"&"</a>")
objRS.MoveNext
bEncontrado = True
Wend
Response.Write("</table>")
If Not bEncontrado Then
Response.Write("Registros não encontrado!")
End if
Ou seja os registros tanto da tabela CLIENTES quanto da tabela FORNCEDORES são mostrados na tela em forma de tabela.
Dependendo da palavra digitada no campo pesquisa é claro.
Por exemplo digito 'GAB'
Ele mostra:
Fabiano 'Gab'riel - tabela clientes
tel1 3212 -2566 (link)
tel2 3222-5555 (link)
'Gab'riel Silva - tabela fornecedores
tel1 3222 -2525 (link)
tel2 3222-5565 (link)
PAGINA SOLIC_LIGACAO.ASP
E nessa página ele terá que saber qual SQL executar:
<html>
strCodigo = request.querystring("cod")
SET objRS = objConn.execute("SELECT * FROM clientes WHERE codcli = " & strCodigo)
'Aqui preenche o formulario
<form action="grava_solicitacao.asp" method="post">
<input name="txt_dest" value="<%= objRS("nome_cliente")%>" >
...
</form>
</html>
ou
<html>
strCodigo = request.querystring("cod")
SET objRS = objConn.execute("SELECT * FROM fornecedores WHERE codcli = " & strCodigo)
<form action="grava_solicitacao.asp" method="post">
<input name="txt_dest" value="<%= objRS("nome_for")%>" >
...
</form>
</html>
Sem falar que preciso de uma lógica para na hora saber tb em qual link foi clicado: tel1 ou tel2 certo?? Para que preencha o formulário com o link clicado...
Se alguém tiver uma ideia, e quiser me auxiliar fico muito agradecido!!!
Falow!!
Fabiano.
Link para o comentário
Compartilhar em outros sites
18 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.