       

 :            
    

 :      SQL                     
            : 

CODE  

rs.Open "select * from [] where []>='" + Text2.Text + "' and []<='" + Text3.Text + " ' ", db, adOpenDynamic, adLockOptimistic
 



        Rs          data grid  flexgrid  

CODE  

set datagrid1.datasource = rs
 



    
                         
                

