Init Method
Object:frmproducts.pageframe1.page1.cboSupply_ID
Expand/Collapse source code of procedure pageframe1.page1.cboSupply_ID.Init Source Code
THIS.ControlSource = "products.supplier_id"
THIS.RowSource = "select company_name, supplier_id from supplier order by company_name into cursor cSupplier"