desde ya muchas gracias para los que puedan brindarme la ayuda que necesito.
principal arriba figura el archivo <script src="include/utilmail.js" language="JavaScript"></script> no lo puse para que no sea tanto texto
Código:
utilmail.js <form action="sendmail.asp" method="post" name="cForm" class="validate" id="cForm" autocomplete="off">
<fieldset class="fmset">
<div class="row">
<label for="fm_name">Nombre y Apellido</label>
<input type="text" class="name req" name="fm_name" id="fm_name" size="40" maxlength="100" tabindex="1" />
</div>
<div class="row">
<label for="fm_email">Email</label>
<input type="text" class="email" name="fm_email" id="fm_email" size="40" maxlength="100" tabindex="2" />
</div>
<div class="row">
<label for="fm_subject">Asunto</label>
<input type="text" class="subject" name="fm_subject" id="fm_subject" size="40" maxlength="100" tabindex="3" />
</div>
<div class="row">
<label for="fm_message">Mensaje</label>
<textarea name="fm_message" cols="100" rows="6" class="message req" id="fm_message" tabindex="4" ></textarea>
</div>
</fieldset>
<fieldset>
<div class="submit">
<div>
<input class="submitbutton" type="submit" value="Enviar" id="enviar" tabindex="5"/>
<input name="form_reset" type="reset" id="Reset" value="Borrar" tabindex="6"/>
<input name="fm_dest" type="hidden" id="fm_dest" value="[email protected]" />
</div>
</div>
</fieldset>
<div id="resultados"></div>
</form>
Código:
sendmail.aspaddEvent(window,'load',inicializarEventos,false);
function inicializarEventos()
{
var ref=document.getElementById('cForm');
addEvent(ref,'submit',enviarDatos,false);
}
function enviarDatos(e)
{
if (window.event)
window.event.returnValue=false;
else
if (e)
e.preventDefault();
enviarFormulario();
}
function retornarDatos()
{
var cad='';
var nom=document.getElementById('fm_name').value;
var ema=document.getElementById('fm_email').value;
var asu=document.getElementById('fm_subject').value;
var men=document.getElementById('fm_message').value;
var dest=document.getElementById('fm_dest').value;
cad='fm_name='+encodeURIComponent(nom)+'&fm_email='+encodeURIComponent(ema)+'&fm_subject='+encodeURIComponent(asu)+'&fm_message='+encodeURIComponent(men)+'&fm_dest='+encodeURIComponent(dest);
return cad;
}
var conexion1;
function enviarFormulario()
{
conexion1=crearXMLHttpRequest();
conexion1.onreadystatechange = procesarEventos;
conexion1.open('POST','sendmail.asp', true);
conexion1.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
conexion1.send(retornarDatos());
}
function procesarEventos()
{
var resultados = document.getElementById("resultados");
if(conexion1.readyState == 4)
{
resultados.innerHTML = 'Gracias por su comentario.';
}
else
{
resultados.innerHTML = 'Enviando...';
}
}
//***************************************
//Funciones comunes a todos los problemas
//***************************************
function addEvent(elemento,nomevento,funcion,captura)
{
if (elemento.attachEvent)
{
elemento.attachEvent('on'+nomevento,funcion);
return true;
}
else
if (elemento.addEventListener)
{
elemento.addEventListener(nomevento,funcion,captura);
return true;
}
else
return false;
}
function crearXMLHttpRequest()
{
var xmlHttp=null;
if (window.ActiveXObject)
xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
else
if (window.XMLHttpRequest)
xmlHttp = new XMLHttpRequest();
return xmlHttp;
}
Código:
<%response.Charset="ISO-8859-1"%>
<%
'Vamos a mandar un mail!
Dim sDestintatario, sAsunto, sCuerpo, sNombre, sRemite
Dim oMail 'el objeto CDO
sNombre=Request("fm_name")
sAsunto=Request("fm_subject")
'Creamos el cuerpo con varias líneas para facilitar la lectura
sCuerpo = "Este es un mensaje de" & sNombre & VbCrLf
sCuerpo = sCuerpo & Request("fm_message")
sDestinatario=Request("fm_dest")
sRemite=Request("fm_email")
'Enviamos el email
Set myMail=CreateObject("CDO.Message")
set oMail=CreateObject("CDO.Message")
'Establecemos las propiedades del objeto
oMail.From =sRemite 'Pon aquí tu mombre y dirección
oMail.To = sDestinatario
oMail.Subject = sAsunto
oMail.TextBody = sCuerpo
' Enviamos el email!
oMail.Send
set oMail = nothing
%>

