以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  多条件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29934)

--  作者:wilson
--  发布时间:2013/3/16 22:46:00
--  多条件
Dim dr2 As DataRow In DataTables("库存表").find("名称 = \'" & e.Form.Controls("名称").value & "\' And 颜色 = \' " & e.Form.Controls("颜色").value & " \' AND 规格 = \' " & e.Form.Controls("规格").value & " \'")   

If dr IsNot Nothing Then

dr("数量") = dr("数量") + e.Form.Controls("数量").value

end if

当库存表的名称、颜色、规格列与窗口文本框里的名称、颜色、规格一致时,库存表的数量等于数量加e.Form.Controls("数量").value 。 

上述代码运行后值错误,求助

谢谢!


--  作者:wilson
--  发布时间:2013/3/16 23:01:00
--  
Dim dr2 As DataRow = DataTables("库存表").find("名称 = \'" & e.Form.Controls("名称").value & "\' And 颜色 = \' " & e.Form.Controls("颜色").value & " \' AND 规格 = \' " & e.Form.Controls("规格").value & " \'")

If dr IsNot Nothing Then

dr("数量") = dr("数量") + e.Form.Controls("数量").value

end if


--  作者:wilson
--  发布时间:2013/3/18 21:21:00
--  
谢谢你的帮助! 是的,在if里的为dr2