台灣最大程式設計社群網站
線上人數
817
 
會員總數:246046
討論主題:189631
歡迎您免費加入會員
討論區列表 >> 專欄文章 >> 發信的控制項 Fro Aspx
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
發信的控制項 Fro Aspx
價值 : 0 QP  點閱數:1115 回應數:0
樓主

站務人員 站長
門外漢
0 1580
542 9
發送站內信

捐贈 VP 給 站務人員

<%@ Import Namespace="System.Web.Mail" %>
<Script Language="VB" runat="server">
Sub btnSend_Click(ByVal sender As Object, ByVal e As EventArgs)
If Page.IsValid Then
Service_1.visible=False
Service_2.visible=True
Dim myMail As MailMessage = New MailMessage()

'設定E-Mail的內容
myMail.To = txtTo.Text
myMail.From = txtFrom.value
myMail.Subject = txtSubject.Text
myMail.BodyFormat = MailFormat.Html
myMail.Body = txtMemo.Text
'將E-Mail傳送出去
SmtpMail.Send(myMail)
btnSend.visible=false
Message.Text = "電子郵件已經傳送成功!郵件將會寄送給程式設計師以解決問題..."

End If
End Sub
</script>
<table width="550" border="0" cellspacing="0" cellpadding="0" align="center">
<tr valign="top">
<td align="center">
<Fieldset>
<legend><img src="../Image/Emaillogo.gif" alt="" width="313" height="50" border="0"></legend>
<table width="90%" border="0" cellspacing="0" cellpadding="0">
<trvalign="top">
<td colspan="2"> 寄件者:<asp:TextBox id="txtTo" runat="server" width="250"/>
<asp:RequiredFieldValidator id="RequiredFieldValidator1"
runat="server" ControlToValidate="txtTo" ErrorMessage="*"/>
<asp:RegularExpressionValidator id=RegularExpressionValidator1
runat="server" ControlToValidate="txtTo"
ValidationExpression=".{1,}@.{3,}" ErrorMessage="含@"/></td>
</tr>
<trvalign="top">
<td colspan="2"> 收件者:<input type="Text" style="width:250px;" id="txtFrom" disabled Value="" runat="server">
</td>
</tr>
<tr valign="top">
<Td colspan="2">信件主旨:<asp:TextBox id="txtSubject" runat="server" Text="" Enabled=False width="300"/>
<asp:RequiredFieldValidator id="RequiredFieldValidator3"
runat="server" ControlToValidate="txtSubject" ErrorMessage="*"/></TD>
</tr>
<tr >
<td align="center" style="font-size:15px;" width="55">
網站程式錯誤訊息
</td>
<td valign="top" align="center"><asp:TextBox id="txtMemo" Enabled=False runat="server" TextMode="Multiline"
Wrap="True" style="width:430px;height:200px;font-family: Arial, Helvetica, sans-serif;"/></td>
</tr>
<tr>
<td colspan="2" align="center">
<asp:Button id="btnSend" onclick="btnSend_Click" runat="server" text="傳送郵件"/>
<asp:label id="Message" runat="Server"/>
</td>
</tr>
</table>
</Fieldset>
</td>
</tr>
</table>

本篇文章發表於2002-02-19 00:00
目前尚無任何回覆
   

回覆
如要回應,請先登入.