Originally posted by Glenn Williams
I'm trying to build my first grid (TDataGrid). Nothing is displaying, what am I missing? When it loads I can see the number of rows go from one to many, but no data is in the cell.
Sub btnQsearch2Click(Sender) Dim objConn, strSQL Dim rs set objConn = Application.GetNewConnection strSQL = "select CE_QUOTEID " strSQL = strSQL & " from CE_QUOTE " strSQL = strSQL & " where CE_QUOTEID Like '%" & txtQuote2.Text & "'" set rs = objConn.Execute(strSQL) Set dgQuote.Recordset = rs objConn.Close set objConn = Nothing End Sub
|