- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] SQL 加载数据修改后，如果快速更新后台 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103280)
-- 发布时间：2017/7/4 17:12:00
-- [求助] SQL 加载数据修改后，如果快速更新后台
Dim tx As String = e.Sender.Text
Dim fi As String = "[窗体名称] like \'%" & tx & "%\' or [用户名] like \'%" & tx & "%\'"
Dim tb As Table = Tables(e.Form.Name & "_Table1")
Dim dt As DataTable
Dim cmd As new SQLCommand
cmd.C
cmd.CommandText = "sele ct * from {窗体权限} where " & fi
dt = cmd.ExecuteReader()
tb.DataSource = dt
如上代码加载的数据，如果有些数据有修改，如何快速更新。
-- 发布时间：2017/7/4 17:15:00
--
改成这样
dt = cmd.ExecuteReader(true)
tb.DataSource = dt
修改后，如果想保存，就写 Tables(e.Form.Name & "_Table1").Save
-- 发布时间：2017/7/5 13:56:00
--
Dim cmd As new SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "sel ect * from {Users} "
dt = cmd.ExecuteReader(True)
Dim tb As Table = Tables(e.Form.Name & "_Table1")
tb.DataSource = dt
修改后，点击控件无法保存
DataTables(e.Form.Name & "_Table1").save
Tables(e.Form.Name & "_Table1").save
[此贴子已经被作者于2017/7/5 13:56:42编辑过]
-- 发布时间：2017/7/5 14:08:00
--
改成这样
Dim tb As Table = Tables(e.Form.Name & "_Table1")
tb.Fill("select * from {Users}", "数据源名", False)
tb.AllowEdit = True
-- 发布时间：2017/7/16 16:04:00
--
此主题相关图片如下：无标题1.png
老师，用这个方法 出现了如上图所示的问题，需采购数量的列，一直无法显示
-- 发布时间：2017/7/16 16:27:00
--
你这一列是不是表达式列？表达式列不出现是正常的。
如果是数据列，看看你数据库那里的列名是什么，列名写错了。
[此贴子已经被作者于2017/7/16 16:27:35编辑过]
-- 发布时间：2017/7/17 17:01:00
--
老师，现在碰到个新的问题，为了快整加载程序，我都用了Fill和SQL加载数据
但问题是，窗体无法用主窗体模式，
这样只能用独立窗体，导致窗体非常多。
有没有什么更好的思路或方法解决。
-- 发布时间：2017/7/17 17:03:00
--
为什么不能用主窗体模式？你用什么窗口都可以的啊。
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=83709&skin=0
-- 发布时间：2017/7/17 20:21:00
--
老师，看得不太懂。。。。。估计一时半会吃不透。
有没有什么更方便的方法可以实现。
-- 发布时间：2017/7/17 20:36:00
--
可以用并列窗口