Now, instead of DataList use Repeater and make below changes
VB.NET
Public Sub BindLabelColumn(sender As Object, e As EventArgs)
Dim lbl As Label = CType(sender, Label)
Dim container As RepeaterItem = CType(lbl.NamingContainer, RepeaterItem)
Dim strVals As String = Convert.ToString(DataBinder.Eval(CType(container, RepeaterItem).DataItem, 'LastName')) + ', ' + Convert.ToString(DataBinder.Eval(CType(container, RepeaterItem).DataItem, 'FirstName'))
lbl.Text = strVals
End Sub ’BindLabelColumn
Dim ds As DataSet
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ds = ’Assign proper valueto dataset
Dim dc As DataColumn
Dim dr As DataRow
Dim rpthdr AsNew TemplateBuilder
Dim rptitem AsNew TemplateBuilder
Dim strval AsStringForEach dc In ds.Tables(0).Columns
If strval = ''Then
strval = dc.ColumnName & ' 'Else
strval = strval & dc.ColumnName & ' 'EndIfNext
rpthdr.AppendLiteralString(strval)
Repeater1.HeaderTemplate = rpthdr
Repeater1.DataSource = ds
Repeater1.DataBind()
End Sub
Function getData(ByVal objContainer As System.Web.UI.WebControls.RepeaterItem) AsString
Dim i AsInteger
Dim strval AsString = '<br>'For i = 0To ds.Tables('table').Columns.Count - 1If strval = ''Then
strval = objContainer.DataItem(i).ToString & ' 'Else
strval &= objContainer.DataItem(i).ToString & ' 'EndIfNext
strval = strval & '<br>'Return strval
EndFunction
The Repeater class is not derived from the WebControl class, like the DataGrid and DataList. Therefore, the Repeater lacks the stylistic properties common to both the DataGrid and DataList. What this boils down to is that if you want to format the data displayed in the Repeater, you must do so in the HTML markup. i.e using <b>/<u>.. tags
Dim SortField As String
Dim myconnection As SqlConnection
Dim myda As SqlDataAdapter
Dim ds As DataSet
Dim strConn As String
Dim SQLStmt As String = 'Select * from Employees '
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
’ Put user code to initialize the page here
BindData()
End Sub ’Page_Load
Sub BindData()
strConn = 'Server=localhost;uid=sa;password=;database=northwind;'
myconnection = New SqlConnection(strConn)
myda = New SqlDataAdapter(SQLStmt, myconnection)
ds = New DataSet
myda.Fill(ds, 'AllTables')
Repeater1.DataSource = ds
Repeater1.DataBind()
End Sub ’BindData
Sub SortData(ByVal SortExpression AsString)
If ViewState('SortOrder') IsNothingThen
ViewState('SortOrder') = ' ASC'ElseIf ViewState('SortOrder').ToString() = ' ASC'Then
ViewState('SortOrder') = ' DESC'Else
ViewState('SortOrder') = ' ASC'EndIfEndIf
SQLStmt = SQLStmt + ' ORDER BY ' + SortExpression.ToString() + ' ' + ViewState('SortOrder')
BindData()
End Sub ’SortData
Protected Sub SortEmployeeIdClick(ByVal sender AsObject, ByVal e As EventArgs)
SortField = 'EmployeeId'
SortData(SortField)
End Sub ’SortEmployeeIdClick
Protected Sub SortFirstNameClick(ByVal sender AsObject, ByVal e As EventArgs)
SortField = 'FirstName'
SortData(SortField)
End Sub ’SortFirstNameClick
Protected Sub SortLastNameClick(ByVal sender AsObject, ByVal e As EventArgs)
SortField = 'LastName'
SortData(SortField)
End Sub ’SortLastNameClick
Protected Sub SortTitleClick(ByVal sender AsObject, ByVal e As EventArgs)
SortField = 'Title'
SortData(SortField)
End Sub ’SortTitleClick
ProtectedFunction FormatColorRow(strUnitPrice As String) As StringDimunitprice As Double = Double.Parse(strUnitPrice)Ifunitprice <= 15 ThenReturn'style=’backGround-color:red’'ElseReturn'style=’backGround-color:green’'EndIfEndFunction ’FormatColorRow
If Not Page.IsPostBack Then
’Populate the Data in the Repeater
EndIf
protected function GetFirstAlphabet(ByVal strval AsString) AsString
Dim alphabet AsString = ViewState('alphabet')
If alphabet = Left(strval, 1) ThenReturn''Else
alphabet = Left(strval, 1)
ViewState('alphabet') = alphabet
Return alphabet
EndIfEndFunction
C#
if(!Page.IsPostBack)
{
//Populate the Data in the Repeater
}
protectedstringGetFirstAlphabet(string strval)
{
string alphabet =(string) ViewState['alphabet'];
if( alphabet == strval.Substring(0,1) )
{
return'';
}
else
{
alphabet = strval.Substring(0,1);
ViewState['alphabet'] = alphabet;
return alphabet;
}
}