Domandina su server di posta

[santino83]

Salve,

io ho un sito di un cliente. In questo sito gli utenti possono fare il "contact me" con un form on-line. Come funziona il tutto:

il cliente riempie il form chiedendo quello che vuole e poi la invia. Al momento dell'invio questa richiesta viene inviata ad info@miosito.com e poi viene salvata nel database. Però succede qualcosa di strano:

il cliente dice che spesso gli arrivano email vuote. Ovvero COMPLETAMENTE VUOTE, senza neanche le scritte base del testo "ad esempio: Nome:, Cognome:, Tel:" che non sono riprese dal form.

e poi l'email non viene salvata nel database

ad inizio pagina ho messo un controllo che se i campi che arrivnao dal form sono vuoti fa il redirect...però ste cose arrivano lo stesso.

ma può essere che il server di posta si inpalli e ogni tanto mandi da solo email vuote alla casella di posta elettronica?

lo script se volete lo posso anche postare, ma non penso sia li il problema

[weppos]

Credo che il problema sia lo script.
Non mi è mai successo nulla di simile su alcun mailserver di posta.

[santino83]

'controllo i campi del form (con o senza l'on error succede la stessa cosa)

<%
session.lcid=1040
dim testo
testo=""
On Error Resume Next
%>
<%
'controllo che i campi sensibili non siano fatti di soli spazi
if trim(request.Form("name"))="" or trim(request.Form("lastname"))="" or trim(request.Form("email"))="" or trim(request.Form("phone"))="" then
response.Redirect("contact.asp")
end if

If Request.form("property") <> "" and request.Form("estate")<>"" Then
if trim(request.Form("arrival"))="" or trim(request.Form("departure"))="" then
response.Redirect("contact.asp")
end if
end if
%>

creo la mail

	
		 	Set Mail = Server.CreateObject("Persits.MailSender") 
	
	'Specifichiamo il server SMTP da utilizzare.
	Mail.Host = "69.50.209.10"

	'Indirizzo email del mittente
	Mail.From = Request.form("email")
	
	'specifichiamo adesso l'indirizzo del destinatario
	'e se vogliamo anche il suo nome
	Mail.AddAddress "info@yourtuscany.com"

	'Adesso tocca all'oggetto della mail
	Mail.Subject = "Messaggio da Your Tuscany"
	'Il contenuto della mail in formato testo
	
mail.body="............."

	'Adesso facciamo in modo che se nell'invio della mail
	'si verifica un errore lo script andrà avanti senza interrompersi
	Mail.IsHTML=true
	'Inviamo la mail
	Mail.Send
		If Err.Number <> 0 Then
	 testo="Si è verificato un errore: " & Err.Description
	else

	'puliamo la memoria allocata dall'oggetto
	Set Mail = Nothing

e successivamente la salvo nel database

[Fichico]

negli if anziche' fare i redirect .. imposta a true/false una ulteriore variabile e successivamente fai

if not(ulteriorevariabile) then
mandi la mail
else
fai il redirect
end if

quindi se non sono soddisfatti gli if sarà: ulteriorevariabile = false

oppure la imposti a inizio pagina false e aggiungi un else agli if dove la imposti a true se tutto è ok

occhio che hai 2 if!!!