各位大侠帮帮忙，菜鸟有一问题！

各位朋友：
    我有一问题，怎样才能用表单实现模糊查询？

23 个解决方案

#1

locate all for 条件
set filter to 条件
select * from table where 条件
好难回答你的问题，要视具体情况。
你可以做个条件输入界面，再根据用户输入的数据进行查询
-------------------------
39度十几天了，今天40度，明天还是40度，没有空调，没有MM，真是痛苦……
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#2

loca for .....
 
seek 

find

#3

set exact off
select 表名
set filter to 条件

#4

我用combo控件，然后在command控件用sele查询

#5

各位帮忙看一下，次代码有何问题？
if thisform.Combo1.value='产业字号'
  sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 字号=thisform.text1.value into table "e:\徽州文书计算机管理系统\hzws.dbf"
  save to thisform.Grid1.value
  thisform.refresh
  thisform.release
  do form "e:\徽州文书计算机管理系统\seek.scx"
endif

#6

if thisform.Combo1.value='产业字号'
  sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 字号=thisform.text1.value into table "e:\徽州文书计算机管理系统\hzws.dbf"
  save to thisform.Grid1.value
  thisform.refresh && 下一条就要关闭，这里刷新是否有特别的意义吗？
  thisform.release
  do form "e:\徽州文书计算机管理系统\seek.scx" && 这句不知是否能运行的到，我没这样写过，如果运行不到就上移一句
endif
还不知你运行时出了什么问题？
-------------------------
39度十几天了，今天40度，明天还是40度，没有空调，没有MM，真是痛苦……
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#7

select <fieldlist> from dbfname where <目标字符串> $ <fields_from>

#8

我是要下面的代码实现模糊查询,请问要怎样改?
if thisform.Combo1.value='产业字号'
  sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 字号=thisform.text1.value into table "e:\徽州文书计算机管理系统\hzws.dbf"
  save to thisform.Grid1.value
  thisform.refresh
  thisform.release
  do form "e:\徽州文书计算机管理系统\seek.scx"
endif

#9

sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 字号 like alltrim(thisform.text1.value) into table "e:\徽州文书计算机管理系统\hzws.dbf"
试试看。
-------------------------
39度十几天了，今天40度，明天还是40度，没有空调，没有MM，真是痛苦……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
40多度啊！没有空调，叫我怎么活……
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#10

青狼兄：
    你的这个模糊查询
     sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 字号 like alltrim(thisform.text1.value) into table "e:\徽州文书计算机管理系统\hzws.dbf"
为什么运行时老是被提醒文件在使用？--------------在线，急！！！1

#11

青狼兄：
    我试过好多次你提供的代码，发现只能查全名（以姓名为例），不能实现模糊查询

#12

to caobaiqing204(曹柏青) :
  可以模糊查询，set exact off要有这个设置，系统将不会完全比较
-------------------------
39度十几天了，41度三四天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#13

不好意思,我不知道set exact off  在什么地方设置?-------再线

#14

set exact off && 这个是字符串是否进行完全比较的开关，在需要比较之前的任何一个位置都可以。
-------------------------
39度十几天了，41度三四天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#15

青狼兄：
   我将代码编写如下，可是老是不行，系统啥都没说，和完全查询一样，唯一的区别是，完全查询可以有正常的结果，而用次代码实现模糊查询却什么都没得到！！！
 if thisform.combo1.value="姓名"
  set exact off
  sele * from "c:\My Documents\hzws.dbf" where 姓名 like alltrim(thisform.text1.value) into table thisform.grid1.value
  thisform.refresh
  thisform.release
  do  form "c:\My Documents\form1.scx"
  endif

#16

set exact off
这个命令在like里可能是没有什么效果。
你把
姓名 like alltrim(thisform.text1.value)
改为
姓名 like (alltrim(thisform.text1.value)+"%")
试试看。
你可以在命令行里先试试，如果可以的话，再把正确的方案写在程序代码中。
-------------------------
39度十几天了，41度三四天了，今天39度，明天还是39度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#17

青狼兄：
   模糊查询是可以了，但是此代码老是提醒文件正在使用，不只是何种原因，请问Grid如何即时更新？
if thisform.Combo1.value='业主'
  sele * from "e:\徽州文书计算机管理系统\glxt.dbf" where 业主 like (alltrim(thisform.text1.value)+"%") into table thisform.Grid1.value
  thisform.Grid1.refresh
  thisform.release
 do form "e:\徽州文书计算机管理系统\表单1.scx"
 endif

#18

把表单的数据环境改为私有，这样可以避免与其它地方交叉影响。
更新，我没在vfp中用过，sql和grid，这个…………，楼下一定会有人知道。
-------------------------
39度十几天了，41度四五天了，今天39度，明天还是39度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#19

我认为查询时不能有数据环境,如果这样回影响Grid的value属性,让查询内容显示不出来

#20

各位兄弟，可知表单的及时更新？万分感谢

#21

在每次修改后，thisform.refresh()就可以了。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

#22

各位兄弟:
    为什么我用thisform.release时，系统老是提醒文件正在使用，是不是使用thisform.release时要关闭一切其他的东西？但我关闭了其他东西系统还老是提醒！

#23

表单使用私有数据环境，就不会受到外界环境的干扰。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊