Introduzir SQL em um FORM

WEBIER · Março 12, 2010

Tenho o seguinte form:

<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" U-File="../../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p>
<font face="Tahoma"><span style="font-size:8pt;"><b>
        Sessão: 
	<select size="1" name="Classe" class="textbox" id="Classe">
	<option value="Local">Local</option>
  	<option value="Geral">Geral</option>
  	<option value="Estadual">Estadual</option>
  	<option value="Brasil">Brasil</option>
  	<option value="Mundo">Mundo</option>
  	</select>     
        Categoria:
	<select size="1" name="Categoria" class="textbox" id="Categoria">
	<option value="Politica">Politica</option>
  	<option value="Geral">Geral</option>
  	<option value="Esporte">Esporte</option>
  	<option value="Religião">Religião</option>
  	<option value="Politica">Politica</option>
  	</select></b></span></font></p>

<input type="submit" name="submit" value="Exibir"></p>
</form>

ai tenho a sequinte SQL que vai fazer uma filtragem dos dados baseado nos nomes escolhidos nas combobox

Set Conn= server.createobject("adodb.connection")
DSNtest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("dados/dados.mdb")
Conn.Open DSNtest


Set RS= Server.CreateObject("ADODB.Recordset")               'acrescentei por causa da paginação
SQL = "SELECT * FROM noticias WHERE Classe = '" & Request.Form("Classe") & "' and Categoria = '" & Request.Form("Categoria") & "' ORDER BY id desc"

RS.Open SQL, conn, 3

Minha duvida tá em como fazer para clicar no botão EXIBIR e ele executar essa SQL...

Thiago Retondar · Março 12, 2010

Isso vai ser com uma linguagem dinâmica. Está usando qual?

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

WEBIER · Março 12, 2010

uso ASP

Thiago Retondar · Março 12, 2010

Tópico movido:

Webstandards: CSS / XML / XHTML / HTML http://forum.imasters.com.br/public/style_emoticons/default/seta.gif ASP

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

Gilberto Jr · Março 12, 2010

se você for exibir na mesma pagina você vai ter que colocar tudo isso na mesma pagina, e o form tem que ser no method get,

xanburzum · Março 12, 2010

especifique mais sua duvida...

WEBIER · Março 12, 2010

especifique mais sua duvida...

quero que quando clicar no botão EXIBIR ele me mostre os dados filtrados baseando-de nos nomes que estão nos 2 combobox (classe e categoria)

xanburzum · Março 12, 2010

<!--#include file="conn/conexao1.asp"-->

<% call abreconexao

'crio o rs

set rs=Server.CreateObject("ADODB.Recordset")

'crio o SQL

SQL="SELECT * FROM login ORDER BY login"

rs.open SQL,conexao,1,3

%>

</B></FONT></P><TABLE WIDTH="95%" BORDER="0" CELLPADDING="0" CELLSPACING="0" BGCOLOR="#666666" ALIGN="center">

<DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2" COLOR="#FFFFFF">::

Seja Bem-Vindo <%=Ucase(varloginsession)%></FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699">

<TD HEIGHT="10" COLSPAN="2"> <DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#66ffff">Administração

de Usuários</FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="2"> </TD></TR>

AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0','width','80','height','20','src','incluir','quality','high','pluginspage','http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash','bgcolor','#336699','base','.','movie','incluir' ); //end AC code

</script><noscript><OBJECT CLASSID="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" CODEBASE="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" WIDTH="80" HEIGHT="20">

</EMBED> </OBJECT></noscript>

</DIV></TD></TR> </TABLE><TABLE WIDTH="95%" BORDER="1" BORDERCOLOR="#666666" BGCOLOR="#e6e6e6" ALIGN="center">

<TR> <TD WIDTH="16%"> <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Login</B></FONT></DIV></TD><TD WIDTH="15%">

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Senha</B></FONT></DIV></TD><TD WIDTH="25%">

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Email</B></FONT></DIV></TD><TD WIDTH="20%">

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Atualizar</B></FONT></DIV></TD><TD WIDTH="24%">

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Excluir</B></FONT></DIV></TD></TR>

<% while not rs.eof%>

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="atualizar_form_treina.asp?codigo=<%=rs("codigo")%>">Atualizar</A></B></FONT></DIV></TD><TD WIDTH="24%">

<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="excluir_form_treina.asp?codigo=<%=rs("codigo")%>">Excluir</A></B></FONT></DIV></TD></TR>

<% rs.movenext

wend

set rs=nothing

call fechaconexao

%> </TABLE><P><BR></P></RightClick>

</BODY></HTML>

WEBIER · Março 13, 2010

não entendi muito bem!

na verdade queria simplemente clicar num botão e ele executar uma sql.

OBs:

-a SQL está na mesma pagina do botão

-a possui um FORM com 2 COMBOBOX e 1 botão

-a SQL usará o nome exibido nos COMBOBOX para fazer a filtragem dos dados para exibição.

meu primeiro post lá emcima tem +ou- isso que citei.

Gilberto Jr · Março 13, 2010

E ai, entao...

sua pagina vai ser o seguinte,

consulta.asp

<html>
<%
'Aqui voce conecta o banco de dados, eu nao vou postar o codigo de conexao com o banco pois você já deve ter isso pronto ai.

'abaixo declaramos as variaveis
Dim Rs, q, y
'recuperamos valores selecionados no seu formulario.
q = request.querystring("Classe")
y = request.querystring("Categoria")

'selecionamos os dados de acordo com o seu formulario
set Rs = con.execute("SELECT * FROM noticias WHERE Classe = '" &q"' and Categoria = '" &y& "' ORDER BY id desc")
%>
<head>
<title>Conulta</title>
</head>
<body>
<form name="form1" id="form1" action="consulta.asp" method="get">
Sessão: 
        <select size="1" name="Classe" class="textbox" id="Classe">
        <option value="Local">Local</option>
        <option value="Geral">Geral</option>
        <option value="Estadual">Estadual</option>
        <option value="Brasil">Brasil</option>
        <option value="Mundo">Mundo</option>
        </select>     
        Categoria:
        <select size="1" name="Categoria" class="textbox" id="Categoria">
        <option value="Politica">Politica</option>
        <option value="Geral">Geral</option>
        <option value="Esporte">Esporte</option>
        <option value="Religião">Religião</option>
        <option value="Politica">Politica</option>
        </select>
<input type="submit" name="submit" value="Exibir">
</form>
<!--fiz uma tabela abaixo pra mostrar o resultado-->
<table>
<%
while Rs.eof = false
%>
<tr>
<td><%=Rs(TituloNoticia)%></td>
<td><%=Rs(Noticia)%></td>
<td><%=Rs(DataRegistroNoticia)%></td>
</tr>
<%
Rs.movenext
wend
%>
</table>
</body>
</html>

Bom é isso ae, se quiser saber mais é so da uma estudada nesse codigo!

xanburzum · Março 13, 2010

ao clicar no botao , você redireciona para a pagina do action, nesta página, você recupera os dado dos campos

<% 'declaro as var.
     dim conexao, varmsg, rs, SQL, conDBQ, constring, varmsgeof, varloginsession, data
   
   'recupero as var.
   varmsgeof=request.querystring("msgeof")
   varmsg=request.querystring("msg")
   varloginsession=Session("login")
'crio a conexao%>
 <!--#include file="conn/conexao1.asp"--> 
<% call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login ORDER BY login"
  rs.open SQL,conexao,1,3
   %>
    </B></FONT></P><TABLE WIDTH="95%" BORDER="0" CELLPADDING="0" CELLSPACING="0" BGCOLOR="#666666" ALIGN="center"> 
<TR BGCOLOR="#336699"> <TD WIDTH="2%"> <DIV ALIGN="left"><B><IMG SRC="file:///A|/asp/imgs/curva.gif" WIDTH="10" HEIGHT="19"></B></DIV></TD><TD WIDTH="98%"> 
<DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2" COLOR="#FFFFFF">:: 
Seja Bem-Vindo <%=Ucase(varloginsession)%></FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699"> 
<TD HEIGHT="10" COLSPAN="2"> <DIV ALIGN="center"><B><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#66ffff">Administração 
de Usuários</FONT></B></DIV></TD></TR> <TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="2"> </TD></TR> 
<TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="16"> <DIV ALIGN="right"><A HREF="pesquisa_form_treina.asp"><IMG SRC="imgs/busca2.gif" BORDER="0" ALT="Pesquisar na base de dados" WIDTH="78" HEIGHT="21"></A> </DIV></TD></TR> 
<TR BGCOLOR="#336699"> <TD COLSPAN="2" HEIGHT="2"> <DIV ALIGN="right">
        <script type="text/javascript">
AC_FL_RunContent( 'codebase','http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0','width','80','height','20','src','incluir','quality','high','pluginspage','http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash','bgcolor','#336699','base','.','movie','incluir' ); //end AC code
</script><noscript><OBJECT CLASSID="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" CODEBASE="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" WIDTH="80" HEIGHT="20">
          <PARAM NAME="BGCOLOR" VALUE="#336699">
          <PARAM NAME="BASE" VALUE=".">
          <PARAM NAME=movie VALUE="incluir.swf">
          <PARAM NAME=quality VALUE=high>
          <EMBED SRC="incluir.swf" QUALITY=high PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" TYPE="application/x-shockwave-flash" WIDTH="80" HEIGHT="20" BGCOLOR="#336699" BASE="."> 
          </EMBED> </OBJECT></noscript>
         </DIV></TD></TR> </TABLE><TABLE WIDTH="95%" BORDER="1" BORDERCOLOR="#666666" BGCOLOR="#e6e6e6" ALIGN="center"> 
<TR> <TD WIDTH="16%"> <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Login</B></FONT></DIV></TD><TD WIDTH="15%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Senha</B></FONT></DIV></TD><TD WIDTH="25%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Email</B></FONT></DIV></TD><TD WIDTH="20%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Atualizar</B></FONT></DIV></TD><TD WIDTH="24%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#666666"><B>Excluir</B></FONT></DIV></TD></TR> 
<%  while not rs.eof%> 
<TR> <TD WIDTH="16%"> <DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("login")%></B></FONT></DIV></TD><TD WIDTH="15%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("senha")%></B></FONT></DIV></TD><TD WIDTH="25%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><%=rs("email")%></B></FONT></DIV></TD><TD WIDTH="20%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="atualizar_form_treina.asp?codigo=<%=rs("codigo")%>">Atualizar</A></B></FONT></DIV></TD><TD WIDTH="24%"> 
<DIV ALIGN="center"><FONT FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="1" COLOR="#000000"><B><A HREF="excluir_form_treina.asp?codigo=<%=rs("codigo")%>">Excluir</A></B></FONT></DIV></TD></TR> 
<% rs.movenext
  	wend
	set rs=nothing
   call fechaconexao
%> </TABLE><P><BR></P></RightClick> 
</BODY></HTML>

Arquivado

Introduzir SQL em um FORM

Recommended Posts

WEBIER 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Thiago Retondar 18

Compartilhar este post

Link para o post

Compartilhar em outros sites

WEBIER 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Thiago Retondar 18

Compartilhar este post

Link para o post

Compartilhar em outros sites

Gilberto Jr 26

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

WEBIER 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

WEBIER 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Gilberto Jr 26

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

Fixar div até atingir uma certa altura

Ajuda com Extends e envio para o banco

PHP+Codeginiter - Orientação para Impressão

Fóruns

Tempo Real

Informação importante