Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/06/2005, 02:18
Avatar de umdraiga
umdraiga
 
Fecha de Ingreso: diciembre-2001
Ubicación: Aragón España
Mensajes: 128
Antigüedad: 23 años, 4 meses
Puntos: 0
Recogida de datos en formulario

Hola amig@s: El otro día escribí una duda se me contestó pero no soy capaz de ponerlo en marcha
Sé recoger los datos de un formulario pero no sé como hacer para recibir el campo Mensaje que será una carta y debajo irán los datos del formulario (sé recogerlos). Lo que no sé es como hacer para recibir el texto de la carta (Mensaje1)

<%
else
worganizacion=Request.Form("organizacion")
wlocalidad=Request.Form("localidad")
wpais=Request.Form("pais")
wemail=Request.Form("email")
wnombre=Request.Form("nombre")
wprofesion=Request.Form("profesion")
wlocalidad1=Request.Form("localidad1")
wpais1=Request.Form("pais1")
wemail1=Request.Form("email1")
wTexto = "Nombre de la Organizacion: " & worganizacion & VbCrLf & "Localidad: " &wlocalidad & VbCrLf & "Pais: " &wpais & VbCrLf & "Correo electronico: " &wemail & VbCrLf & "Nombre y Apellidos: " &wnombre & VbCrLf & "Profesion: " &wprofesion & VbCrLf & "Localidad: " &wlocalidad1 & VbCrLf & "Pais: " &wpais1 & VbCrLf & "Correo electronico: " &wemail1

mensaje1 = "Sr. D. Presidente"
mensaje1 = mensaje1 & "Esta es una carta"




%>
<h2>
<%

set correo=Server.CreateObject("CDONTS.NewMail")
correo.From ="[email protected]"
correo.To = "[email protected]"
correo.Cc = "[email protected]"
correo.Subject="Carta"
correo.Body= wTexto
correo.mailFormat = 0
correo.Send
set correo= Nothing
Response.Write " Gracias por FIRMAR LA CARTA"


end if
%> </h2>


Muchas gracias por adelantado por vuestra colaboración
__________________
http://www.umdraiga.com
Una causa justa :arriba: