关于grid控件的问题?

frun_zhang 2003-06-26 05:05:26
一个查询问题:一个command()按钮,其相应代码为:
strsql="select * from content into tempsql where 1=1"

if !empty(allt(thisform.text1.text)) then

strsql=strsql+" and serialno like '%"+allt(thisform.text1.text)+"%'"
endif

if !empty(allt(thisform.text2.text)) then

strsql=strsql+" and reportno like '%"+allt(thisform.text2.text)+"%'"
endif

if !empty(allt(thisform.text3.text)) then

strsql=strsql+" and name like '%"+allt(thisform.text3.text)+"%'"
endif

if !empty(allt(thisform.text4.text)) then

strsql=strsql+" and company like '%"+allt(thisform.text4.text)+"%'"
endif
if !empty(allt(thisform.text5.text)) then

strsql=strsql+" and locate like '%"+allt(thisform.text5.text)+"%'"
endif

thisform.Grid1.recordsourcetype=4 &&查询
thisform.grid1.columncount=-1
thisform.grid1.recordsource=strsql
thisform.grid1.refresh
第一次点按钮grid里有数据显示,第二次点时什么也没有了
...全文
44 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
magnetmoon 2003-06-27
  • 打赏
  • 举报
回复
thisform.Grid1.recordsourcetype=4 &&查询
thisform.grid1.columncount=-1
thisform.grid1.recordsource='' &&&&&&&&&&&&&&&&&&&&&&&
...
strsql="select * from content into tempsql where 1=1"

if !empty(allt(thisform.text1.text)) then

strsql=strsql+" and serialno like '%"+allt(thisform.text1.text)+"%'"
endif
...
thisform.grid1.recordsource=strsql &&&&&&&&&&&&&&&&&&&&
thisform.grid1.refresh
pecker 2003-06-27
  • 打赏
  • 举报
回复
我用你给的条件模拟了一下,好象不会出错。你肯定还有别的条件没给出来。
kinlzy 2003-06-26
  • 打赏
  • 举报
回复
你最好在查询前将grid1的recordsource=‘’
然后再设置grid1的recordsource=strsql
xiolig 2003-06-26
  • 打赏
  • 举报
回复
http://expert.csdn.net/Expert/topic/1858/1858328.xml?temp=.8547785

2,749

社区成员

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

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