请问动态DataList如何设置刷新按钮?(附问:如何清空动态DataList数据?) - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请问动态DataList如何设置刷新按钮?(附问:如何清空动态DataList数据?)

共有28846人关注过本帖树形打印复制链接主题：请问动态DataList如何设置刷新按钮?(附问:如何清空动态DataList数据?)

菜鸟foxtable

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

加好友

发短信

菜鸟中的老鸟
等级：七尾狐帖子：1486 积分：10064 威望：0 精华：9 注册：2008/11/14 8:54:00

请问动态DataList如何设置刷新按钮?(附问:如何清空动态DataList数据?) 发帖心情

Post By：2009/1/12 15:16:00 [显示全部帖子]

按钮A代码如下:
Dim cmd As New SQLcommand
cmd.Con nection Name = "zygl" 这行故意留空格的,否则论坛不显示...
cmd.CommandText = "Select 入院日期,住院号,姓名,性别,年龄,入院诊断,费用类别,出院诊断,出院申请 From [住院登记] where 出院结账 = false"
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.DataTable = cmd.ExecuteReader()
dst.Build()

另设定一个按钮B,应该如何设置代码进行DataList1数据的刷新?(数据发生变化,项目不曾关闭前提下)

[此贴子已经被作者于2009-1-12 16:33:15编辑过]

菜鸟foxtable

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

加好友

发短信

菜鸟中的老鸟
等级：七尾狐帖子：1486 积分：10064 威望：0 精华：9 注册：2008/11/14 8:54:00

Post By：2009/1/12 16:06:00 [显示全部帖子]

以下是引用lxl在2009-1-12 15:31:00的发言：

就把按钮A当刷新按钮吧

看来还是外部数据表没同步...
上述代码前面加上下面这段就OK了..
For Each dt As DataTable In DataTables
dt.Save()
Next

[此贴子已经被作者于2009-1-12 16:32:29编辑过]

菜鸟foxtable

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

加好友

发短信

菜鸟中的老鸟
等级：七尾狐帖子：1486 积分：10064 威望：0 精华：9 注册：2008/11/14 8:54:00

Post By：2009/1/12 16:31:00 [显示全部帖子]

附带问个问题,项目不关闭前提下,切换回动态DataList窗口时,自动清空DataList里的数据,窗口加载时的执行代码如何写?

菜鸟foxtable

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

加好友

发短信

菜鸟中的老鸟
等级：七尾狐帖子：1486 积分：10064 威望：0 精华：9 注册：2008/11/14 8:54:00

Post By：2009/1/12 17:11:00 [显示全部帖子]

以下是引用czy在2009-1-12 16:47:00的发言：
最好的办法恐怕是什么代码都不写，或从RowFilter中想办法。

代码还是要写的...加载窗口时执行上述代码的同时加入下面这个条件...

Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.RowFilter= "[住院号] = ''"
dst.Build()

呵呵,这样子应该可以..因为住院号不可能为空.. 图片点击可在新窗口打开查看

[此贴子已经被作者于2009-1-12 17:12:54编辑过]

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

主题：请问动态DataList如何设置刷新按钮?(附问:如何清空动态DataList数据?)