模糊搜索中的问题

xilaianzxsc 2009-06-22 04:10:49
http://topic.csdn.net/u/20090621/19/b6616d2e-c718-4113-86f2-f0a84ee10725.html

这是我昨天问的问题.

用介绍的语句试了一下,系统提示错误: 找不到变量"and".

如何解决?

请继续指教
...全文
27 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
xilaianzxsc 2009-06-22
  • 打赏
  • 举报
回复
已经解决,谢谢
xilaianzxsc 2009-06-22
  • 打赏
  • 举报
回复
http://www.made-moneys.com/cost.rar

帮看一下,谢谢

下载后,文件夹放置路径是 d:\cost

只要看表单即可
十豆三 2009-06-22
  • 打赏
  • 举报
回复
原来的代码 [ And "] 之前少了 cfilter+
十豆三 2009-06-22
  • 打赏
  • 举报
回复
改成这样:

cfilter=[1=1]
If !Empty( Thisform.Text1.Value ) &&假设地址的文本框为 Text1
cfilter =cfilter+ [ And "] + Alltrim( Upper(Thisform.Text1.Value) ) + [" $ 地址]
Endif
If !Empty( Thisform.Text2.Value ) &&假设货号的文本框为 Text2
cfilter =cfilter+ [ And "] + Alltrim( Upper(Thisform.Text2.Value) ) + [" $ 货号]
Endif
If !Empty( Thisform.Text3.Value ) &&假设商品名称的文本框为 Text3
cfilter =cfilter+ [ And "] + Alltrim( Upper(Thisform.Text3.Value) ) + [" $ 商品名称]
Endif
If !Empty( Thisform.Text4.Value ) &&假设颜色名称的文本框为 Text4
cfilter =cfilter+ [ And "] + Alltrim( Upper(Thisform.Text4.Value) ) + [" $ 颜色名称]
Endif
If !Empty( Thisform.Text5.Value ) &&假设尺码名称的文本框为 Text5
cfilter =cfilter+ [ And "] + Alltrim( Upper(Thisform.Text5.Value) ) + [" $ 尺码名称]
Endif
十豆三 2009-06-22
  • 打赏
  • 举报
回复
你Messagebox(&cFilter),看看那错了,改一下就好了。要学会调试。

2,723

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧