ASP.net, Epost - Skicka Epost med ASP.net
Skicka epost med ASP.net!
I denna artikel ska vi
använda oss utav 2 st paneler för att skicka ett enkelt meddelande via ett
email.
Index.aspx
<% @Import Namespace="System.Web.Mail" %>
<SCRIPT Language="vb" runat="server">
Sub SkickaMeddelande(Sender as Object, e as eventargs)
' ** Skapar meddelande : **
Dim oMail AS New MailMessage()
oMail.To = "din@adress.nu"
oMail.From = Epost.text
oMail.BodyFormat = MailFormat.Text
oMail.Priority = MailPriority.Normal
oMail.Subject = "Meddelande från " & Namn.Text & "!"
oMail.Body = "Meddelande skickat från ASPwebb :" & Vbcrlf & Meddelande.Text
'** Ställer in rätt SMTP server : **
SmtpMail.SmtpServer = "mail1.telia.se"
'** Skickar meddelandet : **
SmtpMail.Send(oMail)
'** Ändrar utseendet på sidan : **
EmailForm.Visible = False
TackSid.Visible = True
End Sub
Sub Tillbaka(Sender as Object, e as eventargs)
'** Ändrar utseendet på sidan : **
EmailForm.Visible = True
TackSid.Visible = False
End Sub
</SCRIPT>
<HTML>
<HEAD>
</HEAD>
<BODY>
<!-- Panel för meddelande formuläret : -->
<asp:panel id="EmailForm" runat="server" visible="True">
<H1>Skicka mail med ASP.net!</H1>
Vänligen skriv ditt meddelande här :<BR>
<form runat="server">
Namn : <asp:textbox id="Namn" runat="server" /><BR>
Din epost : <asp:textbox id="Epost" runat="server" /><BR>
Meddelande :<BR>
<asp:textbox id="Meddelande" runat="server" TextMode="MultiLine" Cols="40" Rows="10" /><BR>
<asp:button id="SkickaKnapp" runat="server" Text="Skicka meddelande" OnClick="SkickaMeddelande" /><BR>
</form>
</asp:panel>
<!-- Panel för meddelande formuläret SLUT -->
<!-- Panel för tack texten : -->
<asp:panel id="TackSid" visible="False" runat="server">
<H1>Tack <% = Namn.Text %> för ditt meddelande!</H1>
<form runat="server">
<asp:button id="TillbakaKnapp" runat="server" Text="Tillbaka" OnClick="Tillbaka" />
</form>
</asp:panel>
<!-- Panel för tack texten SLUT -->
© www.ASPwebb.com
</BODY>
</HTML>
Ladda ner ett färdigt exempel här : id50.zip
Lycka till!
|
