Scusate non so se sia questa la stanza giusta ma dovrei mandare delle email tramite form da aruba.
Ho fatto cosi
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
'On Error Resume Next
Dim strNome,strCognome,strEmail,strNote,strMessage,str Tosend
strTosend="pepigno1975@yahoo.it"
strNome=Request("nome")
strCognome= Request("cognome")
strEmail= Request("email")
strNote= Request("note")
%>
<%
strMessage="Nome: "&strNome&vbcrlf
strMessage=strMessage&"Cognome: "&strCognome&vbcrlf
strMessage=strMessage&"Email: "&strEmail&vbcrlf
strMessage=strMessage&"Messaggio: "&strNote&vbcrlf
Set link = CreateObject("CDONTS.Newmail")
link.From = strEmail
link.To = strTosend
link.Subject = "Richiesta informazioni"
link.Body = strMessage
link.Send
Set link = Nothing
'if err.number then
'response.write "error=true"
'else
'response.write "error=false"
'end
&>
Non so perchè ma non manda nulla
Rispondi quotando
