Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

fabiano_gabriel

Logica para preencher form

Por , em ASP Clássico

Recommended Posts

fabiano_gabriel    0

fabiano_gabriel
Postado

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, enquanto isso vou tentando aqui...Falow!!Fabiano.

Compartilhar este post

Link para o post
Compartilhar em outros sites

fabiano_gabriel    0

fabiano_gabriel
Postado

Pessoal,Se acham que naum tem solução poderiam me dar uma ideia de com implementar isso novamente??? Seria interessante registrar no banco de dados a pesquisa, pois assim poderia preencher o formulário como um registro de uma tabela chamada PESQUISA por exemplo!!! Nesse caso o banco aumentaria muito rápido tb né??Valeu!!!Fabiano

Compartilhar este post

Link para o post
Compartilhar em outros sites

BigPaul    0

BigPaul
Postado

Admito que achei o codigo meio confuso , eu faria de forma mais simplificada mas paea voce não perder o trabalho faça o seguinte :

 

Na Pagina_pesquis.ASP na parte do codigo aonde voce abre a soli_ligacao.asp adicione mais uma variavel, vamos chama-la de tipo, uma para cada pesquisa (no caso cliente e fornecedor).

 

Assim :

 

open('solic_ligacao.asp?tipo=for

open('solic_ligacao.asp?tipo=cli

 

Ai na pagina solicita_ligacao.asp basta colocar um condicional

 

if Request.QueryString("tipo") = cli then

 

SET objRS = objConn.execute("SELECT * FROM clientes WHERE codcli = " & strCodigo)

 

 

else

 

SET objRS = objConn.execute("SELECT * FROM fornecedores WHERE codcli = " & strCodigo)

 

 

end if

 

Esse é o raciocinio; desenvolva por ai

 

Compartilhar este post

Link para o post
Compartilhar em outros sites

fabiano_gabriel    0

fabiano_gabriel
Postado

Beleza entendi!!!Mas e o telefone, são dois links!!!!!então na hora de preenche-los:<input type="text" name="txt_tel" value="???????">Existe alguma forma de passar o parametro do link clicado ???daí jogo esse valor em uma variavel(tel) e na pagina solic_ligacao.asp:var = request.querystring("tel")<input type="text" name="txt_tel" value=<%= var%>Fabiano.

Compartilhar este post

Link para o post
Compartilhar em outros sites

fabiano_gabriel    0

fabiano_gabriel
Postado

Desculpe a ignorancia,Como assim???O que eu pensei estaria correto??Usaria esta linha de comando para pegar o link clicado??? Não entendi!!!O txt_tel está na página solic_ligacao.asp, é campo que vai receber o link do telefone clicado!!!Fabiano.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito