以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  保存机制的疑问?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30937)

--  作者:zpx_2012
--  发布时间:2013/4/7 11:34:00
--  保存机制的疑问?
BeforeSaveDataRow设置了代码要求表中的某一列比如:“订单编号”为空时要提示并中止保存,但现在的保存机制是本次打开表后必须要修改过的行保存才取作用,否则跳过。
如果在设置代码以前表中就录入了很多“订单编号” 为空的数据,现在想实现打开表后即使没有修改过任何行保存时也要检查那些原来为空的列要用哪个保存命令才起作用?
谢谢!

--  作者:Bin
--  发布时间:2013/4/7 11:38:00
--  
1.保存机制很正常.既然没修改,为什么要保存?
2.这样的情况只能用代码筛选出 订单编号 列为空的行.如果大于0  就弹出提示即可.

--  作者:zpx_2012
--  发布时间:2013/4/7 11:52:00
--  
谢谢!我想知道的是有没有直接写代码或用哪个命令的方式?
--  作者:Bin
--  发布时间:2013/4/7 12:05:00
--  
在 项目属性的 BeforeSaveProject 事件中 添加下面代码
Dim drs As List(Of DataRow)

drs=DataTables("表A").Select("[第一列] = \'\'")
MessageBox.Show(drs.Count)
If drs.Count=0 Then
 MessageBox.Show("有空值!")
End If


--  作者:Bin
--  发布时间:2013/4/7 12:05:00
--  
或者在 BeforeCloseProject 中添加
--  作者:zpx_2012
--  发布时间:2013/4/7 12:50:00
--  
好的,谢谢!