Select Hesab01 SET FILTER TO GCode = ALLTRIM(STR(thisform.y_GCode)) .AND. !EMPTY(KCode) .AND. EMPTY(MCode) thisform.list2.ControlSource = "Hesab01" thisform.list2.RowSource = "KName">Hi all
> Select Hesab01 > SET FILTER TO GCode = thisform.y_GCode .AND. !EMPTY(KCode) .AND. EMPTY(MCode) > thisform.list2.ControlSource = "Hesab01" > thisform.list2.RowSource = "KName" >>
> Select Hesab01 > filterStr = "SET FILTER TO GCode = " + ALLTRIM(STR(thisform.y_GCode)) + ; > " .AND. !EMPTY(KCode) .AND. EMPTY(MCode)" > &FilterStr > > thisform.list2.ControlSource = "Hesab01" > thisform.list2.RowSource = "KName" >>