以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 报错请教:值不能为 null,参数名: key (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173110) |
-- 作者:foxyuan -- 发布时间:2021/11/15 19:30:00 -- 报错请教:值不能为 null,参数名: key 如下代码:主要问题在第一行,如果这行去掉不报错,但这一行不能去掉。 DataTables("员工统计").datarows.clear \'清空全部行 Dim f As New Filler f.SourceTable = DataTables("员工档案") \'指定数据来源 f.SourceCols = "员工编号" \'指定数据来源列 f.DataTable = DataTables("员工统计") \'指定数据接收表 f.DataCols = "员工编号" \'指定数据接收列 f.Filter = "[员工状态]=\'在职\'or [员工状态]=\'试用期\'" \'指定填充条件 f.Append = False \'在原有行中填充,行不够再增加新行 f.Fill() \'填充数据 |
-- 作者:foxyuan -- 发布时间:2021/11/15 19:33:00 -- 试了一下,以开发者身份登录,好象不会报错,正常运行。 |
-- 作者:foxyuan -- 发布时间:2021/11/15 19:50:00 -- 只有开发者身份可以,其他管理员身份也是报错 |
-- 作者:有点蓝 -- 发布时间:2021/11/15 20:18:00 -- 其它用户登录的时候是不是没有加载"员工统计"这个表? |
-- 作者:foxyuan -- 发布时间:2021/11/15 20:42:00 -- 有的,第一行之前是这个: If DataTables.Contains("员工统计") = False DataTables.Load("员工统计") End If |
-- 作者:有点蓝 -- 发布时间:2021/11/15 20:46:00 -- 贴出完整代码!!藏藏掖掖的解决不了问题 |
-- 作者:foxyuan -- 发布时间:2021/11/15 20:58:00 -- 一个菜单命令,其他没有什么 If DataTables.Contains("员工统计") = False DataTables.Load("员工统计") End If DataTables("员工统计").datarows.clear \'删除全部行 Dim f As New Filler f.SourceTable = DataTables("员工档案") \'指定数据来源 f.SourceCols = "员工编号" \'指定数据来源列 f.DataTable = DataTables("员工统计") \'指定数据接收表 f.DataCols = "员工编号" \'指定数据接收列 f.Filter = "[员工状态]=\'在职\'or [员工状态]=\'试用期\'" \'指定填充条件 f.Append = False \'在原有行中填充,行不够再增加新行 f.Fill() \'填充数据 Dim t As Table = Tables("员工统计") t.DefaultRowHeight = 28 \'所有行高 t.SysStyles("Alternate").BackColor = Color.FromARGB(224,224,224) t.Grid.Styles("Normal").Border.Color = Color.SkyBlue Forms("员工统计窗口").open Tables("员工统计").OpenView("员工统计") MainTable = Tables("员工统计") |
-- 作者:有点蓝 -- 发布时间:2021/11/15 21:00:00 -- If DataTables.Contains("员工统计") = False DataTables.Load("员工统计") End If msgbox(DataTables.Contains("员工统计")) msgbox(DataTables("员工统计").datarows.count) 能不能弹出,弹出什么内容? DataTables("员工统计").datarows.clear \'删除全部行
|
-- 作者:foxyuan -- 发布时间:2021/11/15 21:10:00 -- true 0 |
-- 作者:foxyuan -- 发布时间:2021/11/15 21:18:00 -- 开发者登录,只运行这段也是true,0 而且不管点多少次都不报错。
|