统计 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

共有9713人关注过本帖树形打印复制链接主题：统计

lfxxdt

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：513 积分：3935 威望：0 精华：0 注册：2012/6/26 13:23:00

统计

Post By：2012/9/28 15:06:00 [只看该作者]

Select e.DataCol.name '按照生产批号汇总自动添加到生产计划单中.
    Case "联号"
    Dim dr As DataRow = e.DataRow
    Dim lf1 As String = dr("联号")
    Dim lf2 As String = dr("上工序")
    Dim cmd As New SQLCommand
    cmd.CommandText = "Select sum(正品数) From {日报表} Where 生产状态 ='正常生产' and 联号 =' lf1' and 工序 =' lf2 '"
    dr("上工序数")=cmd.ExecuteScalar()
End Select

以上代码黄色部分多条件如何编写，单个条件能运行，多个条件就运行不了

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/9/28 15:09:00 [只看该作者]

你得先告诉大家正常生产、联号、工序这三列的数据类型。

lfxxdt

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：513 积分：3935 威望：0 精华：0 注册：2012/6/26 13:23:00

Post By：2012/9/28 15:11:00 [只看该作者]

全都是字符型的

狐狸爸爸

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/9/28 15:22:00 [只看该作者]

Select e.DataCol.name '按照生产批号汇总自动添加到生产计划单中.
    Case "联号"
    Dim dr As DataRow = e.DataRow
    Dim lf1 As String = dr("联号")
    Dim lf2 As String = dr("上工序")
    Dim cmd As New SQLCommand
    cmd.CommandText = "Select sum(正品数) From {日报表} Where 生产状态 = '" & dr("正常生产") & "' And 联号 = '" & lf1 & "' And 工序 ='" & lf2 & "'"
    dr("上工序数")=cmd.ExecuteScalar()
End Select

建议看看：

http://www.foxtable.com/help/topics/1284.htm

lfxxdt

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：513 积分：3935 威望：0 精华：0 注册：2012/6/26 13:23:00

Post By：2012/9/28 15:26:00 [只看该作者]

已可以了谢谢

下一主题 >> << 上一主题

主题：统计