Ir para conteúdo

POWERED BY:

Arquivado

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

allan.web

link levar dados de um form..

Por , em ASP Clássico

Recommended Posts

allan.web    0

allan.web
Postado

E ai pessoal....Tenho um pgina com um form.... esse form é enviado via e-mail pelo cdonts e ao mesmo tempo armazenado no bd.... porém tem o itém clientes que presisaria que tivesse um link para visualizar os dados do cliente... tem como???... deixa eu tenta ser mais claro... P ex. campo cliente: _-_-(list/menu)_-_-_- Link "visualizar" (quando clicar aqui ele abrir uma janela que mostra os dados de tal cliente ali selecionado, sem executar o form) ... tem como fazer isso???desde ja agradeço

Compartilhar este post

Link para o post
Compartilhar em outros sites

WLJ    0

WLJ
Postado

Sem submeter o formulário??? Sei naum hein... se esta list faz parte do formulário como você vai fazer este "SELECT" para ver os detalhes desse cliente sem submeter ou seja passar o parametro de qual cliente você quer?

Compartilhar este post

Link para o post
Compartilhar em outros sites

HiTech-SP    0

HiTech-SP
Postado

Tem sim..Na página de edição do form você pega a ID do kra.você faz uma página de visualização, e no link pra essa pagina você coloca visualizar.asp?id=<%=id%>Ele vai mandar essa id pela urldepois na pagina de visualização você pega essa id pelo querystringID=Request.QueryStringAté MaisDanilo

Compartilhar este post

Link para o post
Compartilhar em outros sites

allan.web    0

allan.web
Postado

Tem sim..Na página de edição do form você pega a ID do kra.você faz uma página de visualização, e no link pra essa pagina você coloca visualizar.asp?id=<%=id%>Ele vai mandar essa id pela urldepois na pagina de visualização você pega essa id pelo querystringID=Request.QueryStringAté MaisDanilo

Ola....O meu problema está sendo justamente nessa parte de pegar o id do cara... é isso que não estou conseguindo... pq é um lis/menu e os dados vem de um bd... como faço para pegar os dados???desde ja obrigado

Compartilhar este post

Link para o post
Compartilhar em outros sites

HiTech-SP    0

HiTech-SP
Postado

Tem sim..Na página de edição do form você pega a ID do kra.você faz uma página de visualização, e no link pra essa pagina você coloca visualizar.asp?id=<%=id%>Ele vai mandar essa id pela urldepois na pagina de visualização você pega essa id pelo querystringID=Request.QueryStringAté MaisDanilo

Ola....O meu problema está sendo justamente nessa parte de pegar o id do cara... é isso que não estou conseguindo... pq é um lis/menu e os dados vem de um bd... como faço para pegar os dados???desde ja obrigado
Ah tah..Já tive esse problema tb..Resolvei assim, a pagina de edicao e a mesma de visualizacaoTem as seguintes variaveis principais, estado e buttonNa pagina de edicao você coloca se o estado e o button forem nulos logo ele está em modo de edicao,se o estado for diferente de nulo e o button for nulo ele esta no modo de visualizacao (como no seu caso), e se o estado e o button for diferente de nulo e sinal que ele clicou no botao para enviar o form.SE você envia um form atraves de um java script, ele nao envia a variavel button (de esse nome para a tag submit do seu form).Tive esse problema quando era pro kra selecionar o estado e depois a cidade.Qualquer duvida eh so perguntar

Compartilhar este post

Link para o post
Compartilhar em outros sites

HiTech-SP    0

HiTech-SP
Postado

Outra coisa, no fomr você coloca assim:<form name="form" id="form" action="editar.asp" method="post">e no select você colocaE no link visualizar<a href="#" onClick="form.submit()">Visualizar</a>

Compartilhar este post

Link para o post
Compartilhar em outros sites

allan.web    0

allan.web
Postado

Outra coisa, no fomr você coloca assim:<form name="form" id="form" action="editar.asp" method="post">e no select você colocaE no link visualizar<a href="#" onClick="form.submit()">Visualizar</a>

Cara.. edsculpe a minha burrice... mais não consegui entende muito bem... coloquei o link como você disse... naum funcionou... ele simplismente não faiz nda... porém tbem naum entendi aquela parte dos botões...Obrigado pela ajuda

Compartilhar este post

Link para o post
Compartilhar em outros sites

allan.web    0

allan.web
Postado

me passa o codigo da sua pagina para eu pode te auxiliar melhor..

Mandei via pm para você dar uma olhda... Vou postar aqui tbem..
<!--#include file="verifica.asp" --><html><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%set conexdados = server.createObject ("ADODB.Connection")conexdados.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("dados.mdb")set rs=server.createobject ("adodb.recordset")set rs02=server.createobject ("adodb.recordset")set rs03=server.createobject ("adodb.recordset")%><table width="100%" border="0">  <tr>    <td height="25" background="imagens/barra02.jpg"><font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Arquivo       | Cadastros | Fornecedores | Vendedores | Clientes | Pedidos | Cobranças       | Custos</strong></font></td>  </tr></table><form name="form1" id="form1" method="post" action="teste.asp">  <table width="100%" border="0">    <tr bgcolor="#FFFFFF">       <td height="25" colspan="10" bgcolor="#0000FF"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">@         Novo Pedido - </font></td>    </tr>    <tr>       <td width="11%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Fornecedor:</font></td>      <td width="27%"><input type="text" name="textfield"></td>      <td width="12%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Tipo:</font></td>      <td width="30%"><select name="select4">        </select></td>      <td width="3%"> </td>      <td width="3%"> </td>      <td width="3%"> </td>      <td width="3%"> </td>      <td width="3%"> </td>      <td width="5%"> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Emisão:</font></td>      <td><input type="text" name="textfield2"></td>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> </font></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cliente:</font></td>      <td><select name="select">          <%	rs.open "select * from clientes", conexdados,3,1    while not rs.eof%>          <option>           <%response.Write rs("cliente")%>          </option>          <%rs.movenextwend%>        </select>        <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> </font></strong></td>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>      <td><input type="text" name="textfield4"></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Vendedor:</font></td>      <td><select name="select2">          <%rs02.open "select * from vendedores", conexdados,3,1    while not rs02.eof%>          <option><%= rs02("vendedor")%></option>          <%rs02.movenextwend%>        </select> <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="#" onClic="form.submit()">Visualizar</a></font></strong></td>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>      <td><input type="text" name="textfield5"></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Transportadora:</font></td>      <td><select name="select3">          <%rs03.open "select * from transp", conexdados,3,1    while not rs03.eof%>          <option><%= rs03("transportadora")%></option>          <%rs03.movenextwend%>        </select> <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Ver         Histórico</font></strong></td>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Comprador:</font></td>      <td><input type="text" name="textfield6"></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cond. Pgto.</font></td>      <td><input type="text" name="textfield3"></td>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Descontos:</font></td>      <td><input type="text" name="textfield7"></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Observações:</font></td>      <td colspan="3"><textarea name="textarea" cols="65"></textarea></td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>      <td> </td>    </tr>    <tr>       <td height="26" colspan="10" bgcolor="#0066FF"><input type="button" name="Button" value="Button"></td>    </tr>  </table></form><p> </p><%rs.closers02.closeset rs = nothingset rs02 = nothingconexdados.closeset conexdados = nothing%></body></html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

HiTech-SP    0

HiTech-SP
Postado 
<%if request.form("select2")<>"" and LCase(request.form("button"))="salvar" then'aki você inicia o insertelseif (request.form("select2")<>"" and LCase(request.form("button"))="salvar") then'aki você faz uma pagina de visualizaçãoid_do_vendedor=Request.Form("select2")'ai você faz o select e talz para a visualizaçãoelseif (request.form("select2")<>"" and LCase(request.form("button"))="") then'se o select2 e o button estao nulos e sinal que ele esta visualizando a pagina pela primeira vez%><!--#include file="verifica.asp" --><html><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%set conexdados = server.createObject ("ADODB.Connection")conexdados.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("dados.mdb")set rs=server.createobject ("adodb.recordset")set rs02=server.createobject ("adodb.recordset")set rs03=server.createobject ("adodb.recordset")%><table width="100%" border="0"> <tr>   <td height="25" background="imagens/barra02.jpg"><font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Arquivo      | Cadastros | Fornecedores | Vendedores | Clientes | Pedidos | Cobranças      | Custos</strong></font></td> </tr></table><form name="form" id="form" method="post" action="teste.asp"> <table width="100%" border="0">   <tr bgcolor="#FFFFFF">      <td height="25" colspan="10" bgcolor="#0000FF"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">@        Novo Pedido - </font></td>   </tr>   <tr>      <td width="11%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Fornecedor:</font></td>     <td width="27%"><input type="text" name="textfield"></td>     <td width="12%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Tipo:</font></td>     <td width="30%"><select name="select4">       </select></td>     <td width="3%"> </td>     <td width="3%"> </td>     <td width="3%"> </td>     <td width="3%"> </td>     <td width="3%"> </td>     <td width="5%"> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Emisão:</font></td>     <td><input type="text" name="textfield2"></td>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> </font></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cliente:</font></td>     <td><select name="select">         <% rs.open "select * from clientes", conexdados,3,1   while not rs.eof%>         <option>          <%response.Write rs("cliente")%>         </option>         <%rs.movenextwend%>       </select>       <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> </font></strong></td>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>     <td><input type="text" name="textfield4"></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Vendedor:</font></td>     <td><select name="select2">         <%rs02.open "select * from vendedores", conexdados,3,1   while not rs02.eof%>         <option ><%= rs02("vendedor")%></option>         <%rs02.movenextwend%>       </select> <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="#" onClick="form.submit()">Visualizar</a></font></strong></td>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>     <td><input type="text" name="textfield5"></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">[b]Transportadora:</font></td>     <td><select name="select3">         <%rs03.open "select * from transp", conexdados,3,1   while not rs03.eof%>         <option><%= rs03("transportadora")%></option>         <%rs03.movenextwend%>       </select>[/b] <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Ver        Histórico</font></strong></td>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Comprador:</font></td>     <td><input type="text" name="textfield6"></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cond. Pgto.</font></td>     <td><input type="text" name="textfield3"></td>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Descontos:</font></td>     <td><input type="text" name="textfield7"></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Observações:</font></td>     <td colspan="3"><textarea name="textarea" cols="65"></textarea></td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>     <td> </td>   </tr>   <tr>      <td height="26" colspan="10" bgcolor="#0066FF"><input type="button" name="button" value="Salvar"></td>   </tr> </table></form><p> </p><%rs.closers02.closeset rs = nothingset rs02 = nothingconexdados.closeset conexdados = nothingend if 'fecha o if lah de cima, o primeiro if da pagina%></body></html>tenta aí

Compartilhar este post

Link para o post
Compartilhar em outros sites

allan.web    0

allan.web
Postado

Assim agora não aparece nda....Vou tentar mais um pouco e ver se consigo... hehehee...obrigado pela ajuda

Compartilhar este post

Link para o post
Compartilhar em outros sites

HiTech-SP    0

HiTech-SP
Postado 

<%if request.form("select2")<>"" and LCase(request.form("button"))="salvar" then'aki você inicia o insertelseif (request.form("select2")<>"" and LCase(request.form("button"))="salvar") then'aki você faz uma pagina de visualizaçãoid_do_vendedor=Request.Form("select2")'ai você faz o select e talz para a visualizaçãoelseif (request.form("select2")="" and LCase(request.form("button"))="") then'se o select2 e o button estao nulos é sinal que ele esta visualizando a pagina pela primeira vez%><!--#include file="verifica.asp" --><html><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body><%set conexdados = server.createObject ("ADODB.Connection")conexdados.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("dados.mdb")set rs=server.createobject ("adodb.recordset")set rs02=server.createobject ("adodb.recordset")set rs03=server.createobject ("adodb.recordset")%><table width="100%" border="0"><tr>  <td height="25" background="imagens/barra02.jpg"><font color="#FFFFFF" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong>Arquivo     | Cadastros | Fornecedores | Vendedores | Clientes | Pedidos | Cobranças     | Custos</strong></font></td></tr></table><form name="form" id="form" method="post" action="teste.asp"><table width="100%" border="0">  <tr bgcolor="#FFFFFF">     <td height="25" colspan="10" bgcolor="#0000FF"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">@       Novo Pedido - </font></td>  </tr>  <tr>     <td width="11%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Fornecedor:</font></td>    <td width="27%"><input type="text" name="textfield"></td>    <td width="12%"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Tipo:</font></td>    <td width="30%"><select name="select4">      </select></td>    <td width="3%"> </td>    <td width="3%"> </td>    <td width="3%"> </td>    <td width="3%"> </td>    <td width="3%"> </td>    <td width="5%"> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Emisão:</font></td>    <td><input type="text" name="textfield2"></td>    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> </font></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cliente:</font></td>    <td><select name="select">        <% rs.open "select * from clientes", conexdados,3,1  while not rs.eof%>        <option>         <%response.Write rs("cliente")%>        </option>        <%rs.movenextwend%>      </select>      <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"> </font></strong></td>    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>    <td><input type="text" name="textfield4"></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Vendedor:</font></td>    <td><select name="select2">        <%rs02.open "select * from vendedores", conexdados,3,1  while not rs02.eof%>        <option ><%= rs02("vendedor")%></option>        <%rs02.movenextwend%>      </select> <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="#" onClick="form.submit()">Visualizar</a></font></strong></td>    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Região:</font></td>    <td><input type="text" name="textfield5"></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">[b]Transportadora:</font></td>    <td><select name="select3">        <%rs03.open "select * from transp", conexdados,3,1  while not rs03.eof%>        <option><%= rs03("transportadora")%></option>        <%rs03.movenextwend%>      </select>[/b] <strong><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Ver       Histórico</font></strong></td>    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Comprador:</font></td>    <td><input type="text" name="textfield6"></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cond. Pgto.</font></td>    <td><input type="text" name="textfield3"></td>    <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Descontos:</font></td>    <td><input type="text" name="textfield7"></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Observações:</font></td>    <td colspan="3"><textarea name="textarea" cols="65"></textarea></td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>    <td> </td>  </tr>  <tr>     <td height="26" colspan="10" bgcolor="#0066FF"><input type="button" name="button" value="Salvar"></td>  </tr></table></form><p> </p><%rs.closers02.closeset rs = nothingset rs02 = nothingconexdados.closeset conexdados = nothingend if 'fecha o if lah de cima, o primeiro if da pagina%></body></html>

agora está arrumado !!

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