以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  错误提示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=111709)

--  作者:zhangxl1964
--  发布时间:2017/12/28 9:13:00
--  错误提示
有点甜老师:你好!
  在2017年时,代码执行正常,进入2018年,执行时弹出一下提示,什么原因?
.NET Framework 版本:2.0.50727.8762
Foxtable 版本:2017.10.26.1
错误所在事件:表,申购明细, DataColChanged
详细错误信息:
调用的目标发生了异常。
年、月和日参数描述无法表示的 DateTime。

--  作者:zhangxl1964
--  发布时间:2017/12/28 9:14:00
--  
           \'提取当前日期前,入库明细中的入库数量
            Dim cmd1 As New SQLCommand
            cmd1.C
            Dim dt1 As DataTable
代码是: 
 cmd1.CommandText = "SELECT ([入库单价]) As 入库单价,([加成比率]) As 加成比率 F rom {入库明细} Where [存货编码] = \'" & num & "\' And 入库明细.[客户编码] Is null And [日期] <= \'" & QueryMonth & "\' And [日期]=(Select max(入库明细.[日期]) As 日期 f rom 入库明细 where 入库明细.[存货编码]=" & num & " and 入库明细.[日期]<=\'" & QueryMonth & "\' And 入库明细.[客户编码] Is null  )"
            dt1 = cmd1.ExecuteReader
            If dt1.DataRows.Count > 0 Then
                rkdj = Math.Round((dt1.DataRows(0)("入库单价")),2)
                \'psdj = Math.Round((dt1.DataRows(0)("配送单价")),2)
                bl = Math.Round((dt1.DataRows(0)("加成比率")),4)
                dr("入库单价") = rkdj
                dr("加成比率") = bl
            End If


--  作者:有点甜
--  发布时间:2017/12/28 9:20:00
--  
你的queryMonth的值是什么?弹出看看msgbox(queryMonth)
--  作者:zhangxl1964
--  发布时间:2017/12/28 9:50:00
--  
就弹出:.NET Framework 版本:2.0.50727.8762
Foxtable 版本:2017.10.26.1
错误所在事件:表,申购明细, DataColChanged
详细错误信息:
调用的目标发生了异常。
年、月和日参数描述无法表示的 DateTime。

--  作者:有点甜
--  发布时间:2017/12/28 9:55:00
--  
贴出完整的datatacolchanged事件代码。
--  作者:zhangxl1964
--  发布时间:2017/12/28 9:58:00
--  
问题找到了,日期列存在空白行