index.aspx

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

ASPX
55 行
字号 
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<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 conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("temp.mdb")) 
	Dim strSql As String
	strSql="Delete from uploadfile Where filename='" & MyDataGrid.DataKeys(E.Item.ItemIndex) & "'"
	Dim cmd As New OleDbCommand(strSql,conn)					
	conn.Open()                                            
	cmd.ExecuteNonQuery()										
	conn.Close()
	'下面删除文件
	Dim myfile As String
	myfile=Server.Mappath("upload") & "\" & MyDataGrid.DataKeys(E.Item.ItemIndex)
	File.Delete(myfile)
	'重新绑定
	Call myDataBind()
End Sub
'数据绑定过程
Sub MyDataBind()
	Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("temp.mdb"))
	Dim adp As New OleDbDataAdapter("select * from uploadfile Order By Submit_Date Desc", conn)  
	Dim ds As New DataSet()                                       
	adp.Fill(ds, "uploadfile")                                   
	MyDataGrid.DataSource=DS.Tables("uploadfile").DefaultView  
	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="filename" runat="server">
			<Columns>
			<asp:HyperLinkColumn HeaderText="名称" DataTextField="filename" DataNavigateUrlField="filename" DataNavigateUrlFormatString="upload/{0}" Target="_blank"/>
			<asp:BoundColumn HeaderText="文件大小(字节)" DataField="filesize"/>
			<asp:BoundColumn HeaderText="文件类型" DataField="fileContentType"/>
			<asp:BoundColumn HeaderText="文件说明" DataField="fileintro"/>
			<asp:BoundColumn HeaderText="提交日期" DataField="submit_date"/>
			<asp:ButtonColumn HeaderText="删除" Text="删除" CommandName="Delete"/>
			</Columns>
		</asp:DataGrid>
	</form>
</body>
</html>

index.aspx - 源码说明

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

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

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?