dati da db, campi vuoti da compilare e invia

**David_pop** · 06-12-2005, 12:47

in una pagina asp raccolgo dei dati dal db, ma ci sono anche due campi modulo vuoti che vanno compilati al momento. Inoltre vi è un bottone "invia" che premuto invia mail con i dati elencati in pagina.. che script posso usare in tale pagina?

**maximum** · 06-12-2005, 12:51

Non vorrei ricordare male, ma mi sembra che avevi già proposto questo quesito ed io, sempre se non ricordo male, ti dissi che dipendeva dal server sul quale girano le ASP.
In funzione di esso puoi decidere se adottare CDONTS o CDOSYS.

**David_pop** · 06-12-2005, 12:54

Aruba..

**maximum** · 06-12-2005, 12:57

CDOSYS.

**David_pop** · 06-12-2005, 12:59

ho trovato un code cdosys ma è immensamente lungo e un po complicato.. ci sono diversi modelli?

**maximum** · 06-12-2005, 13:00

Vediamo questo codice?

[EDIT]:

Questo è un esempio di CDOSYS che io uso su Aruba e mi funziona perfettamente:

codice:

<%
' istanzio le costanti per invio
DIM iMsg, Flds, iConf
		
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
		
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update							

'QUI RECUPERI I CAMPI DELLA FORM

'compone e spedisce la mail 
strFrom = "A TUO PIACIMENTO"
sBody = "QUI DEFINISCI IL CORPO DELLA MAIL (con i parametri recuperati dalla form)"

With iMsg
     Set .Configuration = iConf
     .To = "QUI LA MAIL DEL DESTINATARIO"
     .From = strFrom
     .Sender = "QUI LA MAIL DEL MITTENTE"
     .Subject = "Quello che vuoi"
     .HTMLBody = "" & sBody & ""
     .Send
End With
%>

A questo link un altro esempio: http://www.weppos.com/asp/script/scr....asp?script=17

**David_pop** · 06-12-2005, 13:09

<%@ Language=VBScript %>
<% Response.Expires = 0 %>
<HTML>
<head>
<title>CDONTS Mail</title>
<style type="text/css">

</style>
<SCRIPT language="JavaScript">

</SCRIPT>

</head>
<body>
CITICoRD - Esempio di mail spedita da W3.UNIROMA1.IT utilizzando NewMail Object
(CDONTS Library) di <sup>©</sup>Microsoft
<hr size="1" noshade>
<%if Request("Send")="send" then
On Error Resume Next
Set Mail = CreateObject("CDONTS.NewMail")
If Err <> 0 Then
MailCode=Err.Description
else
Mail.To = Request("TO")
Mail.From = Request("FROM")
Mail.Subject = Request("SUBJECT")
Mail.Body = "Ecco la mail spedita con CDONTS" & Chr(13) & Chr(10) & _
" nominativo: " & Request("NOMINATIVO") & Chr(13) & Chr(10) & _
" indirizzo : " & Request("INDIRIZZO") & Chr(13) & Chr(10) & _
" cap : " & Request("CAP") & Chr(13) & Chr(10) & _
" comune : " & Request("COMUNE") & Chr(13) & Chr(10) & _
" provincia : " & Request("PROVINCIA") & Chr(13) & Chr(10) & _
" e-mail : " & Request("EMAIL") & Chr(13) & Chr(10) & _
" telefono : " & Request("TELEFONO") & Chr(13) & Chr(10) & _
" fax : " & Request("FAX") & Chr(13) & Chr(10) & _
"commenti: " & Chr(13) & Chr(10) & _
Request("COMMENTI") & Chr(13) & Chr(10)

On Error Resume Next
Mail.Send
If Err <> 0 Then
MailCode=Err.Description
else
MailCode="La mail è stata spedita"
end if
set Mail=nothing
end if
end if
%>
<FORM action="CDONTSMail.asp" method=post name="mailer" onsubmit="return CheckMail()">
<input type="hidden" name="send" value="send">
<table align="center" width="700">
<tr>
<td valign="top">
<table bgcolor="ffffff">
<tr>
<td colspan=2 align="center" class="headb2">Campi di controllo per
l'invio della EMail</td>
</tr>
<tr align="center">
<td colspan=2 bgcolor="#F7F7F7" class="Box">Normalmente queste proprietà
dell'oggetto NewMail vengono impostate dal WebMaster in un elemento
INPUT con l'attributo TYPE=HIDDEN e non sono quindi né visibili
né modificabili dall'utente. Per una descrizione completa e dettagliata
delle proprietà di NewMail si rimanda a <a href="http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdo/html/_denali_newmail_object_cdonts_library_.asp" target="_blank">NewMail
Object (CDONTS Library)</a> cliccando qui sotto sul relativo nome
della proprietà.</td>
</tr>
<tr valign="middle"><td class="Lab1" nowrap align="center"><font color="#333333">proprietà</font></td>
<td class="Lab1" nowrap align="center"><font color="#333333">settaggio predefinito nell'esempio</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">To (richiesto) </td>
<td><INPUT size=40 name="To" value="immettere il proprio indirizzo e-mail" maxlength="50"></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">From (richiesto) </td>
<td class="Box"><font color="#990000"><INPUT type="hidden" name="From" value="cdonts.webmail@uniroma1.it">cdonts.webmail@ uniroma1.it</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Subject</td>
<td class="Box"><font color="#990000"><input type="hidden" name="Subject" value="Test NewMail Object (CDONTS Library)">Test NewMail Object (CDONTS Library)</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Bcc</td>
<td class="Box"><font color="#999999"> non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">BodyFormat</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Cc</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">ContentBase</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">ContentLocation</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Importance</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">MailFormat</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Value</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
<tr>
<td bgcolor="f0f0f0" class="Lab1">Version</td>
<td class="Box"><font color="#999999">non definito</font></td>
</tr>
</table>
</td>
<td width="30"></td>
<td valign="top" align="right">
<table bgcolor="#FFFF00" class="tblbord">
<tr bgcolor="#FFFFF0">
<td colspan=2 align="center" class="headb2">Queste sono le informazioni inviate costruendo la proprietà <font color="#FFFFFF">Body</font> della mail con i campi della Form in tabella qui sotto</td>
</tr>
<tr>
<td class="lab1" nowrap>Nominativo: </td>
<td> <INPUT size=30 name="Nominativo" value="Mario Rossi" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Indirizzo: </td>
<td> <INPUT size=30 name="Indirizzo" value="Via Giuseppe Verdi, 75" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Cap: </td>
<td> <INPUT size=30 name="Cap" value="11999" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Comune: </td>
<td> <INPUT size=30 name="Comune" value="Roma" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Provincia: </td>
<td> <INPUT size=30 name="Provincia" value="Roma" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">EMail: </td>
<td> <INPUT size=30 name="EMail" value="mario.rossi@roma.it" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Telefono: </td>
<td> <INPUT maxlength="30" size="30" name="Telefono" value="0680808080"></td>
</tr>
<tr>
<td class="lab1">Fax: </td>
<td> <INPUT size=30 name="Fax" value="0680808081" maxlength="30"></td>
</tr>
<tr>
<td class="lab1">Commenti:</td>
<td> <textarea name="Commenti" cols="32" rows="3" wrap="PHYSICAL">Per la documentazione completa di FormMail si rimanda a CDO for NTS (http://msdn.microsoft.com/library/de...s_library_.asp) su MSDN Library di Microsoft (http://msdn.microsoft.com) </textarea></td>
</tr>
</table>

<input type="submit" value ="invia e-mail" class="testo" name="submit">
</p>
</td>
</tr>
<tr>
<td colspan=3 align="right"></td>
</tr>
</table>
</FORM>
<div align="center"> Per la documentazione completa di CDONTS si rimanda a <a href="http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdo/html/_denali_newmail_object_cdonts_library_.asp" target="_blank">NewMail
Object (CDONTS Library)</a> su <a href="http://msdn.microsoft.com/default.asp">MSDN
Library</a> di <sup>©</sup>Microsoft

</div>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr height="10" valign="bottom">
<td colspan="2" width="100%">
<div align="left">back</div>
</td>
<tr>
<tr height="1" valign="bottom"><td colspan="2" width="100%"><hr size="1" color="#666666"></td>

<tr>
<td width="50%" class="footer">ultimo aggiornamento 24/03/2003 </td>
<td width="50%" align="right" valign="middle" class="footer">mailto:w3.staff@uniroma1.it</td>
</tr>
<tr height="5" valign="bottom"><td colspan="2" width="100%"></td><tr>
</table>
<%if MailCode <> "" then %>
<SCRIPT language="JavaScript">

</SCRIPT>
<% end if
MailCode="" %>
</BODY>
</HTML>

**maximum** · 06-12-2005, 13:11

Mi sa che non hai letto il mio [EDIT] precedente....lo riquoto:

[EDIT]:

Questo è un esempio di CDOSYS che io uso su Aruba e mi funziona perfettamente:

codice:

<%
' istanzio le costanti per invio
DIM iMsg, Flds, iConf
		
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
		
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update							

'QUI RECUPERI I CAMPI DELLA FORM

'compone e spedisce la mail 
strFrom = "A TUO PIACIMENTO"
sBody = "QUI DEFINISCI IL CORPO DELLA MAIL (con i parametri recuperati dalla form)"

With iMsg
     Set .Configuration = iConf
     .To = "QUI LA MAIL DEL DESTINATARIO"
     .From = strFrom
     .Sender = "QUI LA MAIL DEL MITTENTE"
     .Subject = "Quello che vuoi"
     .HTMLBody = "" & sBody & ""
     .Send
End With
%>

A questo link un altro esempio: http://www.weppos.com/asp/script/scr....asp?script=17

**David_pop** · 06-12-2005, 13:14

questo visto.. ma senti io ho delle celle che prendono dei dati da dei campi del db, ed altri campi moduli dove ci scrivo direttamente dalla pagina.., come faccio ad inviare poi tutto?

**maximum** · 06-12-2005, 13:16

Scusami, ma i tuoi campi (presi dal DB e compilati dall'utente), suppongo siano racchiusi da una form, no?
Se non lo sono, devono esserlo, altrimenti come passi a valori alla pagina di invio mail?

Discussione: dati da db, campi vuoti da compilare e invia

Strumenti discussione

Ricerca discussione

Visualizza

dati da db, campi vuoti da compilare e invia

Permessi di invio