ddlVendorID.DataSource = SPs.fp_PM00200_SEL_forLookup("MASONS", app.Database).getTable
ddlVendorID.DataValueField = "vendorid"
ddlVendorID.DataTextField = "vendname"
ddlVendorID.DataBind()
For Each oRow As DropDownListItem In ddlVendorID.Items
If oRow.Text.ToUpper.StartsWith("C") Then
oRow.CssClass = "Error"
End If
Next