VFP 愛用者社區

[7086]

部分原程序如下：
&&----------------------------remote

remote_updatabds=""
WITH thisform.pageframe1.page1
remote_updatabds=remote_updatabds+"centrex_number=?trim(.txt_tel_centrexnum.value),"
remote_updatabds=remote_updatabds+"l3=?trim(.txt_tel_l3addr.value),"
remote_updatabds=remote_updatabds+"pxj_port=?trim(.txt_tel_outsideport.value),"
remote_updatabds=remote_updatabds+"sn_install_number=?jfnameid,"
if remote_updatabds<>"" .and. right(remote_updatabds,1)==","
remote_updatabds=left(remote_updatabds,len(remote_updatabds)-1)
endif
remote_updatabds="update tbl_tel_data set "+remote_updatabds+",demo=?mem"+" where tbl_tel_data.tel_number=?hm"
=sqlsetprop(0,"DispLogin",3)
up_chandle=sqlstringconnect("Provider=MSDASQL;DRIVER={SQL Server};DSN=;SERVER=remote_serverip;DATABASE=oa;UID=oa;PWD=")
if up_chandle>0
up_ok=sqlexec(up_chandle,remote_updatabds)
if up_ok>0
messagebox("succes to up remote database ")
else
messagebox("faile to up remote database " )
endif
else
messagebox("数据库连接不成功!")
endif
sqlcancel(up_chandle)
sqldisconnect(up_chandle)

endwith

执行SQLEXEC()时出错提示：不能把VFP函数做数组！！
单独执行:up_ok=sqlexec(up_chandle,update tbl_tel_data set demo=?mem where tbl_tel_data.tel_number=?hm') 则可成功更新

我该如何做？？

[garfield]

將 remote_updatabds=remote_updatabds+"centrex_number=?trim(.txt_tel_centrexnum.value),"
改成 remote_updatabds=remote_updatabds+"centrex_number='"+trim(.txt_tel_centrexnum.value)+"',"
其它的也要像這樣改