图片附件: 游客没有浏览图片的权限,请
登录 或
注册
上表原始记录为空
PUBLIC M_NO
m_no=alltrim(thisform.txtno.value)
if empty(m_no)
messagebox('对不起,编号不能为空!',16,'错误')
thisform.txtno.setfocus
return
endif
sele tblcomplain
locate for no==m_no
if not found()
messagebox('编号为'+m_no+'的投诉记录不存在!',16,'记录号错误')
return
endif
thisform.txtno.value=tblcomplain.no
thisform.txttime.value=dtoc(tblcomplain.date)
thisform.txtname.value=tblcomplain.name
thisform.edtcontent.value=tblcomplain.content
thisform.txtcontact.value=tblcomplain.contact
thisform.edtresult.value=tblcomplain.result
select keyword from tblkeyword where no=m_no into cursor cur
kw=''
scan
kw=kw+space(4)+keyword
endscan
kw=ltrim(kw)
thisform.txtkeyword.value=kw
select keyword from tblkeyword where no=m_no into cursor cur
这个临时表中的记录也为空
建议楼主把你写的代码认真看一遍