<% If Len(Trim(Request.Form("visitor_name"))) > 0 OR Len(Trim(Request.Form("visitor_email"))) > 0 OR Len(Trim(Request.Form("visitor_location"))) > 0 OR Len(Trim(Request.Form("visitor_comments"))) > 0 Then strMessage = "" strEmail = Trim(Request.Form("visitor_email")) If Len(Trim(Request.Form("visitor_name"))) > 0 Then strMessage = strMessage & "Visitor name: " & Trim(Request.Form("visitor_name")) & vbCRLF Else strMessage = strMessage & "Visitor name: (anonymous)" & vbCRLF End If If Len(Trim(Request.Form("visitor_location"))) > 0 Then strMessage = strMessage & "From: " & Trim(Request.Form("visitor_location")) & vbCRLF End If If Len(strEmail) > 0 Then strMessage = strMessage & "Email address: " & strEmail & vbCRLF Else strEmail = "losvengadores@theavengers.tv" End If strMessage = strMessage & "Date: " & Now() & vbCRLF & vbCRLF If Len(Trim(Request.Form("visitor_comments"))) > 0 Then strMessage = strMessage & "Comments: " & Trim(Request.Form("visitor_comments")) & vbCRLF & vbCRLF End If If Len(Trim(Request.Form("pubComments"))) > 0 Then strMessage = strMessage & "(OK to publish comments)" & vbCRLF End If If Len(Trim(Request.Form("pubEmail"))) > 0 Then strMessage = strMessage & "(OK to include email address)" End If Set objEmail = CreateObject("CDONTS.NewMail") objEmail.From = strEmail objEmail.To = "losvengadores@theavengers.tv" objEmail.Subject = "Los Vengadores Feedback" objEmail.Body = strMessage objEmail.Send Set objEmail = Nothing Response.Redirect "http://losvengadores.theavengers.tv/feedback.htm" End If %> Los Vengadores Feedback Form
 


Podés enviarnos un e-mailYou can send us an e-mail

O usar este formulario – Or use this form

Tu nombre
Your name

Tu dirección de e-mail
Your e-mail address

 ¿De dónde sos?
Where are you from?

Comentarios
Comments

Danos el OK para
Please check

Publicar tus comentarios
OK to publish comments

Publicar tu dirección de e-mail
OK to publish e-mail addres