كيف اظهار الملفات على صفحة وب؟

هل تقصد عرض الملفات الموجودة في مجلد معين بدون كتابة كود لعمل ذلك ؟؟ :

تحتاج لأن تفعل خاصية Indexes وتجعلها Enabled

أما إذا كنت تريد عمل كود لذلك ، سأبحث فيها و أرد لك خبر ان شاء الله

كود جزاك الله خيرا ب ASP.NET

أخ عمر ان شاء الله هذا الكود يساعدك:

DirectoryInfo di = new DirectoryInfo(@"c:\Inetpub\wwwroot\myvDir\"); 

// Get a reference to each file in that directory. 
FileInfo[] fiArr = di.GetFiles(); 
DirectoryInfo[] dirs = di.GetDirectories(); 
// make links 
foreach (FileInfo fri in fiArr) 
{ 
HyperLink hl = new HyperLink(); 
hl.Text=fri.Name; 
hl.NavigateUrl = "http://localhost/myVdir/" + fri.Name; 
this.Panel1.Controls.Add(hl); 
} 

foreach (DirectoryInfo diNext in dirs) 
{ 
HyperLink h2 = new HyperLink(); 
h2.Text=diNext.Name; 
h2.NavigateUrl = "http://localhost/myVdir/" + diNext.Name; 
this.Panel1.Controls.Add(h2); 
}

مشكور و جزاك الله خيرا على التجاوب الفعال

لقد استخدمت الكود التي أعطيتني و أفادني كثيراً و حولته الى فيجوال بيسك مع بعض التعديل ونتج ما أحتاجه كما في التالي

Partial Class Files

Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim di As New DirectoryInfo("E:\WebApplication\Files")

Dim fiArr As DirectoryInfo() = di.GetDirectories

Dim fri As DirectoryInfo

For Each fri In fiArr

Dim hl As New HyperLink

hl.Text = fri.Name

hl.NavigateUrl = "http://localhost/Files/" '+ fri.Name + Chr(10)

Panel1.Controls.Add(hl)

Next fri

GetFiles()

End Sub

Private Sub GetFiles()

Dim di As New DirectoryInfo("E:\WebApplication\Files")

Dim strFile As String

For Each strFile In Directory.GetFiles("E:\WebApplication\Files")

Dim hl As New HyperLink

hl.Text = Path.GetFileName(strFile) ' fri.Name

hl.NavigateUrl = "http://localhost/Files/" '+ fri.Name + Chr(10)

Panel2.Controls.Add(hl)

Next

End Sub

و يحتاج الى بعض التنسيقات

و لكن كيف يتم انزال الملفات المعروضة

اقتباس

و لكن كيف يتم انزال الملفات المعروضة

هل تقصد تحميل الملفات على السيرفر ، بامكانك تحميلها يدويا باستخدام FTP أو HTTP

إذا كان موقع مستضاف، فيمكنك الدخول على لوحة التحكم وهي سهلة في الحقيقة، اختر File Manager

أو Upload Files

وشكرا لك على الكود ، إضافتك اثراء للموضوع، ولو كان الكود داخل الوسم

 كان أفضل

private void GetFilesAndDirs()
  {
 	 DirectoryInfo d = new DirectoryInfo(Path.GetDirectoryName(Server.MapPath("browse.aspx")));
FileInfo[] fi = d.GetFiles();

// عرض المجلدات
DirectoryInfo[] di = d.GetDirectories();
Response.Write("------------------------<br>المجلدات<br>------------------------<br>");
foreach (DirectoryInfo dir in di)
{
    Response.Write(dir.Name + "<br>");
}
di = null;

// عرض الملفات
Response.Write("------------------------<br>الملفات<br>------------------------<br>");
foreach (FileInfo f in fi)
{
   Response.Write(f.Name + "<br>");
}
fi = null;
}

السلام عليكم

مشكورين و جزاكم الله خيرا

Dim di As New DirectoryInfo("E:\Personnel2006\PersonnelNet")
        Dim fiArr As DirectoryInfo() = di.GetDirectories
        Dim fri As DirectoryInfo
        Response.Write("------------------------<br>المجلدات<br>------------------------<br>")
        For Each fri In fiArr
            Response.Write(fri.Name + "<br>")
        Next fri
        Dim strFile As String
        Response.Write("------------------------<br>الملفات<br>------------------------<br>")
        For Each strFile In Directory.GetFiles(Server.MapPath("Files\"))
            Response.Write(Path.GetFileName(strFile) + "<br>")
        Next

أريد أن انزل الملفات التي عرضت بنقرة زر تظهر لي نافذة Download و ينزل الملف الى الحاسب

و أيضاً لم استطع أن أحول السطر

FileInfo[] fi = d.GetFiles();

الى فيجوال بيسك ربما هو السبب