11 messaggi dal 29 dicembre 2008
Salve,
ho 3 pagine in html che contengono ognuna lo stesso form composto da 5 campi nelle quali solo l'ultimo form è diverso per ognuna di esse.
Mi spiego meglio,
nella prima pagina html i campi sono: a,b,c,d,e (lettere fittizie)
nella seconda: a,b,c,d,f
nella terza: a,b,c,d,g
quindi se dico "a" nell'istruzione Request.Form mi riferisco a tutti e 3.
Ho successivamente creato un unico file in asp (nominato invmail.asp) che gestisce appunto l'invio della mail completa di tutti i campi del form in modo formattato.

Ora il problema è questo:
utilizzando l'if > then > else non riesco a far funzionare + di 2 form. Se ne inserisco un terzo con elseif o con else mi da errore in asp.

Lo script è questo:

<%
nome = Request.Form("nome")
citta = Request.Form("citta")
Email = Request.Form("Email")
conosciuto = Request.Form("conosciuto")

if Request.Form("fcomm") then Preghiera = "Commento: " + Request.Form("commento")
else
if Request.Form("ftesti") then Preghiera = "Testimonianza: " + Request.Form("testimonianza")
else
Preghiera = "Preghiera: " + Request.Form("Preghiera")


econtr = "@"


Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "mail.madonnadizaro.it"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update


Messaggio = "Nome: " + nome + vbcrlf + "Città: " + citta + vbcrlf + "Email: " + Email + vbcrlf + "Conosciuto:" + conosciuto + vbcrlf + Preghiera + vbcrlf



if (Ubound(Split(Email,econtr)) > 1) OR (Ubound(Split(Preghiera,"http:")) >= 1) Then

Response.write("Email o testo non valido.")


else



With iMsg
Set .Configuration = iConf
.To = "info@madonnadizaro.it"
.From = "md@olimontel.it"
.Subject = "Email da madonnadizaro"
.TextBody = Messaggio
.Send
End With

Response.write("<META HTTP-EQUIV=""Refresh"" CONTENT=""2;URL=/"">")
Response.write("Email Inviata")
end if


%>

Io credo che il problema sia nell'if, ma ho provato e riprovato e non trovo una via d'uscita.
Ho anche provato a creare un secondo file in asp che mi gestisca solo l'invio di un terzo form. Copiandolo uguale a questo e cambiando solo l'if, ma non funziona.
Gentilmente potreste aiutarmi?
Grazie
301 messaggi dal 31 maggio 2006
ciao
hai scritto

if Request.Form("fcomm") then Preghiera = "Commento: " + Request.Form("commento") 
else 
if Request.Form("ftesti") then Preghiera = "Testimonianza: " + Request.Form("testimonianza") 
else 
Preghiera = "Preghiera: " + Request.Form("Preghiera") 


ma forse volevi scrivere
if Request.Form("fcomm") then 
  Preghiera = "Commento: " + Request.Form("commento") 
elseif Request.Form("ftesti") then 
  Preghiera = "Testimonianza: " + Request.Form("testimonianza") 
else 
  Preghiera = "Preghiera: " + Request.Form("Preghiera") 
end if

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.