>IF llSuccess > IF RECCOUNT() > 0 > INDEX ON crsLookup.MPNNUM_49 TAG MpnNum > SEEK m.lcPartNumber > > THISFORM.grid1.RecordSource = "crsLookup" > THISFORM.grid1.column1.header1.Caption = "MFG Part Number" > THISFORM.grid1.column2.header1.Caption = "SAE Part Number" > THISFORM.grid1.column1.header1.BackColor = RGB(88,228,225) > THISFORM.grid1.column2.header1.BackColor = RGB(183,248,152) > THISFORM.grid1.column1.header1.FontBold = .T. > THISFORM.grid1.column2.header1.FontBold = .T. > THISFORM.grid1.column1.header1.FontSize = 10 > THISFORM.grid1.column2.header1.FontSize = 10 > THISFORM.grid1.Column1.Width = 185 > THISFORM.grid1.Column2.Width = 142 > THISFORM.grid1.HeaderHeight = 20 > THISFORM.grid1.Refresh > *THISFORM.Refresh > THISFORM.grid1.SetFocus > *THISFORM.txtPartNum.SetFocus > ELSE > MessageBox("Part Number Not Found!", 64, "SAE-2K7") > THISFORM.txtPartNum.Value = "" > THISFORM.txtPartNum.SetFocus > ENDIF >ELSE > MESSAGEBOX("SQL Query Failed!", 16, "SAE-2K7") >ENDIF >You could also redefine column.controlsources.