<b>Segnala questa pagina ad un amico</b><br /> <form method="post"> E-mail del tuo amico: <input name="e-mail"><br> Tuo nome: <input name="fromName"><br> Tua e-mail: <input name="from"><br> Testo: <textarea name="Text></textarea><br> <input type="hidden" name="url" value="<%=Request.ServerVariables("HTTP_REFERER")%>"> <input type="submit"> </form> <% if len(Request.Form)>0 then Set objMail = Server.CreateObject("CDONTS.NewMail") strFrom = request("fromName") & "<" &_ request("from") &">" strUrl = request("url") strTxt = request("Text") & VbcrLf & _ "--" & strUrl objMail.From = strFrom objMail.Body = strTxt objMail.To = Request("e-mail") objMail.Subject = "Ti segnalo questo sito!" objMail.Send set objMail = nothing Response.write "<p>Segnalazione effettuata con successo!</p>" end if %>
Supponendo di chiamare questa pagina "segnala.asp" bisognerà creare un link che punti a questa pagina dalla pagina che si intende segnalare. In questo modo infatti verrà ricavato l'indirizzo di provenienza in maniera automatica, come spiegato nello script #200 .
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
Approfondimenti
Nessuna risorsa collegata
I più letti di oggi
- Aggiungere il metodo SelectMany alla classe Array in TypeScript
- Usare gateway dedicati con Azure Cosmos DB per migliorare le prestazioni
- Recuperare i Popup aperti in una Windows Store app
- AI&ML Conf 2020 - Online
- Preview 4 per ASP.NET MVC
- Speciale Windows Store app: costruire app con WinRT per Windows 8
- Microsoft Security Bulletin MS02-050
- Microsoft Security Bulletin MS04-033
- Attivare l'output caching su ASP.NET Web API
- Ottimizzare l'utilizzo di banda tramite ETag in ASP.NET Core Web API