ASP.NET VB將HyperLink添加到GridView

Question

這裏對你來說有點複雜。我有一些在GridView中列出文件的代碼，它們的大小，創建日期和修改日期等。我想向'FileName'列中添加一個HyperLink，但是我一直無法找到這樣做的方法。

我在後面的代碼中構建完整的GridView。

Sub BindGrid(path) 
    'Create GridView headings and add titles' 
    Dim dt As New DataTable 
    Dim Name As New HyperLinkField 

    dt.Columns.Add("FileName") 
    dt.Columns.Add("Size") 
    dt.Columns.Add("Last Accessed") 
    dt.Columns.Add("Created Date") 


    Dim Username = User.Identity.Name.ToString 
    Dim TrimUsername = Username.Replace("ASHDOWN\", "") 
    'Dim Path As String = "~\\Users\\" & TrimUsername'' 
    LoginNameDisplay.Text = TrimUsername 

    Dim di As New IO.DirectoryInfo(Server.MapPath(Path)) 
    Try 
     Dim diar1 As IO.FileInfo() = di.GetFiles() 
     Dim dra As IO.FileInfo 

     'list the names of all files in the specified directory' 
     For Each dra In diar1 

      dt.Rows.Add(New Object() {dra.Name, dra.Length & " KB", dra.LastAccessTime, dra.CreationTime}) 
     Next 
     GridView1.DataSource = dt 
     GridView1.DataBind() 
    Catch ex As Exception 

    End Try 




End Sub 

這裏是我的aspx頁面代碼

<asp:GridView ID="GridView1" Width="100%" runat="server" CellPadding="4" 
     EnableModelValidation="True" ForeColor="#333333" GridLines="None"> 
     <AlternatingRowStyle BackColor="White" /> 
       <Columns> 
        <asp:HyperLinkField AccessibleHeaderText="Hyperlink" /> 
       </Columns> 
     <EditRowStyle BackColor="#2461BF" /> 
     <FooterStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" /> 
     <HeaderStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" /> 
     <PagerStyle BackColor="#2461BF" ForeColor="White" HorizontalAlign="Center" /> 
     <RowStyle BackColor="#EFF3FB" /> 
     <SelectedRowStyle BackColor="#D1DDF1" Font-Bold="True" ForeColor="#333333" /> 
    </asp:GridView> 

任何幫助，這將是極好的。

Answer 1

使用TemplateField代替：

<asp:TemplateField> 
<ItemTemplate> 
    <asp:HyperLink ID="HlFile" runat="server" 
     Text='<%# Eval("FileName") %>'> 
    </asp:HyperLink> 
</ItemTemplate> 
</asp:TemplateField> 

您可以在RowDataBound的NavigateUrl，如果它是在ASPX太複雜：

protected void GridView1_RowDataBound(Object sender, GridViewRowEventArgs e) 
{ 
    if(e.Row.RowType == DataControlRowType.DataRow) 
    { 
     DataRow row = ((DataRowView)e.Row.DataItem).Row; 
     HyperLink hlFile = (HyperLink)e.Row.FindControl("HlFile"); 
     // set the hyperlink url just as you please 
     hlFile.NavigateUrl = row.Field<String>("URL"); 
    } 
} 

編輯：這裏是VB版本：

Protected Sub GridView1_RowDataBound(sender As [Object], e As GridViewRowEventArgs) 
    If e.Row.RowType = DataControlRowType.DataRow Then 
     Dim row As DataRow = DirectCast(e.Row.DataItem, DataRowView).Row 
     Dim hlFile = DirectCast(e.Row.FindControl("HlFile"), HyperLink) 
     ' set the hyperlink url just as you please 
     hlFile.NavigateUrl = row.Field(Of String)("URL") 
    End If 
End Sub 

Answer 2

將HyperLinkField的NavigateUrl屬性設置爲您的目標URL。

參見：http://msdn.microsoft.com/en-us/library/system.web.ui.webcontrols.hyperlinkfield.navigateurl.aspx#Y228

您可以設置使用DataNavigateUrlFormatString屬性，類似的事情在下面：

HyperLinkField hlf = YourGridView.Columns["hyperlinkColumnName"] as HyperLinkField; 
hlf.DataNavigateUrlFormatString = "~\details.aspx?ProductID={0}";