Como agrupar campos en una consulta

Me gustaría agrupar un campo en una consulta y además ordenarlo por fecha.

Mi problema es que cuando realizo la consulta de dos tablas una llamada meses con los campos (numeromes, mes) y la otra lugar con los campos (mes, año, nº factura, concepto importe, id) cuando realizo la consulta lo que quiero es agrupar por mes y ordenar por numero de mes. Hasta aquí todo bien pero el problema viene cuando en la siguiente consulta quiero sacar las facturas del mes seleccionado en el cual no sale nada.

1 respuesta

Respuesta
1

Lo siento pero no te sigo cuando hablas de "en la siguiente consulta...".

Si puedes copia el SQL de la primera y segunda consulta para ver exactamente que quieres hacer y lo que te sucede. Indica también el tipo de datos de los campos numeromes y mes.

Por cierto, no se si tienes algún otro motivo, pero si la tabla meses la tienes solo por tener las equivalencias entre nombre del mes y su número no es necesaria realmente, ya que teniendo uno de ambos datos siempre puedes obtener el otro por medio de las funciones MonthName (devuleve el nombre del mes al pasarle un numero del 1 al 12) y Month (lo contrario al pasarle una fecha...). Por el mismo motivo no es necesario tener ambos campos en una misma tabla.

Cordiales saludos.

El código es el siguiente:

<%@language="vbscript"%>
<% option explicit
   response.buffer %>
 <html>
  <head>
   <title>contabilidad de gastos</title>
    <style type="text/css" media="print">
    #imprime {display:none}
    </style>
    <center>
     <font color=blue size=+5>
      <b>informe de gastos</b>
     </font>
    </center>
  </head><hr><br>
   <center>
    <body bgcolor="#f3e2a3">
     <table border=0>
      <tr>
       <td>
        <% dim m,a,conex,rs,sqltext
         m=request.form("mes")
         a=request.form("ano")
         set conex=server.createobject("adodb.connection")
         conex.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("./bd/contabilidad.mdb")%>
        <table align=center border=0>
         <tr>
          <td>
           <font size=+3><b>consulta</b>
           </font>
          </td>
         </tr>
        </table><br>
        <% set rs=server.createobject("adodb.recordset")
         sqltext="select ano, n_factura, lugar.mes, meses.numeromes from meses inner join lugar on meses.mes = lugar.mes where ano='"&a&"' group by lugar.mes, ano, n_factura, meses.numeromes  order by  meses.numeromes;"
         set rs=conex.execute(sqltext)
         if not rs.eof then %> 
        <table align=center border=1>
         <tr><%do while not rs.eof%>
          <th align=center width="120" bgcolor="#00aaaa">
           <font size=+3>a&ntilde;o
           </font>
          </th>
          <td align=center width="120">
           <font size=+3><%response.write rs("ano")%>
           </font>
          </td>
         </tr>
        </table><br><br>
        <table align=center border=1>
         <tr>
          <th colspan="2" bgcolor="#00aaaa">
           <font size=+2>mes
           </font>
          </th>
         </tr>
         <tr><%do while not rs.eof%>
          <td width="120" align=center>
           <%response.write rs(("mes"))%>
          </td>
          <td align=center>
           <button type="submit"  style="width:auto;height:36px;font-size:10pt;background:#c0c0c0;border-radius:8px;" onclick="location.href='editar5.asp?action=editar5&mes=<%= rs("n_factura")%>'">
            <img src='editar3.png' align='absmiddle' hspace='4'/>consultar
           </button>
          </td>
         </tr><% rs.movenext
           loop %>
        </table><br>
        <table align=center cellspacing="4" cellpadding="8" border=0>
         <tr>
          <td>
           <button type="submit" id="imprime" style="width:auto;height:36px;font-size:10pt;background:#c0c0c0;border-radius:8px; "onclick="location.href='mensual.html'">
            <img src="ok.png" align="absmiddle" hspace='4'/> aceptar
           </button>
          </td>
         </tr>
        </table> 
          <% loop
           end if
           rs.close
           conex.close
           set rs=nothing
           set conex=nothing %>   
       </td>
      </tr>
     </table>
    </body>
   </center>
 </html>
El código del resultado es
<%@language="vbscript"%>
<% option explicit %>
<html>
 <head>
  <title>contabilidad</title>
        <table align=center width=40% bgcolor=#f1f1f1 cellpadding="0" cellspacing="0" border=3>
   <tr align=center>
    <td>
        <font color=black size=+5 face="verdana">
             gastos
                </font>
                </td>
            </tr>
  </table><p>
 </head><hr>
 <body>
  <table align=center border=0>
   <tr>
    <td>
     <% dim conex,sqltext,rs,m,a
      a=request.form("ano")
      m=request.form("mes")
      set conex=server.createobject("adodb.connection")
      conex.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath ("./bd/contabilidad.mdb")%>
     <table align=center cellspacing="6" cellpadding="2" border=0>
      <tr align=center>
       <td align=left><font color=blue size=+3 face="verdana"><u>datos obtenidos</u></font>
       </td>
      </tr>
     </table><br>
     <% set rs=server.createobject("adodb.recordset")
      sqltext="select * from lugar where n_factura='"&request("mes")&"' ;"
      set rs=conex.execute(sqltext)
      if not rs.eof then %>
     <table align=center border=1>
      <tr><%do while not rs.eof%>
       <th width="100" bgcolor="#00ccdde">
        <font size=+2>a&#209;o
        </font>
       </th>
       <td width="140" align=center>
        <font size=+2><%response.write rs("ano")%>
        </font>
       </td>
      </tr>
      <tr>
       <th bgcolor="#00ccdde">
        <font size=+2>mes
        </font>
       </th>
       <td align=center>
        <font size=+2><%response.write rs("mes")%>
        </font>
       </td>
      </tr>
     </table><br>
     <table align=center border=1 >
      <tr align=center bgcolor="#00ccdd">
       <th width="150">n&#186; factura
       </th>
       <th width="140">concepto
       </th>
       <th width="100">importe
       </th>
      </tr>
      <tr><% do while not rs.eof %>
       <td align=center><%response.write rs("n_factura")%>
       </td>
       <td align=center><%response.write ucase(rs("concepto"))%>
       </td>
       <td align=center><%response.write formatnumber(rs("importe"),2)%> &#8364;
       </td>
      </tr>
     </table><br>
     <table align=right border=1>
      <% set conex=server.createobject("adodb.connection")
       conex.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("./bd/contabilidad.mdb") 
       set rs=server.createobject("adodb.recordset")
       sqltext="select sum(importe) as total from lugar where n_factura='"&request("mes")&"' ;"
       rs.open sqltext,conex,1 %>
      <tr>
       <td align=center width="100" bgcolor="#ff2222">
        <font size=+2>total
        </font>
       </td>
       <td align=center width="100">
        <font size=+2><%response.write formatnumber(rs("total"),2)%> &#8364;
        </font>
       </td>
      </tr><% rs.movenext
        loop %>   
     </table><br><br><br>
    <form method="get" action="mensual.html" >
     <table align=center cellspacing="6" cellpadding="2" border=0>
      <tr>
       <td>
        <button type="submit" style="width:auto;height:36px;font-size:10pt;background:#c0c0c0;border-radius:8px; "onclick="location.href='mensual.html'">
         <img src="ok.png" align="absmiddle" hspace='4'/> aceptar
        </button>
       </td>
      </tr>
     </table><br>
     <% loop
      end if
      conex.close
      set conex=nothing %>
    </form>
    </td>
   </tr>
  </table>
 </body>    
</html>

El problema que existe es que todo depende de las facturas y necesitaria una ayuda de como realizarlo.

Un saludo

¡Gracias! 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Como agrupar por mes para que me de el resultado de las facturas

Me gustaría agrupar un campo en una consulta y además ordenarlo por mes. Mi problema es que cuando realizo la consulta de dos tablas una llamada meses con los campos (numeromes, mes) y la otra lugar con los campos (mes, año, nº factura, concepto...
1 respuesta

Suma de cantidades por meses en consulta de access 2010

Con los campos FechaPedido, Clientes, Cantidad, nº albarán, nº factura. Necesito sumar de la columna cantidad, todas las cantidades por nº factura, clientes y meses. Clientes Fecha Pedido cantidad numero albarán n factura juan 1/10/2012 100,00 € 500...
1 respuesta

Buscar con botón facturas en asp clásico

Me gustaría que me ayudaran a resolver el problema de como conseguir visualizar una factura por medio de un botón. Los datos genéricos de la factura los saco en una tabla con el importe, la fecha, el nº de factura, etc y al principio de cada fila con...
1 respuesta

Agrupar vtos en un día concreto en una base de datos en access

Tengo una base de datos en acces que calcula los votos en función de la fecha de fra. Ahora. Quiero agrupar los vtos en un día concreto de cada mes por ejemplo todos los días 5
1 respuesta

Necesito crear un campo que aparezca extraiga el Mes a partir de otro campo que contiene fecha.

Necesito lo que puse en el título por favor, a ver qué experto me puede ayudar... Tengo una tabla donde se ingresa una fecha en un campo. Y lo que quiero es que en otra tabla me coloque en un campo el Mes (con el nombre, así: "Abril", "Marzo") a...
1 respuesta

Hacer operaciones con 2 columnas

Tengo 2 consultas las cuales me dan los meses y valores ejemplo consulta 1 enero 10 febrero 20 marzo 30 ... Etc Consulta 2 Enero 50 Febrero 80 Marzo 90 ... Etc ¿Lo qué busco es que a través de otra consulta genera la suma de las 2 consultas consulta...
1 respuesta

Pasar un campo calculado a una tabla

Siento molestarte, pero como tu resolviste mi duda sobre como calcular la estación del año en función de la fecha introducida en otro campo, quizás puedas ahora ayudarme a que la estación no sólo salga en el formulario sino también en la tabla. En...
1 respuesta

Fechas en Access

Resulta que en una tabla quiero incorporar el mes concreto de una entrega retrasada. Las entregas retrasadas están en un fichero.txt que no incorporan el campo mes, pero si el campo fecha de la entrega. Entonces mediante una consulta, añado a una...
1 respuesta

Agrupar registros según un criterio

Se trata de un programa sencillo de facturación en el que tengo una tabla de albaranes que iré metiendo durante el mes. A final de mes necesito agrupar esos albaranes en una factura por cliente y que les asigne un número correlativo a cada factura, y...
1 respuesta

Consulta sin repeticiones

Cuando hago una consulta de una Tabla Facturas que tiene varias lineas de detalle cada una Me muestra por ej. Nro_Factura ... 1 ... 1 ... 1 Detalle ... Pantalón ... Camisa ... Remera Se puede hacer que solo muestre una vez el número de factura como...
1 respuesta