AYUDA NECESITO

02/06/2004 - 02:02 por Mariano | Informe spam
Quiero que me llege un formulario por mail alguien tiene el codigo
 

Leer las respuestas

#1 Hc
02/06/2004 - 15:57 | Informe spam
Te paso este codigo, es sencillo

<%@ LANGUAGE="VBSCRIPT" %>
<script LANGUAGE="VBScript" RUNAT="Server">
'declaracion de constantes
Const StrToemail = ""
Const correo = ""
Const strSubject = "Informacion de Formulario"

'declaracion de variables
Dim strnombreyapellido, strEdad, strSexo, strMensaje

'obtengo los datos del formulario
strnombreyapellido = Request.form("nombreyapellido")
strEdad = Request.form("Edad")
strSexo = Request.form("Sexo")

'cosntruyo el contenido del mail
strMensaje = strnombreyapellido & "<br><br>" & strEdad
& "<br><br>" & strSexo

'envio el mail
SendMail StrToemail,strMensaje,StrSubject,destinatario

'-

' Mails
'-

Sub SendMail(StrToemail,strMensaje,StrSubject,destinatario)
Set objNewMail = Server.CreateObject("CDO.Message")
objNewMail.From = StrToemail
objNewMail.To = destinatario
objNewMail.Subject = StrSubject
objNewMail.HTMLBody = strMensaje
objNewMail.Send
Set objNewMail = Nothing
End Sub
</script>
Quiero que me llege un formulario por mail alguien tiene


el codigo


.

Preguntas similares