دیگه کار دیگهای نداری کد دیگه ای نمی خوای این کدهای که خواستی رو بعضیاشو تو سایت جواب دادن
مثل این 2- چطوري ميشه تعداد كاربران آنلاين رو نمايش داد
تعداد خواننده های یک مطلب هم بستگی به سلیقت داره البته اگه دیتابیس درست کردن رو تو asp بلد باشی
4- يه دونه فرم هم ميخواستم كه نظر كاربر رو به ايميل بفرسته هم جوابش میشه این کد که البته اي اس پي دات نت
هستش و فايل ضميمه هم مي فرسته
روش استفادش هم ساده است تو نوت پد پيستش كن وبا پسوندaspx سیوش کن توضیحاتش هم توسایت من هست
آدرس
http://www.persianprogramers.somee.com :wacko:
<% @ Page language="VB" %>
<% @ Import Namespace="System.Web.Mail" %>
<script language="VB" runat="server">
Sub Send_Mail(src As Object , E As EventArgs )
Dim emailMsg As New MailMessage
emailMsg.To = toh.text
emailMsg.From = From.Text
emailMsg.Subject = Subject.Text
emailMsg.Body = Body.Text
emailMsg.Attachments.Add(new MailAttachment(attach.text))
SmtpMail.Send(emailMsg)
msg.Text = "ايميل شما با موفقيت ارسال شد"
End Sub
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<style type="text/css">
<!--
@import url("file:///E|/Hossein%20%20programs/Intenet%20File/InfoRave%20-%20%CF%D1%ED%C7%DD%CA%20%C8%D1%E4%C7%E3%E5_files/style.css");
-->
</style>
</head>
<body>
<form runat="server">
<asp:label id="msg" runat="server" />
<table>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td height="28"> To (Email): </td>
<td> <asp:Textbox id="Toh" runat="server" /> </td>
</tr>
<tr>
<td> From (Email): </td>
<td> <asp:Textbox id="From" runat="server" /> </td>
</tr>
<tr>
<td> Subject: </td>
<td> <asp:Textbox id="Subject" runat="server" /> </td>
</tr>
<tr>
<td height="104"> Body: </td>
<td> <asp:textbox TextMode="multiline" Rows="5" ID="Body" runat="server" Columns="45" /></td>
</tr>
<tr>
<td><strong><font face="Tahoma">فايل ضميمه</font></strong></td>
<td><asp:textbox ID="attach" runat="server" TextMode="SingleLine" /></td>
</tr>
<tr>
<td> </td>
<td> <asp:button Text="Send" onclick="Send_Mail" id="Send" runat="server" />
</td>
</tr>
</table>
</form>
</body>
</html>
