1、模糊查询： 比如: 输入字" 飞", 则可以将表的姓名字段中的相关记录"张飞","飞影","张飞广"等等有"飞"字的记录都列出到表格上,应该如何编写查询按钮的代码?

x=alltrim(thisform.text1.value) select * from d:/student/stu.dbf where occurs(x,姓名)<>0 into cursor tmp thisform.grid1.recordsource='tmp'

2、关于定时（一个月后，三个月后，半年...）提醒[求助] 如题，有一个数据表，记录一些事件，有时间字段（年月日），要求距时间字段值之后的一个月、 三个月、半年、一年后的当天自动提示事件。也即运行程序后，程序能自动判定今日有无应该提醒的 事件（提醒的前提条件如前所述），如有则给出提示并显示事件。 aa=gomonth(date(),1)-day(date())

3、打印项目全部源码 Tools-Wizards-Documenting，Browse你的项目……

4、删除表中指定记录的问题 我的表中有N条记录,其中第2、5、6条已经做了删除标记，现在我只想真正物理删除最后1条记录，也就是第N条，而不物理删除2、5、6条，用PACK不行，会把2、5、6条一起删除，应该怎么写代码，请高手指点。

思路只有一个，就是先recall其他记录，然后pack ，然后再次DELETE。

set dele off select recno() from 表 where delete() into array laDele if vartype(laDele)='U' retu endif recall all go laDele[alen(laDele)] delete pack if alen(laDele)=1 retu endif for i=1 to alen(laDele)-1 go i delete endfor

5、查找两个表中相同的记录： sele * from gz1,gz2 where gz1.fgzh==gz2.fgzh

查找两个表中不同的记录 sele * from gz1 where fgzh not in(sele fgzh from gz2)