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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口不加载数据

共有1679人关注过本帖树形打印复制链接主题：窗口不加载数据

zhangjian222200

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

加好友

发短信

等级：七尾狐帖子：1550 积分：10977 威望：0 精华：0 注册：2016/9/12 11:18:00

窗口不加载数据 发帖心情

Post By：2016/12/27 9:19:00 [只看该作者]

窗口表“男生报名页_tablebmnvsb”的doubleclickrowheader，设置代码如下：

'从"会员资料"表,提取报名或被报名人的个人资料信息

Dim PD03 As String = Tables("男生报名页_Tablebmnvsb").Current("女_编号")

forms("女简历").open()

With DataTables("女简历_Tablenvszl")

.LoadTop = 4

.LoadPage = 0

'.LoadOrder = "注册日期 Desc"

.LoadFilter = "[会员编号] = " & PD03

.Load()

End With

女简历，模式窗口，正常打开，但是窗口表：“女简历_tablenvszl”，不加载数据，关闭窗口“女简历”，提示：不存在“女简历_tablenvszl”的datatable

.NET Framework 版本：2.0.50727.3655

Foxtable 版本：2016.7.29.1

错误所在事件：男生报名页_Tablebmnvsb,DoubleClickRowHeader

详细错误信息：

未将对象引用设置到对象的实例。

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 9:24:00 [只看该作者]

这段代码，要写到模式窗口的afterload事件

With DataTables("女简历_Tablenvszl")

.LoadTop = 4

.LoadPage = 0

'.LoadOrder = "注册日期 Desc"

.LoadFilter = "[会员编号] = " & PD03

.Load()

End With

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 9:25:00 [只看该作者]

如果需要参数传递，就这样写

Dim PD03 As String = Tables("男生报名页_Tablebmnvsb").Current("女_编号")

vars("pd03") = pd03

forms("女简历").open()

AfterLoad事件

With DataTables("女简历_Tablenvszl")

.LoadTop = 4

.LoadPage = 0

'.LoadOrder = "注册日期 Desc"

.LoadFilter = "[会员编号] = " & vars("PD03")

.Load()

End With

zhangjian222200

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

加好友

发短信

等级：七尾狐帖子：1550 积分：10977 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2016/12/27 9:49:00 [只看该作者]

改了，没有任何提示，我设置了全局代码传递数据，还是没有数据加载（表数据我检查了，“女_编号”、“会员编号”是存在且对应的）

窗口表“男生报名页_tablebmnvsb”的doubleclickrowheader，设置代码如下：

'从"会员资料"表,提取报名或被报名人的个人资料信息

nvsbh = Tables("男生报名页_Tablebmnvsb").Current("女_编号")

forms("女简历").open()

女简历，模式窗口，正常打开，模式窗口的afterload事件:

With DataTables("女简历_Tablenvszl")

.LoadTop = 4

.LoadPage = 0

'.LoadOrder = "注册日期 Desc"

.LoadFilter = "[会员编号] = " & nvsbh

.Load()

End With

此主题相关图片如下：未命名2.jpg

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 9:51:00 [只看该作者]

你左边的表示什么类型的table？如何绑定的？

zhangjian222200

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

加好友

发短信

等级：七尾狐帖子：1550 积分：10977 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2016/12/27 9:53:00 [只看该作者]

这是项目文件

已删除

[此贴子已经被作者于2016/12/27 10:43:27编辑过]

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 10:07:00 [只看该作者]

不是写到表格的afterLoad事件，你要写到窗口的AfterLoad事件。

With DataTables("女简历_Tablenvszl")
    .LoadTop = 4
    .LoadPage = 0
    '.LoadOrder = "注册日期 Desc"
    .LoadFilter = "[会员编号] = '" & nvsbh & "'"
    .Load()
End With

zhangjian222200

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

加好友

发短信

等级：七尾狐帖子：1550 积分：10977 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2016/12/27 10:27:00 [只看该作者]

双击第一行表头会弹出错误，点继续，可以正常提取数据

双击其他行表头，正常

咋回事？

此主题相关图片如下：未命名3.jpg

[此贴子已经被作者于2016/12/27 10:32:34编辑过]

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2016/12/27 10:31:00 [只看该作者]

我测试没问题。

报什么错？截图说明。

zhangjian222200

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

加好友

发短信

等级：七尾狐帖子：1550 积分：10977 威望：0 精华：0 注册：2016/9/12 11:18:00

Post By：2016/12/27 10:37:00 [只看该作者]

此主题相关图片如下：未命名3.jpg

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

总数 15 1 2 下一页

主题：窗口不加载数据