- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 关于数据列值得比较 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=66571)
-- 发布时间：2015/4/9 16:38:00
-- 关于数据列值得比较
各位老师，我想实现功能如下：
有一个表“产品表”，包括了两列“安全库存数量”，“库存数量”
我想加一个判断，只要表中有一行满足“安全库存数量”>"库存数量"，就提醒一个messagebox("库存不足了")
-- 发布时间：2015/4/9 16:41:00
--
DataColChanged事件
select case e.datacol.name
case “安全库存数量”，“库存数量”
if e.datarow("安全库存数量")>e.datarow("库存数量") then
messagebox.show("库存不足了")
end if
end select
-- 发布时间：2015/4/9 16:48:00
--
在临时表中这个事件，我想通过一个按钮来实现
[此贴子已经被作者于2015/4/9 16:48:21编辑过]
-- 发布时间：2015/4/9 16:51:00
--
利用SQLcommand
执行SQL语句查询看看结果是否大于0
"select count(*) f rom {表名} where 安全库存数量 >库存数量"
-- 发布时间：2015/4/9 16:52:00
--
已经加载的话，直接：
Dim dr As DataRow = DataTables("表名").find("安全库存数量>库存数量")
if dr isnot nothing then
messagebox.show("报警信息")
end if
-- 发布时间：2015/4/9 17:01:00
--
Dim cmd As New SQLCommand
cmd.CommandText ="select count(*) f om {统计表1} where 安全库存数量 >库存数量"
If cmd.ExecuteScalar > 0 Then
Messagebox.Show("存在库存不足的产品","提示")
End If
这样写的，结果报错了，我觉得可能是因为这个表不是外部表把
-- 发布时间：2015/4/9 17:02:00
--
报错什么? F ROM 写对吗? 没空格的哦.
-- 发布时间：2015/4/9 17:02:00
--
列名加上[] 括号看看
-- 发布时间：2015/4/9 17:10:00
--
bin老师，你帮忙看一下，问题在截图中，form我改了
此主题相关图片如下：qq图片20150409171023.png
[此贴子已经被作者于2015/4/9 17:10:58编辑过]
-- 发布时间：2015/4/9 17:11:00
--
列名不对呗.