Hello,

I went through many ado.net documentation but this doesn't seem to get into my matter somehow. It'll be great if anyone can show me how to execute the following function using ado.net coding:

Code:
Public prs As New ADODB.Recordset
Public crs As New ADODB.Recordset


prs.Open("select cuid from customer order by cuid", Module1.db, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
        If prs.RecordCount > 0 Then
            prs.MoveLast()
            cuselect = prs.Fields!cuid.Value
prs.close
End If

crs.Open("select * from customer where cuid ='" & cuselect & "'", Module1.db, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)

Text1.Text = crs.Fields!custid.Value.ToString
Combo1.Text = crs.Fields!Name.Value.ToString
Text2.Text=CDate(crs.Fields!createdon.Value).ToString("dd/MMMyy,HH:mm")

crs.close