> 'Create a Connection > Dim oConn As System.Data.OleDb.OleDbConnection > oConn = SqlConnect(gcConnString) > > > Dim lcSQL As String > lcSQL = "Select deptdesc,deptid from coDept where isactive=1 order by Deptdesc" > Dim goView As New Data.DataView() > > goView = VFPToolkit.vfpData.SqlExecute(oConn, lcSQL, "Departments") > > Me.ComboBox1.DataSource = goView > Me.ComboBox1.DisplayMember = "deptdesc" > Me.ComboBox1.ValueMember = "deptid" >