آذرخش برنامه نویسان کرمانشاه

اپلود فایل با یک دکمه مستقل 1403/11/21

با زبان asp.net-vb.net
<table style="direction: rtl; width: 900px; float: right;" border="0">
<tbody>
<tr>
<td>
1-&nbsp;&nbsp;&nbsp; ساخت فایل آپلود پنهان (در این مثال فایل تصویری با پسوند jpg و gif است)
&lt;asp:FileUpload&nbsp; ID="Fu"&nbsp; runat="server"
accept="image/x-png,image/gif,image/jpeg"&nbsp;
style="display:none"&nbsp; EnableViewState="False" onchange="uploadme()" /&gt;
2-&nbsp;&nbsp;&nbsp; ساخت دکمه سمت کلاینت آشکار جهت فراخوانی اسکریپت بارگذاری فایل آپلود فوق
&lt;button type="button" id="btnUp" onclick="Browser()"&gt;آپلود فایل&lt;/button&gt;
3-&nbsp;&nbsp;&nbsp; ساخت دکمه سمت سرور پنهان جهت فراخوانی کنترل بر&nbsp; فایل آپلود شده فوق و انتقال به متغیر در حافظه
&lt;asp:Button ID="btnUpLoad" runat="server" Width="80px" style="display:none;" /&gt;
4-&nbsp;&nbsp;&nbsp; اسکریپتهای لازم در سمت کلاینت
function Browser()&nbsp;
&nbsp;&nbsp;&nbsp; {&nbsp;&nbsp; /* when click on button */
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; var Fufk = document.getElementById('&lt;%= Fu.ClientID %&gt;');&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fufk.click();
&nbsp;&nbsp;&nbsp; }
&nbsp;
&nbsp;&nbsp;&nbsp; function uploadme()
&nbsp;&nbsp;&nbsp; {&nbsp;&nbsp; /* when Fileupload change */&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; var btn = document.getElementById('&lt;%= btnUpLoad.ClientID %&gt;');&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; btn.click();&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp; }&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&lt;/script&gt;
5-&nbsp;&nbsp;&nbsp; متغیر عمومی جانگهدار فایل آپلود شده در سمت سرور Shared Fbytes() As Byte
6-&nbsp;&nbsp;&nbsp; روتین کلیک دکمه پنهان سمت سرور بند 3 فوق
Protected Sub btnUpLoad_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnServerSide1.Click
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If FileUpload1.PostedFile.ContentLength &gt; 200000 Then
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MessageFk("فایل انتخاب شده شما بزرگتر از 200 کیلو بایت است قابل قبول نیست")
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fbytes = Nothing
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Exit Sub
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If FileUpload1.FileName.Length &gt; 50 Then
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MessageFk("طول نام فایل انتخاب شده با پسوندش بیش از 50 کاراکتر است ،نام فایل را کوتاه کنید")
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fbytes = Nothing
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Exit Sub
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; FileNam = FileUpload1.FileName
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim Fs As IO.Stream = FileUpload1.PostedFile.InputStream
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim Br As IO.BinaryReader = New IO.BinaryReader(Fs)
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fbytes = Br.ReadBytes(Fs.Length)
&nbsp;&nbsp;&nbsp; &nbsp;Dim TempSavePath As String = Server.MapPath("Img//Temp//")
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dbfk.MkImgTempDir(TempSavePath)
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; FileUpload1.SaveAs(TempSavePath + "//" + FileUpload1.FileName)
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Image1.ImageUrl = "Img\Temp\" &amp; FileUpload1.FileName
&nbsp;&nbsp;&nbsp; End Sub
در روتین فوق پس از کنترل ویزگی های فایل آپلود شده ، محتویات فابل در متغیر Fbyts ذخیره شده و فایل فیریکی در مسیر تعیین شده ذخیر ه می شود
7-&nbsp;&nbsp;&nbsp; روتین ذخیره فایل &nbsp;و نام فایل در بانک اطلاعاتی با فرض اینکه نام متغیر رکوردی ما DrA است.
If Fbytes IsNot Nothing Then
&nbsp;&nbsp; DrA("Apic") = Fbytes
&nbsp; &nbsp;DrA("aPicName") = FileNam
Else
&nbsp;&nbsp; DrAp("aPicName") = "-"
End If
<div> </div>
</td>
</tr>
</tbody>
</table>
 
&nbsp;

امتیاز این مقاله