如何创建上传文件的超链接以打开文件

Question

您好，下面是上传多个文件的代码，我不能一次显示所有文件名，它只显示一个文件名，以及如何创建上传文件的超链接以查看文件。

 Protected Sub Button1_Click(ByVal sender As Object, _
  ByVal e As System.EventArgs)
    If FileUpload1.HasFile Then
        Try
            FileUpload1.SaveAs("Destinationpath\testing\\" & _
               FileUpload1.FileName)
            Label1.Text = "File name: " & _
          FileUpload1.FileName & "<br>"
    ListBox1.Items.Add(System.IO.Path.GetFileName(FileUpload1.PostedFile.FileName))
      Catch ex As Exception
            Label1.Text = "ERROR: " & ex.Message.ToString()
        End Try
    Else
        Label1.Text = "You have not specified a file."
    End If
End Sub
 Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
    'Files.RemoveAt(ListBox1.SelectedIndex)
    ListBox1.Items.Remove(ListBox1.SelectedItem.Text)
    Label1.Text = "File removed"
End Sub

下面是aspx代码

    <div>
    <asp:FileUpload ID="FileUpload1" runat="server" AllowMultiple="true"/><br />
    <br />
    <asp:Button ID="Button1" runat="server" OnClick="Button1_Click" 
     Text="Upload Document" /><br />
    <br />
    <asp:Label ID="Label1" runat="server"></asp:Label></div>
    <asp:listbox ID="ListBox1" runat="server" Width="175px"></asp:listbox>
    <asp:Button ID="Button2" runat="server" Text="Remove" Width="98px" OnClick="Button2_Click" />

谁能帮我做这件事。谢谢..

Answer 1

为此使用 ListBox。它会是这样的：

protected void UploadButton_Click(object sender, EventArgs e){
    foreach (HttpPostedFile fl in fu.PostedFiles)
    {
        fl.SaveAs(DestinationPath + fl.FileName);
        ListItem li = new ListItem();
        li.Text = fl.FileName;
        ListBox1.Items.Add(li);
    }
}

Answer 2

在您的设计页面中：

<asp:Panel ID="pnlFiles" runat="server" />

你的代码：

Protected Sub Button1_Click(ByVal sender As Object, _ByVal e As System.EventArgs)
    For Each fl as HttpPostedFile in fu.PostedFiles
        Dim fileLink as String = DestinationPath + fl.FileName
        fl.SaveAs(fileLink)
        Dim hpr as New HyperLink
        hpr.Text = "Download file"
        hpr.NavigateUrl = fileLink
        pnlFiles.Controls.Add(hpr)
    Next
End Sub