Salve...prima di comiinciare devo dirvi che sono un neofita del campo.
Ma da qualche tempo a questa parte sto muovendo i miei primi passi nel campo con buoni risultati.
Al momento ho un sito qui su altervista che sto cercando di rendere più nuovo (il vecchio era ormai obsoleto e fatto in Frontpage) utilizzando Dreamweaver di macromedia e perciò all'interno sto mettendo un pò di roba ASP(visto che ho imparato qualcosa perchè non utilizzarla).
Il problema nasce ora che sto creando la mia pagina dei contatti che è strutturata in questo modo:
Ho creato un modulo con dei campi di testo per nome e oggetto del "contatto" e un area di testo per il messaggio.
Ora avendo avuto il desiderio che questo form mi venisse inviato via email(leggendo un pò in giro) ho utilizzatto l'oggetto CDO.Message messo a disposizione dalla libreria Microsoft. ho inserito tutto il codice ASP necessario (server.createobject(CDO.Message) bla bla bla) per renderlo "attivo" sulla mia pagina.
Al momento dell'invio del form, invece di caricare la pagina di avvenuto invio mi da una pagina di errore.
Come posso risolvere il mio problema?
C'è un modo alternativo supportato dal serve altervista che non sia "mailto:"?
Spero di essere stato chiaro.
Grazie cmq per la vostra attenzione.
P.S.: Se può servire vi metto il codice asp da me scritto e posto nella pagina di avvenuto invio per il form:
Codice:
<%
Dim objCDOMail, objConfig, from, subject, message
from = Request.Form("from")
subject = request.Form("subject")
message = request.Form("message")
response.Write(from & Vbcrlf & subject & vbcrlf & message)
Set objCDOMail=server.CreateObject("CDO.Message")
Set objConfig = Server.createObject("CDO.Configuration")
with objConfig
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.tin.it"
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.update
End With
Set objCDOMail.Configuration = objConfig
objCDOMail.To = "miacrer@virgilio.it"
objCDOMail.From = "giusfez@tin.it"'from
objCDOMail.Subject = subject
objCDOMail.Textbody = message
objCDOMail.Send()
objCDOMail = nothing
objConfig = nothing
%>
se può servire questo è il form in html:
<form name="form1" method="post" action="email_ok.asp">
<table width="23%" border="0" cellspacing="2" cellpadding="4">
<tr>
<td height="28" colspan="3" class="HeaderColor" style="vertical-align: top"><h3>Email Page</h3></td>
</tr>
<tr>
<td width="7%" style="vertical-align: top" class="StoryContentColor"><h4> </h4></td>
<td width="93%" style="text-align: right; vertical-align: top"><table width="27%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="79%" style="text-align: right; vertical-align: top"><label for="from" class="TitleColor"><strong>from:</strong></label>
<input id="from" name="from" type="text" size="50">
</td>
</tr>
<tr>
<td style="text-align: right; vertical-align: top"><label for="subject" class="TitleColor"><strong>subject:</strong></label>
<input id="subject" name="subject" type="text" size="50">
</td>
</tr>
<tr>
<td style="vertical-align: top"><label for="message" class="TitleColor"><strong>message:</strong><br>
<textarea id="message" name="message" rows="10" cols="50" wrap="VIRTUAL"></textarea>
</label>
</td>
</tr>
<tr>
<td><input type="submit" name="Submit" value="Send">
</td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="3" style="vertical-align: top"><hr width="90%" size="1" noshade>
</td>
</tr>
</table>
<div align="center"></div>
</form>