参照帮助设计任务栏动态任务时出现以下问题
在开发者登录情况下，以下代码在任务栏的统计信息没有问题，也能打开表A窗口
表A行的内容是从表B通过数据填充提取数据的
1. 我做的是自定义登录系统，自定义登录后，以下代码统计信息为（0），并且表A只见表头没有行
2. 在开发者登录情况下，表A和表B可见行及其内容，在表A窗口和表B窗口显示也正常
3. 代码中如果设置SQLCompute"Count(*)"为Compute"Count(_Identify)"会报错
目前报错为“列_约束值是唯一的，值”33“已存在，有时是值”11“已存在，有时是值”25“已存在。
我不知道是哪里冲突了，怀疑是主键出现问题，请老师指导指导，谢谢！！
在AfterLoad设置的代码
Dim Page As WinForm.TopicPage
Dim cnt1 As Integer = DataTables("表A").SQLCompute("Count(*)","任务发布时间 = #" & DateTime.Today & "#")
Page = e.Form.Controls("TopicBar1").Pages.Add("市场部","市场部")
Page.Links.Add("今日新增任务","今日新增任务(" & cnt1 & ")" )
在TopicLinkClick设置的代码
Select Case e.Link.Name
Case "今日新增任务"
Tables("表A").Filter = "任务发布时间 = #" & DateTime.Today & "#"
Forms("市场任务接收").Open()
End Select
表A与表B的数据填充代码
Dim f As New Filler
f.SourceTable = DataTables("表B") '指定数据来源
f.SourceCols = "部门名称,部门负责人,任务发布时间,工作任务书,发布人" '指定数据来源列
f.DataTable = DataTables("表A") '指定数据接收表
f.DataCols = "部门名称,部门负责人,任务发布时间,工作任务书,发布人" '指定数据接收列
f.filter = "_Identify = " & Tables("市场部任务发出").Current("_Identify")
f.fill()'填充数据
加好友 
发短信
Post By：2015/7/8 16:22:00 [显示全部帖子]
