以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 一个奇怪的异常,求解决办法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62297) |
-- 作者:jialihaha -- 发布时间:2014/12/29 15:13:00 -- 一个奇怪的异常,求解决办法 有个表,通过筛选后,列表没有一行数据,接着点击新增,就会发生异常,如下图: 记录窗口出现大红叉,实在找不到为什么,求解答。 新增按钮的代码如下: Dim dr As DataRow = Tables("接单部_tbOrders").AddNew().DataRow dr("报价人UserId") = logindr("UserId") Dim cmd As New SQLCommand Dim dt As Date cmd.C cmd.CommandText = "Select GetDate()" dt = cmd.ExecuteScalar() dr("报价日期")=Format(dt, "G") |
-- 作者:Bin -- 发布时间:2014/12/29 15:19:00 -- 上个例子看看吧 |
-- 作者:jialihaha -- 发布时间:2014/12/29 15:22:00 -- 这个项目是公司的内部的数据,不好弄例子,数据库也是外部数据源,你大概看看会是什么原因导致的。 |
-- 作者:黄训良 -- 发布时间:2014/12/29 15:50:00 -- 这样改,你试试看:
Dim dr As DataRow
dr= Tables("接单部_tbOrders").AddNew()
dr("报价人UserId") = logindr("UserId")
Dim cmd As New SQLCommand
Dim dt As Date
cmd.C
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
dr("报价日期")=Format(dt, "G")
|
-- 作者:有点甜 -- 发布时间:2014/12/29 16:05:00 -- 应该跟代码无关,其它东西影响了。你慢慢调试看哪一句代码导致出错的。 |
-- 作者:jialihaha -- 发布时间:2014/12/29 16:06:00 -- 一样的,不行 |
-- 作者:jialihaha -- 发布时间:2014/12/29 16:21:00 -- 有点甜老师,能否远程帮我看一看,我找了一天了,相关的地方也看了,没有找到问题所在...... [此贴子已经被作者于2014-12-29 16:21:00编辑过]
|
-- 作者:e-png -- 发布时间:2014/12/29 16:32:00 -- 这个应该给个例子才好找原因的。
先这样试试: 先取消筛选 - 新增行 - 赋值 - 再筛选出新增行······· 如果你这个表是通过查询来的估计就不可以了。。。 |
-- 作者:jialihaha -- 发布时间:2014/12/29 16:35:00 -- 这样做是没问题的,只要有记录,都可以正常新增 这个表是直接绑定的,不是查询 谁有时间,有耐心的,QQ远程调试下,我的QQ:448973088
[此贴子已经被作者于2014-12-29 16:37:12编辑过]
|
-- 作者:有点甜 -- 发布时间:2014/12/29 16:46:00 -- 联系客服QQ |