ghost
NZ2
 Desconectado
Mensajes: 276
Developer
|
 |
« : 25 de Febrero de 2006, 01:07:29 » |
|
<%@ Page Language="VB" %>
<script runat="server">
' Codigo de pagina aqui!
'
Sub Button1_Click(sender As Object, e As EventArgs)
' Hacemos el mensaje que sera enviado
Dim mailMessage As System.Web.Mai l.MailMessage = New System.Web.Mai l.MailMessage
mailMessage.Fr om = Emet.text
mailMessage.To = Dest.text
mailMessage.Su bject = Suje.text
mailMessage.Bo dyFormat = System.Web.Mai l.MailFormat.T ext
' TODO: Fijamos la caracterÃstica de mailMessage.Bo dy
mailMessage.Bo dy = Corp.text
System.Web.Mai l.SmtpMail.Sen d(mailMessage)
SentIt.visible = true
End Sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
El texto de bienvenida o lo que quieran poner va aqui!! </p>
<p>
Bla bla bla bla lba bla bla bla!......
</p>
<p>
<span>
<asp:TextBox id="Dest" runat="server">Destinatario</asp:TextBox>
</span>
</p>
<p>
<span>
<asp:TextBox id="Emet" runat="server">Transmisor</asp:TextBox>
</span>
</p>
<span>
<p>
<asp:TextBox id="Suje" runat="server">Asunto</asp:TextBox>
</p>
<p>
<asp:TextBox id="Corp" runat="server" TextMode="MultiLine" Height="346px" Width="600px">Mensaje</asp:TextBox>
</p>
</span><span>
<p>
<asp:Button id="Button1" onclick="Button1_Click" runat="server" Text="Enviar!"></asp:Button>
</p>
<p>
<asp:Label id="SentIt" runat="server" visible="False">Su Email ha sido enviado perfectamente!</asp:Label>
</p>
</span>
<!-- Autor Frances -->
</form>
</body>
</html>
|
Autor