if else

[iperuber]

ho un modulo per inviare mail.
Vorrei fare questo:

se la mail è stata inserita -> Request.Form("email") non è una stringa nulla -> msg.From = Request.Form("email")
altrimenti -> msg.From = nessuna_mail_inserita@mail.com

quale è la sintassi corretta in asp per ottenere questo?

[rey89]

puoi essere + chiaro?

[Fichico]

if IsNull(request.form("email")) or request.form("email") = "" then
mail_da = "nessuna_mail_inserita@mail.com"
else
mail_da = request.form("email")
end if

....

msg.From = mail_da

....

ti consiglio vivamente cmq di mettere un controllo js nel submit della form che verifica se l'indirizzo email, qualora sia inserito, sia corretto,o ancor meglio rendere obbligatorio quel campo!

[iperuber]

il controllo js l'ho già inserito nel form e funziona così: verifico se ho inserito un recapito telefonico o un indirizzo mail ma almeno uno dei due deve esserci. E fin qua tutto ok. Ho un problema nella pagina asp e sarebbe:
se invio un form con soltanto un recapito telefonico il sistema mi dice 'mail inviata' ma in realtà non arriva mai niente; se invece metto il campo mail la mail arriva correttamente. Ecco perchè vorrei impostare una mail fittizia in modo da farlo funzionare anche col recapito telefonico.
Mi viene il dubbio se JMail, CDONTS o simili necessitano obbligatoriamente del mittente della mail per essere inviate. Qualcuno potrebbe confermare o disdire quaesta affermazione?

[Fichico]

beh per ovviare al problema, dato che la mail arriva a te se e' nel tuo sito, falla mandare dal tuo indirizzo email

[iperuber]

si ok,
ma come distinguere se l'utente ha inserito la mail e pertanto utilizzare la sua oppure utilizzare la mia se ha preferito inserire un recapito?

Ho provato if che mi hai dato:

dim strEmail


if IsNull(request.form("email")) or request.form("email") = "" then
strEmail = nd@nd.nd
else
strEmail = Request.Form("email")
end if

msg.From = strEmail

ma ricevo un 500 internal server che come sappiamo si verifica quando il codice asp è scritto male!
é una cazzata, ma ...

[iperuber]

ahhh, finalmente!

dim strEmail

if (IsNull(Request.Form("email")) or Request.Form("email") = "") then
strEmail = "nd@nd.nd"
else
strEmail = Request.Form("email")
end if