'限制datalist内显示字数
Public Property substring(ByVal str As String) As String
Get
If str.Length > 13 Then
str = str.ToString().Substring(0, 13) + "..."
End If
Return str
End Get
Set(ByVal Value As String)
End Set
End Property
'前台绑定的数据
Text='<%# substring(Eval("filename").ToString())%>'