下载附件代码(VB.NET)
存储附件的表LONION_FUJ,表结构如下:NAId ----->附件IDNAFileName ----->附件名NAFilePath ----->附件路径点击某个按钮或触发某个事件下载附件,代码如下:[@more@]Protected Sub ViewButton2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Dim i As Integer = DataList1.EditItemIndex Dim label As Label = (CType(DataList1.Items(i).FindControl("m_id"), Label)) Dim strSQL As String = "SELECT * FROM LONION_FUJ WHERE NOTICEID = " + label.Text T