
I got solution
In source:
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div align="center">
<asp:GridView ID="GridView1" runat="server" BackColor="White" BorderColor="#3366CC" BorderStyle="None" BorderWidth="1px" CellPadding="4">
<RowStyle BackColor="White" ForeColor="#003399" />
<FooterStyle BackColor="#99CCCC" ForeColor="#003399" />
<PagerStyle BackColor="#99CCCC" ForeColor="#003399" HorizontalAlign="Left" />
<SelectedRowStyle BackColor="#009999" Font-Bold="True" ForeColor="#CCFF99" />
<HeaderStyle BackColor="#003399" Font-Bold="True" ForeColor="#CCCCFF" />
</asp:GridView>
<asp:Button ID="Button1" runat="server" Text="Click Here" BackColor="#CCCCFF" ForeColor="#003399" Font-Bold="True" />
<asp:Button ID="Button2" runat="server" Text="Clear" BackColor="#CCCCFF" ForeColor="#003399" Font-Bold="True"/>
</div>
</form>
</body>
</html>
back end:
Imports System.IO
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim objFSO = Server.CreateObject("Scripting.FileSystemObject")
Dim objFolder = objFSO.GetFolder("E:\Sample")
Dim dt As New DataTable
Dim FileName As DataColumn = New DataColumn("File Name")
FileName.DataType = System.Type.GetType("System.String")
Dim DateModified As DataColumn = New DataColumn("Date Modified")
DateModified.DataType = System.Type.GetType("System.DateTime")
dt.Columns.Add(FileName)
dt.Columns.Add(DateModified)
Dim objFile
For Each objFile In objFolder.Files
Dim dr As DataRow
dr = dt.NewRow()
dr.Item("File Name") = objFile.Name
dr.Item("Date Modified") = objFile.DateLastModified
dt.Rows.Add(dr)
Next
Dim dv As DataView
dv = New DataView
dv = dt.DefaultView
dv.Sort = "Date Modified"
GridView1.DataSource = dt
GridView1.DataBind()
objFolder = Nothing
objFSO = Nothing
GridView1.Visible = True
Button1.Visible = False
Button2.Visible = True
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Button1.Visible = True
GridView1.Visible = False
End Sub
Protected Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles form1.Load
Button1.Visible = True
Button2.Visible = False
End Sub
End Class
Thanks & Regards
Hari
Hariinakoti, if this helps please login to Mark As Answer. | Alert Moderator