Newsgroup: it.comp.www.asp
Titolo: CDONTS

Buonasera,
ho creato una pagina asp che fa una select su un database access.
Questa pagina invia una mail con il record selezionato.
Il problema è che se la query restituisce tre record invia tre mail
Vorrei invece una mail sola con il risultato dei tre record.
Set link = CreateObject("CDONTS.Newmail")
link.From = "
pi...@nospam.it
"
link.To = "
pl...@nospam.it
"
link.Subject = "SERVIZIO CLIENTI"
link.Body = " Il prodotto da Lei selezionato è presso i seguenti magazzini "
& " " & objrs.fields("CODMAGAZZINO").value &
objrs.fields("DESCRIZIONE").value
link.Send
Set link = Nothing
Grazie per l'attenzione
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Vorrei invece una mail sola con il risultato dei tre record.
Ovviamente hai creato un loop del recordset e al suo interno il codice per
l'invio di mail, quando il codice d'invio mail dovrebbe stare *fuori*.
Se posti il codice con cui leggi il contenuto del recordset e della mail
vediamo se possiamo aiutarti.
Ciao
-- 
AZ [Microsoft - .NET MVP]
Mia Home page: 
http://ciclismo.sitiasp.it
Asp.Net community: 
http://www.aspitalia.com
Il mio blog: 
http://blogs.aspitalia.com/az

 ha scritto nel messaggio
news:62Z94Z84Z244Y1...@usenet.libero.it...


 vediamo se possiamo aiutarti.
<%
dim objConn, strSQL, objRs,
<% Set link = CreateObject("CDONTS.Newmail")
link.From = "
es...@pippo.it
"
link.To = "
pl...@pippo.it
"
link.Subject = "RISULTATO RICHIESTA"
'& " " & objrs.fields("COD").value & "/" & objrs.fields("DESCRIZIONE").value
strSQL = "SELECT TABELLA.* FROM ETABELLA WHERE COD ='" & cod & "'"
set objconn= server.createObject("ADODB.Connection")
objconn.open Application("DB_DataSource")
set objrs = server.createObject("ADODB.Recordset")
objrs.open strSQL,objconn %>
 <% if objrs.eof then %>
 
  <% objrs.close
set objrs = nothing
if not objrs.eof then
do while not objrs.eof
link.Body = link.Body = " Il prodotto da Lei selezionato è presso i seguenti
magazzini "
& " " & objrs.fields("CODMAGAZZINO").value &
objrs.fields("DESCRIZIONE").value
%>
objrs.movenext
loop
end if
objrs.close
set objrs=nothing
objconn.close
set objconn=nothing
 
link.Send
Set link = Nothing
 
%>
 
 <%end if %>
 
Ho cercato di togliere quello che non serve....
Come mi avete suggerito ho messo la creazione della mail prima della select
e il body della mail invece all'interno del ciclo.
Il risulato è una mail con l'ultimo record.
In effetti ha ragione a comportarsi in questo modo perchè la mail viene
inviata al termine dei tre cicli e il body assume i valori dell'ultimo
record. I valori del body cambiano ad ogni ciclo e solo dopo i l'ultimo
ciclo viene inviata la mail.
Il mio obbiettivo è invece quello di inviate il body con tutti i record.
In sostanza data una select su una quey vorrei inviare tutti i record
estratti ad un indirizzo e-mail
Grazie infinitamente.


 %>
L'errore è nella riga "link.Body...".
Dovresti scrivere:
link.Body = link.Body & " Il prodotto da Lei selezionato è presso i seguenti
magazzini "
& " " & objrs.fields("CODMAGAZZINO").value &
objrs.fields("DESCRIZIONE").value & chr(13) & chr(10)



Problema risolto ma ho dovuto creare una variabile z
e poi Link .body =Z
Per sbaglio ti ho scritto link.Body = link.Body nel mio messaggio, era una
prova che avevo cestinato invece ero vicino..
Grazie molte!!!
Leggo molto spesso Aspitalia. Complimenti!
Voglio leggermi al più presto ASP 3.0 per esempi di Daniele Bochicchio
P.S Spero di non mancare alla SMAU


 P.S Spero di non mancare alla SMAU
Se sei interessato all'ASP è un ottimo libro (con questa pubblicità che ti
ho fatto, Daniele devi offrirmi una cena ;) ).



Microsoft 
ASP.NET/.NET
 MVP
http://www.aspitalia.com/
 Enjoy the .NET community!
http://www.dev2dev.it/
 La rete ha connesso nuove particelle!
http://www.extensible.it/
 XML and beyond 

 ho fatto, Daniele devi offrirmi una cena ;) ).
Ho chiamato per acquistare il libro e mi hanno detto che non ce ne sono..
Dove posso trovarlo?
Grazie...


 ho fatto, Daniele devi offrirmi una cena ;) ).
vabbè, segno :D


 difficile, dato che non lo stampano più :(
Ho notato infatti che non si trovano ormai libri su asp..ma solo 
asp.net
Ho acquistato tempo fa
Guida di riferimento
Autori: - A. Keyton Weissinger
Casa Editrice: Apogeo
cercavo qualche cosa di più semplice e discorsivo
forse dovrei iniziare a studiare asp.net....


 forse dovrei iniziare a studiare asp.net....
questo a prescindere dalla difficoltà di reperire libri :)
