Can anyone tell me what is wrong here.
My grid doesn't load.Code:Dim rs As ADODB.Recordset Dim sSQL As String sSQL = "SELECT FeedGrowth.Batch, FeedGrowth.[Current Hd], FeedGrowth.CurrentLbs, FeedGrowth.Size From FeedGrowth " & _ "WHERE (((FeedGrowth.Batch) Like ('*" & lblPondFrom.Caption & "*'))) " & _ "ORDER BY FeedGrowth.Size DESC" Set rs = GetRecordSet(sSQL) Set hfgPondFrom.DataSource = rs




Reply With Quote