Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim oComp As IEnumerable(Of Company)
- Dim oInd As IEnumerable(Of Individual)
- oComp = From oP As Company In ERM.Parties _
- Where TypeOf (oP) Is Company And _
- oP.Name.StartsWith(sSearchString)
- oInd = From oP As Individual In ERM.Parties _
- Where TypeOf (oP) Is Individual And _
- (oP.FirstName.StartsWith(sSearchString) Or _
- oP.LastName.StartsWith(sSearchString))
- rptIndividuals.DataSource = oInd
- rptCompanies.DataSource = oComp
- rptCompanies.DataBind()
- rptIndividuals.DataBind()
- Dim oComp As IEnumerable(Of Party)
- Dim oInd As IEnumerable(Of Party)
- oComp = From oP In ERM.Parties _
- Where TypeOf (oP) Is Company And _
- CType(oP, Company).Name.StartsWith(sSearchString)
- oInd = From oP In ERM.Parties _
- Where TypeOf (oP) Is Individual And _
- (CType(oP, Individual).FirstName.StartsWith(sSearchString) Or _
- CType(oP, Individual).LastName.StartsWith(sSearchString))
- rptIndividuals.DataSource = oInd
- rptCompanies.DataSource = oComp
- rptCompanies.DataBind()
- rptIndividuals.DataBind()
- rptCompanies.DataSource = oComp.ToArray ()
Add Comment
Please, Sign In to add comment