PUBLIC m_nian1,m_ri1,m_yue1,m_nian2,m_ri2,m_yue2,m_nianyueri1,m_nianyueri2
IF EMPTY() OR EMPTY() OR EMPTY() OR EMPTY() OR EMPTY() OR EMPTY()
    MESSAGEBOX("请输入要查询的日期！",40)
ELSE
    thisform.release
  m_nian1=
  m_ri1=
  m_yue1=
  m_nian2=
  m_ri2=
  m_yue2=
m_nianyueri1=CTOD(m_nian1+"/"+m_yue1+"/"+m_ri1)
m_nianyueri2=CTOD(m_nian2+"/"+m_yue2+"/"+m_ri2)
  USE 空箱加固库
  GO top

  DO WHILE NOT EOF()
  set filter to 日期>=m_nianyueri1 AND 日期<=m_nianyueri1
    browse
  enddo
ENDIF
  

按条件查询，形成新的表，然后去打印或者查询。不知道怎么编这样的代码。

现在是2个毛病，1、死循环，只在第一条记录上，2、不按指定条件查询

LOCAL  m_nian1,m_ri1,m_yue1,m_nian2,m_ri2,m_yue2,m_nianyueri1,m_nianyueri2,riqi,daozhan,chehao,chexing,minglinghao,xianghao,xiangshu,xiangxing,hunyunyuan,chehzong,i
IF EMPTY() OR EMPTY() OR EMPTY() OR EMPTY() OR EMPTY() OR EMPTY()
    MESSAGEBOX("请输入要查询的日期！",40)
ELSE
  m_nian1=
  m_ri1=
  m_yue1=
  m_nian2=
  m_ri2=
  m_yue2=
m_nianyueri1=CTOD(m_nian1+"/"+m_yue1+"/"+m_ri1)
m_nianyueri2=CTOD(m_nian2+"/"+m_yue2+"/"+m_ri2)
    SELECT 加固统计查询
    DELETE all
    PACK
   SELECT 空箱加固库
  GO top
  i=1
DO WHILE NOT EOF()
    IF 日期>=m_nianyueri1 AND 日期<m_nianyueri2
        riqi=日期
       daozhan=到站
       minglinghao=命令号
       chexing=车型
       chehao=车号
       xainghao=箱号1+"、"+箱号2
       xiangshu=箱属
       xiangxing=箱型
       huoyunyuan=货运员
       chezhong=车种
      select 加固统计查询
        appe blank
        repl 序号 WITH i
        *,车号 WITH chehao,车型 WITH chexing,车种 WITH chezhong,到站 WITH daozhan,货运员 WITH huoyunyuan,命令号 WITH mingling,日期 WITH riqi,箱号 WITH xianghao,箱属 WITH xiangshu,箱型 WITH xiangxing
            
    ENDIF
    thisform.Release
    use 空箱加固库
    SKIP 1
    i=i+1
enddo
 MESSAGEBOX("请输入要查询的日期！",40)
ENDIF
  

确实是解决了问题，但是出现了新问题。形成的表怎么到我指定的目录下？还有不提示覆盖表怎么做到？因为每天查好几次数据，查看后表也就没用了。不知道我这么表达能说明白不？

IF thisform.text5.value={} or thisform.text6.value={} or thisform.text6.value<thisform.text5.value
    MESSAGEBOX("日期错误，请重新输入！！！",40)   
    thisform.text5.setfocus
ELSE
    select * from 空箱加固库 where 日期>=thisform.Text5.value AND 日期<=thisform.Text6.Value into table 加固查询
ENDIF