Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it L'avatar di orcim
    Registrato dal
    May 2003
    Messaggi
    1,692

    Invio email dati estratti con una query

    Ciao.

    Tramite una query SELECT ed un ciclo do while ... loop estraggo i seguenti dati:

    codice:
    Recupero = 7,36
    Formazione = 51,33
    Investimenti  = 151,12
    Manutenzione = 230,24
    Sopralluoghi = 20,00
    Varie = 115,00
    Dovrei adesso spedirli via email tramite ASP; ho previsto il codice di invio email con CDOSYS all'interno del ciclo e mi spedisce 6 email ( una per ogni voce estratta, ma dovrebbe essere una sola email con tutti i dati ... )... come risolvo???

    Grazie
    "Ubi Maior, Minor Cessat"
    Domandare è lecito, rispondere è cortesia...
    A tutti è dovuta una risposta, comunque...

    “Dio gradisce molto di più le bestemmie dell’uomo disperato che non le lodi del benpensante la domenica mattina durante il culto“ Martin Lutero

  2. #2
    Ti scorri il Do While e ti ricavi tutti i dati.
    SUCCESSIVAMENTE fuori dal ciclo ti costruisci l'email con i dati ricavati.

    Dopodichè invii l'email.

    Se l'email la invii nel ciclo (che sta scorrendo i singoli risultati) andrà in base al numero di record.



    Comunque posta del codice

  3. #3
    Utente di HTML.it L'avatar di orcim
    Registrato dal
    May 2003
    Messaggi
    1,692
    Grazie x aver risposto; il codice è questo:

    codice:
    SQL = " SELECT * .... "
    
    Set rec = Server.CreateObject("ADODB.Recordset")
    rec.Open SQL, cn
    
    If Not rec.EOF Then
    Do While Not rec.EOF
    
    Response.Write rec("ImpiegoRisorsa")
    
    rec.MoveNext
    Loop
    
    'CODICE DI INVIO EMAIL...
    
    end if
    
    rec.Close()
    set rec = Nothing
    
    cn.Close()
    set cn = Nothing
    L'invio funziona e ricevo un solo msg email... ma come recupero il valore dei dati estratti dalla query ?
    "Ubi Maior, Minor Cessat"
    Domandare è lecito, rispondere è cortesia...
    A tutti è dovuta una risposta, comunque...

    “Dio gradisce molto di più le bestemmie dell’uomo disperato che non le lodi del benpensante la domenica mattina durante il culto“ Martin Lutero

  4. #4
    Ma che cos'è "ImpiegoRisorsa"?
    1 attributo?
    Quanti attributi ha il recordset? E quanti record?

    codice:
    ....
    dim strBodyEmail
    
    SELECT campo1, campo2, campo3 FROM tabella
    
    (oppure SELECT * FROM)
    
    rec.open SQL, Cn, 3, 1
    ...
    
    If not Rs.Eof then 
    
      strBodyEmail = "Ciao " & rec("campo1") & ", oggi sei stato pensato " & rec("campo2") & " volte."
      .....
      'resto della costruzione del corpo dell'email
      ....
    End if
    Comunque non ho capito bene in che forma hai i dati che vuoi inviare.
    La tabella contiene un solo record con i valori dei vari attributi oppure ogni record contiene una serie di attributi che vuoi ricavare?

    Cioè:

    codice:
    Tabella:
    
    id | campo1 | campo2 | campo3 |
    ---------------------------------
    1  | valore1 | valore2  | valore3  |
    
    Corpo Email:
    
    
    Ciao valore1, i dati da te richiesti sono valore2 e valore3!
    Oppure è

    codice:
    Tabella:
    
    id | campo1 | campo2 | campo3 |
    ---------------------------------
    1  | valore1 | valore2  | valore3  |
    2  | valore4 | valore5  | valore6  |
    3  | valore7 | valore8  | valore9  |
    
    Corpo Email:
    
    .. dimmelo tu ..
    ?

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.