| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 提示错误 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110158) |
| -- 作者：有点甜 -- 发布时间：2017/11/28 8:52:00 -- Dim str1 As String = e.form.controls("Textbox1").text Dim str2 As String = e.form.controls("Textbox2").text If e.DataTable.Compute("Count([_Identify])","毛坯编码 = \'" & str1 & "\' And 加工工序 = \'" & str2 & "\'") > 1 Then MessageBox.Show("已经存在相同工序行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If |
| -- 作者：有点甜 -- 发布时间：2017/11/28 9:19:00 -- Dim str1 As String = e.form.controls("Textbox1").text Dim str2 As String = e.form.controls("Textbox2").text If DataTables("表名").Compute("Count([_Identify])","毛坯编码 = \'" & str1 & "\' And 加工工序 = \'" & str2 & "\'") > 1 Then MessageBox.Show("已经存在相同工序行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If |
| -- 作者：有点甜 -- 发布时间：2017/11/28 10:56:00 -- 以下是引用nuoyan88在2017/11/28 10:53:00的发言：
老师，很奇怪，我刚写进去的时候可以用（那会是直接建立的一个临时表，后面我改成了SQL语句的表）改完之后没有效果了
1、你写哪段代码？如果是1楼的代码，你写到datacolchanged事件去；
2、如果是4楼的代码，你就写到控件的TextChanged事件去。 |
| -- 作者：有点甜 -- 发布时间：2017/11/28 11:33:00 -- Dim str1 As String = e.form.controls("Textbox1").text Dim str2 As String = e.form.controls("Textbox2").text If DataTables("表名").Compute("Count([_Identify])","毛坯编码 = \'" & str1 & "\' And 加工工序 = \'" & str2 & "\'") > 0 Then MessageBox.Show("已经存在相同工序行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If |
| -- 作者：有点甜 -- 发布时间：2017/11/28 12:05:00 -- 加上下面代码，看弹出什么
msgbox("毛坯编码 = \'" & str1 & "\' And 加工工序 = \'" & str2 & "\'")
如果弹出正确，肯定是你【工序跟踪表】没有匹配的数据。 |
| -- 作者：有点甜 -- 发布时间：2017/11/28 14:50:00 -- 请先去学习基础，好吗？
Dim str1 As String = e.form.controls("工序号").text |