ورود

View Full Version : فرستادن یک فرم به ایمیل مشخص


Asad.Safari
پنج شنبه 29 مرداد 1383, 12:50 عصر
با سلام
با این کد می توانید یه فرم را یه ایمیل خود پست کنید



<%@ import namespace="system.web.mail" %>
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="windows-1256" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">

<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=unicode">
<style type="text/css">
<!--
.style1 {
font-family: Tahoma;
font-size: small;
}
-->
</style>
</head>
<body>
<form runat="server" method="post" name="mailform">
<table width="243" border="0" align="center" bgcolor="#C0CED8">
<tr>
<td width="89"><span class="style1">Email:</span></td>
<td width="144"><asp:TextBox runat="server" ID="txtemail"></asp:TextBox></td>
</tr>
<tr>
<td><span class="style1">موضوع:</span></td>
<td><asp:textbox runat="server" ID="txtsubject"></asp:textbox></td>
</tr>
<tr>
<td><span class="style1">پیغام:</span></td>
<td>
<asp:TextBox runat="server" ID="txtbody" TextMode="MultiLine" Rows="5" Columns="20">
</asp:TextBox></td>
</tr>
<tr>
<td> </td>
<td>
<asp:Button runat="server" ID="btnsubmit" Text="ارسال" OnClick="btn_send" Font-Name="Tahoma">
</asp:Button> </td>
</tr>
</table>
</form>
</body>
</html>
<script runat="server" language="vb">
sub btn_send(sender as object, e as eventargs)
dim objmail as new mailmessage()
objmail.from=txtemail.text
objmail.subject=txtsubject.text
objmail.body=txtbody.text
objmail.to="info@takgam.com"
objmail.bodyformat=mailformat.text
objmail.priority=mailpriority.high
Smtpmail.Smtpserver=""
smtpmail.send(objmail)
end sub
</script>

فقط یه چیزی:
Smtpmail.Smtpserver="" در این قسمت باید نام SMTP serverخود را بنویسید
objmail.to="info@takgam.com"نام ایمیلتان

امید به موفقیت شما
:wink:
Peyman_Ranjbar
شنبه 31 مرداد 1383, 03:31 صبح
مثلا برای من که سایتی با نام
http://example.europe.webmatrixhosting.net
دارم
smtpserver رو باید چه مقداری قرار بدم؟
mohsen99
شنبه 31 مرداد 1383, 16:21 عصر
مثلا برای من که سایتی با نام
http://example.europe.webmatrixhosting.net
دارم
smtpserver رو باید چه مقداری قرار بدم؟

webmatrixhosting ,
smtpserver نداره
باید از smtpserver های free استفاده کنید
مثل yahoo
Peyman_Ranjbar
یک شنبه 01 شهریور 1383, 03:28 صبح
webmatrixhosting ,
smtpserver نداره
باید از smtpserver های free استفاده کنید
مثل yahoo

چرا بابا داره اتفاقا سرویسش هم خیلی خوبه
در ضمن اگه میشه آدرس smtp یاهو رو بنویسید...
ممنون
mohsen99
یک شنبه 01 شهریور 1383, 15:59 عصر
قبلا آدرسش این بود
جدیدا نمی دونم عوض شده یا نه
mx1.mail.yahoo.com
mx2.mail.yahoo.com
mx4.mail.yahoo.com
Peyman_Ranjbar
دوشنبه 02 شهریور 1383, 02:53 صبح
یه سوال دیگه
با Visual Studio.Net 2003
یه کامپوننتهای داره که میشه با استفاده از authenication هیمیل فرستاد
میخواهم بدونم تو VS.NET 2002v1.0 چهجوری میشه این کار رو کرذ؟؟؟؟ :shock:
Abbas Arizi
دوشنبه 02 شهریور 1383, 03:07 صبح
یه سوال دیگه
با Visual Studio.Net 2003
یه کامپوننتهای داره که میشه با استفاده از authenication هیمیل فرستاد
میخواهم بدونم تو VS.NET 2002v1.0 چهجوری میشه این کار رو کرذ؟؟؟؟ :shock:
باید نسخه 1.1 دات نت فریم ورک رو نصب کنید.
Peyman_Ranjbar
دوشنبه 02 شهریور 1383, 03:19 صبح
خوب اینو میدونم ولی یه چیزی رو میخوام یاد بگیرم
کاربران v1.0 چه جوری ایمیل میفرستادند؟
به هر حال اونا یه کاری میکردند دیگه؟ :?:
Abbas Arizi
دوشنبه 02 شهریور 1383, 03:59 صبح
اونها از این لحاظ دچار محدودیت بودند و فقط میتونستن ایمیلهای بدون نیاز به Authentication بفرستند یا اینکه از cdo به صورت مستقیم استفاده کنند.
Peyman_Ranjbar
دوشنبه 02 شهریور 1383, 05:17 صبح
ممنون :flower: :heart:
برای فهمیدن این موضوع دو روز الاف فقط تو اینترنت میگشتم تا آخر فهمیدم باید VS رو عوض کنم
Peyman_Ranjbar
دوشنبه 02 شهریور 1383, 05:33 صبح
در باره دوستمون که گفتن:


webmatrixhosting ,
smtpserver نداره
باید از smtpserver های free استفاده کنید
مثل yahoo
باید بگم طریقه استفاده از webmatrixhosting smtp -->


<%@ Page Language="VB" Debug="true"%>
<%@ Import Namespace="System.Web.Mail" %>
<script language="VB" runat="server">
Sub SendMail_Click(sender As Object, e As EventArgs)
Dim M as MailMessage
M = New MailMessage()
M.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
M.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "******"
M.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "******"
M.From = txtfrom.text
M.To = "quasi-modo@comcast.net"
M.Subject = "affiliates"
M.Body = txtfrom.text & "<br>" & txtname.text & "<br>" & txtbody.text & "<hr>" & txt.Text
M.BodyFormat = MailFormat.Html
SmtpMail.smtpserver = "localhost"
SmtpMail.Send(M)
response.Redirect("./thanks.html")
End Sub
</script>