index.aspx

来自「《ASP.NET C#程序设计案例教程》」· ASPX 代码 · 共 42 行

ASPX

42 行

<%@ Import Namespace="System.IO"%>
<%@ Import Namespace="System.Data"%>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
	If Not Page.IsPostBack Then
		Call myDataBind()
	End If
End Sub
'单击删除时执行该事件过程
Sub MyDataGrid_Delete(Sender As Object, E As DataGridCommandEventArgs)
	'执行删除操作
	Dim myfile As String
	myfile=Server.Mappath("upload") & "\" & MyDataGrid.DataKeys(E.Item.ItemIndex)
	File.Delete(myfile)
	'重新绑定
	Call myDataBind()
End Sub
'绑定数据子程序
Sub myDataBind()
	Dim mydir As New Directoryinfo(Server.Mappath("upload"))
	MyDataGrid.DataSource=mydir.GetFiles("*.*")
	MyDataGrid.DataBind()
End Sub
</script>
<html>
<body>
	<h3 align="center">文件管理器（一）</h3>
	<a href="upload.aspx">上传文件</a>
	<form runat="server">
		<ASP:DataGrid id="MyDataGrid" HeaderStyle-BackColor="#BCBCBC" Width="100%" AutoGenerateColumns="false"  OnDeleteCommand="MyDataGrid_Delete"  DataKeyField="Name" runat="server">
			<Columns>
			<asp:HyperLinkColumn HeaderText="名称" DataTextField="Name" DataNavigateUrlField="Name" DataNavigateUrlFormatString="upload/{0}" Target="_blank"/>
			<asp:BoundColumn HeaderText="大小" DataField="Length"/>
			<asp:BoundColumn HeaderText="类型" DataField="Extension" />
			<asp:BoundColumn HeaderText="修改时间" DataField="LastWriteTime" />
			<asp:ButtonColumn Text="删除" CommandName="Delete"/>
			</Columns>
		</asp:DataGrid>
	</form>
</body>
</html>

index.aspx - 源码说明

本页面展示了「《ASP.NET C#程序设计案例教程》」中的 index.aspx 源码文件，采用 ASPX 编程语言编写，共 42 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP.NET相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?