or

Private Sub radFileExplorer_ExplorerPopulated(sender As Object, e As RadFileExplorerPopulatedEventArgs) Handles radExplorer.ExplorerPopulated 'If HFPriorService.Value > "" Then sql = "Select strUrl from PriorServiceUpload where intPriorServiceId = " & HFPriorService.Value myDataTable = New DataTable myDataTable = getReader(sql) If myDataTable.Rows.Count > 0 Then If e.ControlName = "grid" Then Dim items As List(Of FileBrowserItem) = e.List Dim i As Integer = 0 For Each row As DataRow In myDataTable.Rows While i < items.Count If Not items(i).Name.Contains(row(0)) Then items.Remove(items(i)) Else i += 1 End If End While Next End If End If 'End If End Sub



<Calendar UseRowHeadersAsSelectors="False" UseColumnHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>