以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [已解决]【已上传实例】条码如何读取窗体中的副本的数据?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=13685)

--  作者:hanxuntx
--  发布时间:2011/10/23 9:07:00
--  [已解决]【已上传实例】条码如何读取窗体中的副本的数据?


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.png
图片点击可在新窗口打开查看

请问:

 

点击菜单按钮“工单修改”

 

窗口“工单查询”中的表是“工单表”的副本,窗口“订单修改”如何读取“工单查询_Table1”的数据?

 

[此贴子已经被作者于2011-10-24 11:14:08编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/10/23 9:16:00
--  

http://www.foxtable.com/help/topics/2311.htm

 


--  作者:hanxuntx
--  发布时间:2011/10/23 11:33:00
--  

想要的目的,点击菜单按钮“修改订单”能读取窗体中的数据

 

狐爸帮忙看下,帮助我读了,还是不得要领啊

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:狐狸爸爸
--  发布时间:2011/10/23 11:39:00
--  

正确的代码是:

 

If Forms("窗口1").Opened
    For Each c As Winform.Control In e.Form.Controls
        If c.Bindingfield > "" AndAlso c.Bindingfield.StartsWith("表B.")  Then
            c.BindingField= c.BindingField.Replace("表B.", "窗口1_Table1.")
        End If
    Next
End If

 


--  作者:hanxuntx
--  发布时间:2011/10/23 11:52:00
--  
狐爸,这个真不行。 我确定我测试的时候窗口是打开的。问题不在这里吧
--  作者:狐狸爸爸
--  发布时间:2011/10/23 11:57:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:hanxuntx
--  发布时间:2011/10/23 13:09:00
--  
谢谢狐爸,搞定了,原来是条码控件的原因
--  作者:hanxuntx
--  发布时间:2011/10/23 13:26:00
--  

If Forms("工单查询").Opened Then
    For Each c As Winform.Control In e.Form.Controls
        If c.name <> "BarCode1" Then    \'不加这一句打开窗口会报错,说是集合已经改变,无法枚举
            If c.Bindingfield > "" AndAlso c.Bindingfield.StartsWith("工单表.")  Then
                c.BindingField = c.BindingField.Replace("工单表.", "工单查询_Table1.")
            End If
        End If
    Next
End If

e.Form.Controls("BarCode1").Code = e.Form.Controls("TextBox2").value

 

但是加了,窗口中的条码如何获取值呢?  TextBox2 绑定了表中的“工单ID”字段,条码也是绑定的这个字段

 


--  作者:狐狸爸爸
--  发布时间:2011/10/23 14:32:00
--  
没有明白你的意思,请用例子说话
--  作者:hanxuntx
--  发布时间:2011/10/23 15:47:00
--  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

 

请帮忙看下