Visualizzazione dei risultati da 1 a 8 su 8
  1. #1

    Non ripetere campo identico per più records

    Ciao,
    Ho la necessità di visualizzare i turni delle farmacie riportati in un database il cui risultato per esempio può essere

    Data Farmacia Indirizzo
    _________ ______________ ___________
    01/04/2011 Farmacia Bianchi Via Tizio, 1
    01/04/2011 Farmacia Rossi Via Caio, 2
    01/04/2011 Farmacia Verdi Via Sempronio,3

    02/04/2011 Farmacia Pippo Via Roma, 7

    03/04/2011 Farmacia Pluto Via Venezia,8


    Vorrei poter visulizzare nel campo "Data", quando la data è identica" solamenmte una volta i giorni che sono uguali.
    Mi spiego megio. Vorrei mi uscisse così:


    Data Farmacia Indirizzo
    _________ ______________ ___________
    01/04/2011 Farmacia Bianchi Via Tizio, 1
    Farmacia Rossi Via Caio, 2
    Farmacia Verdi Via Sempronio,3

    02/04/2011 Farmacia Pippo Via Roma, 7
    03/04/2011 Farmacia Pluto Via Venezia,8

    Ho provato a cambiare l'interrogazione del DB a spostare "move.next" ma ..niente da fare.
    Il codice di base è il seguente:
    <%
    Data=request.querystring("Data")
    Farmacia=request.querystring("Farmacia")
    Indirizzo=request.querystring("Indirizzo")
    %>

    <%
    sql="select * from Turni2011 where Data between #04/01/2011# AND #04/30/2011# order by Data asc"
    %>

    <%
    set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("database/farmacie.mdb")
    set rs=Conn.Execute(sql)
    %>

    <table width="100%" border="1" cellspacing="0" cellpadding="4">
    <tr>
    <td width="10%">Data</td>
    <td width="50%">Farmacia</td>
    <td width="40%">Indirizzo</td>
    </tr>


    <%
    Do while not rs.EOF
    i=i+1
    if intVolta="1" then
    intVolta="0"
    intSfondo="#EFF4F7"
    else
    intVolta="1"
    intSfondo="#FFFFFF"
    end if
    %>


    <tr bgcolor="<%=intSfondo%>">
    <td width="10%"><%response.write rs("Data")%></td>
    <td width="50%"><%response.write rs("Farmacia")%></td>
    <td width="40%"><%response.write rs("Indirizzo")%></td>
    </tr>

    <%
    RS.MoveNext
    Loop
    RS.Close
    Conn.Close
    %>

    </table>

    Qualche consiglio? Grazie

  2. #2
    tieniti da parte il valore che vuoi non venga ripetuto; se è uguale al precedente semplicemente non lo stampi

  3. #3
    Ciao, scusami, non ho capito cosa intendi con "tieni da parte" ...

  4. #4
    Ho provato anche ad utilizzare "group by data" ma non funge

  5. #5
    Originariamente inviato da luar
    Ciao, scusami, non ho capito cosa intendi con "tieni da parte" ...
    nel ciclo, memorizzi il valore in una variabile di comodo

  6. #6
    Scusa l'ignoranza ma non mi è assolutamente chiaro.

    I valori devono essere tutti visualizzabili.
    L'unico mio problema è quello che nella tabella che si visualizza se, per esempio la data è uguale per tre records, le tre celle con la data compaiono come si ci fosse una specie di "unione celle" facendomi vedere una sola volta la data e di seguito nelle altre celle della tabella ovviamente i dati che non sono in comune.

    Allego un'immagine d'esempio.

  7. #7
    codice:
    comodo=''
    do
    ....
       if rs("campo")=comodo then
          ' cella vuota
       else
          ' cella piena
       end if
       comodo=rs(campo")
       ' stampo gli altri campi
       rs.movenext
    loop
    that easy!

  8. #8
    Perfetto!!!!!!!

    Grazie mille!! Ci sono riuscito! Funziona perfettamente.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.