searching a dataset

[Peter Newman]

VB.Net 2003 & SQL2005

Ive been trying to find a way to search a Dataset for a value in a colum
then move the
currency manager to that row ?

ie search for "211001" in the Column "Licence"

Private Manager As CurrencyManager
Dim WithEvents Client_RS As New DataSet

' Load the DataSet with the client admin recordset
Private Sub LoadDataSet()
' Try to retrieve the records
Try
Client_RS = GetSQLDataSet("EXEC
Bossdata.dbo.SQL2005_CLIENTADMINRS")
Try
LoadControls(0)
BindControls()
Catch ex As Exception
MsgBox("Error Seeking 1st Record " & ex.Message)
End Try

Catch ex As Exception
' Pit In error trapping Here
MsgBox("Error Generating Recordset " & ex.Message)
End Try
End Sub

Private Sub LoadControls(ByVal CurrentRowPos As Integer)
'Set the current row number
CURRENT_ROW =
CInt((Client_RS.Tables("TBL_ClientAdmin").Rows(Cur rentRowPos).Item("IdCol").ToString))
End Sub

Protected Sub BindControls()
' Bind the controls to the dataset
'Licence
strLicence.DataBindings.Add("text", Client_RS,
"TBL_ClientAdmin.Licence")
' Company Name
strCompanyName.DataBindings.Add(New Binding("Text", Client_RS,
"TBL_ClientAdmin.CompanyName"))
' Set the Manager position to the current record
Manager = Me.BindingContext(Client_RS, "TBL_ClientAdmin")
End Sub