以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 修改数据问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147334) |
-- 作者:裴保民 -- 发布时间:2020/3/14 13:13:00 -- 修改数据问题 Dim zhbh As String = e.Form.Controls("zhbhTextBox").text Dim zhmc As WinForm.TextBox = e.Form.Controls("zhmcTextBox") Dim str As String =zhmc.value Dim t As Table = Tables("资金账户") Dim idx As Integer=t.findrow("账户名称= \'" & str & "\' and _Identify <> " & t.current("_Identify")) MessageBox.Show(zhbh) If str = Nothing Then MessageBox.Show("账户名称不能为空!", "提示") zhmc.Select Return Else If idx >=0 Then MessageBox.Show("账户名称已存在,不能入库!", "提示") zhmc.Select Return End If End If 这段代码哪的为题修改数据时也提示有数据重复 |
-- 作者:有点蓝 -- 发布时间:2020/3/14 14:15:00 -- 看不出什么问题,上实例 |
-- 作者:裴保民 -- 发布时间:2020/3/14 14:39:00 -- 重新设计了个内表的表正常,可是我的程序执行后提示重复,怎么处理呢? [此贴子已经被作者于2020/3/14 14:39:16编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/3/14 15:10:00 -- 检查其他事件,把表事件、相关有影响的事件都屏蔽掉测试 |