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

    Valore di un record doppio

    Ciao a tutti
    ho un problema con una query,

    faccio questa richiesta
    sql = "SELECT * FROM RICHIESTE WHERE TIPOASS='ROC' ORDER BY COLLABORATORE"
    Do While not Rs.EOF


    NOME = rs("NOME")
    ID_COLLABORATORI = rs("ID_COLLABORATORI")
    COLLABORATORE = RS("COLLABORATORE")
    FILE = RS("FILE")
    ROC_DATA_OFFERTA = rs("ROC_DATA_OFFERTA")


    quando stampo a video vorrei visualizzare il campo collaboratore solo la prima volta, togliendo quindi da tutte le righe che stampo a video la ripetizione del campo uguale chiaramente laddove uguale visto che ordino per collaboratore.

    come posso fare?


  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    sql = "SELECT * FROM RICHIESTE WHERE TIPOASS='ROC' ORDER BY COLLABORATORE" 
    appo_collaboratore = ""
    Do While not Rs.EOF
    
    NOME = rs("NOME")
    ID_COLLABORATORI = rs("ID_COLLABORATORI")
    COLLABORATORE = RS("COLLABORATORE")
    FILE = RS("FILE")
    ROC_DATA_OFFERTA = rs("ROC_DATA_OFFERTA")
    
    if collaboratore <> appo_collaboratore then
    response.write(collaboratore)
    appo_collaboratore = collaboratore
    end if
    ...
    ...
    Roby

  3. #3

    non va

    non funziona eco il codice per intero così si capisce meglio:

    <%

    Set connessione = Server.CreateObject("ADODB.CONNECTION")
    connessione.Open DBCONNSTRING

    sql = "SELECT * FROM RICHIESTE WHERE TIPOASS='ROC' AND FILE<>'' AND ROC_ACCETTATO='OFFERTA ACCETTATA' ORDER BY NOME_COLLABORATORE"

    Set rs = Server.CreateObject("ADODB.RECORDSET")
    rs.Open sql, connessione, 3, 1
    TOTALE = 0
    appo_collaboratore = ""

    Do While not Rs.EOF


    NOME = rs("NOME")
    ID_COLLABORATORI = rs("ID_COLLABORATORI")
    NOME_COLLABORATORE = RS("NOME_COLLABORATORE")
    FILE = RS("FILE")
    ROC_DATA_OFFERTA = rs("ROC_DATA_OFFERTA")
    ROC_VALORE_OFFERTA = rs("ROC_VALORE_OFFERTA")
    ROC_PROBABILITA = rs("ROC_PROBABILITA")
    ROC_ACCETTATO = rs("ROC_ACCETTATO")
    STATO = rs("STATO")

    if NOME_COLLABORATORE <> appo_collaboratore then

    NOME_COLLABORATORE = NOME_COLLABORATORE

    appo_collaboratore = NOME_COLLABORATORE
    end if



    %>


    <tr>

    <td><%=NOME_COLLABORATORE%> ; <%=NOME%> ; VISUALIZZA LA PROPOSTA; <%=ROC_DATA_OFFERTA%> ; <%=ROC_VALORE_OFFERTA%> ; <%=ROC_PROBABILITA%> ; <%=ROC_ACCETTATO%></td>

    </tr>


    <%

    Rs.MoveNext
    if ROC_VALORE_OFFERTA ="" THEN
    ROC_VALORE_OFFERTA=0
    END IF

    TOTALE = TOTALE+ROC_VALORE_OFFERTA

    Loop

    rs.Close
    Set rs = Nothing

    connessione.Close
    Set connessione = Nothing
    %>

  4. #4
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Questa NOME_COLLABORATORE = NOME_COLLABORATORE non serve a niente.
    Devi stampare dentro la IF
    Se lo fai fuori non serve.

    Roby

  5. #5

    non va lo stesso

    <td><%

    if NOME_COLLABORATORE <> appo_collaboratore then

    NOME_COLLABORATORE = response.write(""&NOME_COLLABORATORE&"")

    appo_collaboratore = NOME_COLLABORATORE
    end if


    %> ; <%=NOME%> ; VISUALIZZA LA PROPOSTA; <%=ROC_DATA_OFFERTA%> ; <%=ROC_VALORE_OFFERTA%> ; <%=ROC_PROBABILITA%> ; <%=ROC_ACCETTATO%></td>

    </tr>

    scusa ma sono proprio rinc... non va lo stesso mi stamap sempre tutti i nomi

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Dubito questa non ti dia errore...


    NOME_COLLABORATORE = response.write(""&NOME_COLLABORATORE&"")

    Ma che roba sarebbe???

    Roby

  7. #7

    nessuno errore

    la uso per stampare il valore DELLA VARIABILE comunque anche con response.write(nome_collaboratore) non funziona...

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 © 2026 vBulletin Solutions, Inc. All rights reserved.