ricevere una email dal web e inviare una risposta con allegato

[gianluigidibell]

Sono un nuovo iscritto, filalmente, sono mesi che vi leggo con estremo interesse e piacere. Ho una grande passione quella di imparare sempre software nuovi. In questo periodo mi sto dedicando a dreamweaver 8. Stupendo, e sto iniziando a scrivere in asp. Ora vi chiedo un aiuto perchè sto cercando di realizzare: l'utente dal web mi compila il campo email e descrizione (in questo modo mi invia il modulo per posta) nello stesso momento vorrei che lui ricevesse una mia email di conferma con una foto-testo o altro allegato.
Io ho scritto:
<%
theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")= 2
cdoConfig.Fields.Item(theSchema & "smtpserver")="mail.il mio sito"
cdoConfig.Fields.Update
set cdoMessage=Server.createObject("CDO.Message")
cdoMessage.Configuration=cdoConfig
cdoMessage.From=Request.Form("email")
cdoMessage.To="pippo@pippo.it"
cdoMessage.Subject=("ti ho scritto")
CdoMessage.TextBody=Request.Form("testo")
Set cdoMessage=Nothing
Set cdoConfig=Nothing
%>
Questo mi permette di ricevere la mia email dal sito, sottolineando che i campi email e testo sono in un modulo POST. Ma come posso fare per far si che mi invii in più una email da "pippo@pippo.it" a requestform"email".
Ho visto alcune richieste (che ho provato ma non ci sono riuscito) già presenti sul forum ma non utilizzan questa diciamo "sintassi che ho usato io"
grazie

 

[lukeonweb]

Oltre alla proprietà To esistono anche Cc e Bcc

Articoli ASP - Email - ASP Center

Ciao!

 

[gianluigidibell]

ho provato con

Grazie per avermi risposto, il link è molto utile.
Nel frattempo ho provato cosi:
<%
Dim iMsg, iConf, Flds

'Crea l'oggetto email
Set iMsg = CreateObject("CDO.Message")
'Crea l'oggetto configurazione
Set iConf = CreateObject("CDO.Configuration")
'Impostazione delle configurazioni per l'invio remoto
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True

'Spedizione: mittente, destinatario, oggetto, messaggio
mittente = "pippo@pippo.it"
destinatario = Request.Form ("email")
oggetto = "Invio foto "
messaggio = "la foto è inviata"

With iMsg

'Assegnazione delle configurazioni
Set .Configuration = iConf

.From = mittente
.To = destinatario
.Subject = oggetto

'Formato HTML
.HTMLBody = messaggio
'Formato testo (scegliere)
.TextBody = messaggio

'Invio con allegato
.AddAttachment server.mappath("foto.png")

'Invia l'email
.Send()

end with

set Flds = Nothing
set iConf = Nothing
set iMsg = Nothing
%>
<%
theSchema="http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "sendusing")= 2
cdoConfig.Fields.Item(theSchema & "smtpserver")="mail.sito"
cdoConfig.Fields.Update
set cdoMessage=Server.createObject("CDO.Message")
cdoMessage.Configuration=cdoConfig
cdoMessage.From=Request.Form("email")
cdoMessage.To="mio indirizzo"
cdoMessage.Subject=Request.Form("invio foto")
CdoMessage.TextBody=Request.Form("testo")
cdoMessage.Send
Set cdoMessage=Nothing
Set cdoConfig=Nothing
%>
ed ho visto che funziona, mettere 2 variabili cdo config e dim puo causare dei problemi?