Reverse Sort In DataTable

lorena

Well-known member
Joined
Oct 23, 2003
Messages
134
Location
Phoenix, Arizona
I have a datatable with information from files in a directory. I would like to do a reverse sort by the LastWriteDate so that the most recent file will display first. Is there a way to do this?
Here is my code:
Code:
Sub BindData(strSortBy As String)
				Dim dirInfo as New DirectoryInfo(Server.MapPath("/p1/Quality/Corr_Prev_Action_Cases/Opportunities for Improvement/Closed"))					
				Dim arrFileInfo  As Array
				Dim filesInfo   As FileInfo

				Dim filesTable   As New DataTable
				Dim drFiles    As DataRow
				Dim dvFiles   As DataView

				 The table is pretty simple... could store more info, but this is
				 all I display so its all Im storing.
				filesTable.Columns.Add("Name", Type.GetType("System.String"))
				filesTable.Columns.Add("LastWriteTime", Type.GetType("System.DateTime"))
		
				 Get File Info
				arrFileInfo = dirInfo.GetFiles("*.pdf")

				For Each filesInfo In arrFileInfo
					drFiles = filesTable.NewRow()
					drFiles("Name")          = filesInfo.Name
					drFiles("LastWriteTime") = filesInfo.LastWriteTime					
					filesTable.Rows.Add(drFiles)
				Next filesInfo
				
				dvFiles = filesTable.DefaultView
				dvFiles.Sort = strSortBy
				
				dgFiles.DataSource = dvFiles
				dgFiles.DataBind()
			End Sub
 
Back
Top