|
|
|
Introduction
In ASP.NET 2.0, accessing data in web pages is handled through data source controls.
These are non-visual controls derived from Some time ago, I wanted to make a simple file manager. For this, I needed to list the contents of a folder. I decided to create a custom data source control, so that I could use a GridView control to display the data. In combination with a GridView, the control can not only show the contents of a folder, but it can also be used to rename or delete files or folders! Therefore, this can be a great control to create your own file manager. The control can also be used to create a photo gallery with almost no code, as shown below.
The code is in VB.NET, but it's not difficult to get it running in C# or in another language. LicenseThe control is free and open source under the LGPL license. InstallationInstalling the controlYou can install the control in the standard way:
You may want to add the control to the toolbox of your editor (Visual Studio or C# Builder). This will allow you to add the control to a page by dragging it. Follow the editor's procedure to add a control to the toolbox. Using the controlAdding the control to your pageThere are 2 ways to add the control to your page:
Setting the folderThe control will show the contents of the folder that is set as aParameter.
The name of the parameter is "Directory".
<rw:FolderContentsDataSource ID="FolderContentsDataSource1" runat="server" >
<SelectParameters>
<asp:Parameter Name="Directory" Type="String" DefaultValue="c:\inetpub\wwwroot" />
</SelectParameters>
</rw:FolderContentsDataSource>
You can use any of the Parameter types, such as ControlParameter or QueryStringParameter,
to connect the parameter value to an environment value. Use the Parameters setting
in the Properties Window.
Please note that you only need a single parameter. This parameter is used for selection, deletion and renaming of contents. Demo pagesThe control comes with two demo pages:
Important: you need to run these pages with credentials that have read rights to the folder. For deleting or renaming files, you need the according permissions. Use impersonation or make sure the folder is accessible for the ASPNET account. How it works
To build a data source control, I got some ideas from Nikhil Kothari's code at www.nikhilk.net/DataSourceControlsSummary.aspx.
I built two main classes The code reading the folder contents is in the ExecuteSelect method of the FolderContentsDataSourceView class. This code generates a DataTable with a list of entries in the given folder: Protected Overrides Function ExecuteSelect(ByVal arguments As System.Web.UI.DataSourceSelectArguments) As System.Collections.IEnumerable
Dim dt As New DataTable()
dt.Columns.Add("Name", System.Type.GetType("System.String"))
dt.Columns.Add("Size", System.Type.GetType("System.Int64"))
dt.Columns.Add("Modified", System.Type.GetType("System.DateTime"))
dt.Columns.Add("Created", System.Type.GetType("System.DateTime"))
dt.Columns.Add("Accessed", System.Type.GetType("System.DateTime"))
dt.Columns.Add("IsFolder", System.Type.GetType("System.Boolean"))
Dim exc As Exception = Nothing
Dim dv As DataView = Nothing
Try
Dim objFolderContents As DirectoryInfo = New DirectoryInfo(_owner.GetSelectedDirectory())
Dim objEntries() As FileSystemInfo = objFolderContents.GetFileSystemInfos()
Dim objEntry As FileSystemInfo
For Each objEntry In objEntries
Dim dr As DataRow = dt.NewRow()
dr("Name") = objEntry.Name
If (objEntry.Attributes And FileAttributes.Directory) <> 0 Then
dr("Size") = 0
dr("IsFolder") = True
Else
dr("Size") = CType(objEntry, FileInfo).Length
dr("IsFolder") = False
End If
dr("Modified") = objEntry.LastWriteTime
dr("Created") = objEntry.CreationTime
dr("Accessed") = objEntry.LastAccessTime
dt.Rows.Add(dr)
Next
dv = New DataView(dt)
dv.Sort = arguments.SortExpression
Catch ex As Exception
exc = ex
End Try
Dim statusEventArgs As New FolderContentsDataSourceStatusEventArgs(exc)
OnSelected(statusEventArgs)
If (exc IsNot Nothing And Not statusEventArgs.ExceptionHandled) Then
Throw exc
End If
Return dv
End Function
Points of interest
FutureHere are some ideas for improvement:
If anyone decides to extend this control, or has any comments, bug reports or questions, then it would be great to hear from you. |