html页面中函数应用

页面部分：NavigateUrl='<%# GetClassURL(DataBinder.Eval(Container, "DataItem.NewsClassId")) %>'

 代码部分：  Protected Function GetClassURL(ByVal sender As Integer) As String

            Dim NewsBusiness As New GoByGo.WebModules.News.Business.category(sender)
            If NewsBusiness.Get_First_Categories.Rows.Count > 0 Then

                GetClassURL = "Categories.aspx?NewsCategoryId=" & sender

            Else

                GetClassURL = "#"

            End If

        End Function