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 ..
?