- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 新增 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=96834)
-- 发布时间：2017/2/28 18:05:00
-- 新增
我想通过窗口的形式新增订单，新增按钮代码如下:
With Tables("订单信息")
If .Current Is Nothing OrElse .Current.DataRow.RowState = DataRowState.Unchanged Then
Tables("订单信息").AddNew()
End If
End With
疑问：这个代码的结果虽然新增了行，但是输入的数据并没有保存到表里，我知道这个代码肯定不对，但是如何解决？跪求
另外比如说“订单信息”表中 双击某一行之后跳出了编辑窗口，但是为什么编辑窗口里没有任何数据啊
[此贴子已经被作者于2017/2/28 18:06:18编辑过]
-- 发布时间：2017/2/28 18:08:00
--
。。。不会上传图片
-- 发布时间：2017/2/28 18:25:00
--
一般是表名弄错了，看你窗口控件绑定的是哪个表。
看你双击的表是绑定哪个表？是不是副本表？副本表的表名是（窗口名_Table1)
-- 发布时间：2017/3/1 8:42:00
--
我看了，表名是对的，是“订单信息”
-- 发布时间：2017/3/1 8:55:00
--
上传例子说明
-- 发布时间：2017/3/1 9:08:00
--
http://pan.baidu.com/s/1pKMl0cN
http://pan.baidu.com/s/1milubDe
http://pan.baidu.com/s/1pKVEQRx
能看到不
-- 发布时间：2017/3/1 9:09:00
--
-- 发布时间：2017/3/1 9:10:00
--
。。。。上传图片还是不会搞，晕了
-- 发布时间：2017/3/1 9:14:00
--
上传附件方法：http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78
控件绑定到表：http://www.foxtable.com/webhelp/scr/0704.htm
-- 发布时间：2017/3/1 9:41:00
--
绑定到表了，但是头两次管用，之后又不行了
另外目录树，前几天都没问题，今天双击后出现错误，显示DATABINDING 无法在列表中找到适合所有绑定的行
目录树代码如下：
Dim Filter As String
Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的行
If e.Node.Text <> "显示所有行" Then
Select Case e.Node.Level
Case 0
Filter = "[分组] = \'" & dr("分组") & "\'"
Case 1
Filter = "[分组] = \'" & dr("分组") & "\' And [业务] = \'" & dr("业务") & "\'"
Case 2
Filter = "[分组] = \'" & dr("分组") & "\' And [业务] = \'" & dr("业务") & "\' And [品牌] = \'" & dr("品牌") & "\'"
End Select
End If
Tables("订单信息").Filter = Filter
此主题相关图片如下：绑定表.jpg
此主题相关图片如下：目录树.jpg