++::: گرفتن يك فايل از user :::++

mani25j · Apr 5, 2004

سلام به همه دوستان

بچه ها من ميخوام با asp و asp.net يك فايل رو كه كاربر با browse انتخاب ميكنه و وقتي دكمه ارسال و زد اون فايل بره تو يه folder تو server .
اگه راهنماييم كنين ممنون ميشم.

فعلا bye

Barbababak · Apr 6, 2004

يك بار تو iranasp.net همچين برنامه اي ديده بودم ولي دكمه Browse نداشت.

omidak · Apr 6, 2004

سلام:
اون Browser رو RunAt=Server کنید بعد یک ASP:Button هم قرار بدید و بعد در OnClickSever کد مشابه رو قرار بدید:

کد:

Request.Files("File1").SaveAs("c:\aa.exe")

mani25j · Apr 9, 2004

سلام :
امید جان دستت درد نکنه.
اگه میتونی کد asp رو هم بدی ممنون میشم.
مرسی
فعلا bye

omidak · Apr 9, 2004

سلام:
در هنگام Submit کردن Form باز با همون کد فایل رو دریافت کنید :wink:

mani25j · Apr 9, 2004

سلام اميد جان
اگه ممكن هست لطفا بيشتر توضيح بده
ممنون
فعلا bye

omidak · Apr 9, 2004

سلام:
بعد از ارسال Form شما هر جاییه کد نویسی کد:

کد:

Request.Files("File1").SaveAs("c:\aa.exe")

رو قرار بدید. فایل شما ذخیره میشه. :wink:

mani25j · Apr 9, 2004

نام فايلي كه كاربر ارسال ميكنه رو از كجا بگيرم
مثلا در كد شما نام اون aa.exe هست
چون بايد نام فايلي كه روي سرور مياد با نام فايل در كامپيوتر كاربر يكي باشه
بازم خيلي ممنون

omidak · Apr 9, 2004

سلام:
به اين صورت آدرس كل فايل رو بگيريد:

کد:

Request.Files("File1").FileName

و با اينFunction نام فایل رو از آدرس فایل بگیرید:

کد:

    Public Function GetFileName(FileAddress)
        Dim i
        i = InStrRev(FileAddress, "\") + 1
        GetFileName = Mid(FileAddress, i)
    End Function

به عنوان مثال:

کد:

Request.Files("File1").SaveAs(MapPath(GetFileName(Request.Files("File1").FileName)))

persepolise · Apr 10, 2004

سلام
اميد جان با تشكر از راهنمايي هات
من اين دستور را به صورت asp نياز دارم . مگر asp:button و runat="server" براي دات نت نيست.
به هر حال من يك فرم گذاشتم كه فايل رو ميگيره و به يك صفحه ديگه ميفرسته تا اون فايل رو ذخيره كنه. ولي از request.files ايراد ميگيره
كد صفحه اول:

کد:

&lt;%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
&lt;html>
&lt;head>
&lt;title>Untitled Document&lt;/title>
&lt;meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
&lt;/head>

&lt;body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
&lt;form name="form1" method="post" action="save.asp">
  &lt;input type="file" name="file1" runat="server">
  &lt;br>
  &lt;input type="submit" name="Submit" value="upload">
&lt;/form>
&lt;/body>
&lt;/html>

كد صفحه دوم:

کد:

&lt;%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
&lt;html>
&lt;head>
&lt;title>Untitled Document&lt;/title>
&lt;meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
&lt;/head>
&lt;%
Request.file("File1").FileName
Public Function GetFileName(FileAddress) 
        Dim i 
        i = InStrRev(FileAddress, "\") + 1 
        GetFileName = Mid(FileAddress, i) 
    End Function 
	Request.File("File1").SaveAs(MapPath(GetFileName(Request.File("File1").FileName)))
	%>

&lt;body>
ok

&lt;/body>
&lt;/html>

اگه راهنمايي كني ممنون
فعلا

omidak · Apr 10, 2004

سلام:
من يك FileUpload خیلی کامل پیدا کردم که براتون تویه این زیر میفرستم :wink:

persepolise · Apr 10, 2004

سلام اميد جان
دستت درد نكنه عالي بود
به اميد ديدار

omidak · Apr 10, 2004

خواهش ميكنم :wink:

persepolise · Apr 11, 2004

دوباره سلام
اميد جان تو اين برنامه اگه فايلي با اسم مشابه را بخواهيم آپلود كنيم روي فايل قبلي overwrite ميشه
احتمالا با برنامه file exist ميشه گفت اگه مقدار ورودي در فولدر مربوطه باشد پيغام دهد ولي اين برنامه خودش دستور overwrite را مثل اينكه داره و اجراش ميكنه
اگه امكان داره يه راهنمايي بكن
ممنون
bye