以下是引用ttlover7613在2016-8-30 14:59:05的发言:
谢谢,用了text endtext命令成功把数据写上去了。
用 text ..... endtext,还有个好处就是这个东西 <<变量>>,如
cWhere=''
bh=allt(thisform.text1.value)
xm=allt(thisform.text2.value)
...
if !empty(bh)
cWhere=iif(empty(cWhere),'bh=?bh',cWhere+' and bh=?bh')
endif
if !empty(xm)
cWhere=iif(empty(cWhere),'xm=?xm',cWhere+' and xm=?xm')
endif
if !empty(cWhere)
cWhere='where '+cWhere
endif
TEXT TO sqlStr TEXTMERGE NOSHOW PRETEXT 4
update 表名称 set bh=?bh ,xb=?xb
<<cWhere>>
endtext
sqlexec(handle,sqlStr)
**上面是动态拼接查询条件语句,
***<<cWhere>> ,好像比 &管用。。。
[此贴子已经被作者于2016-8-30 15:21编辑过]