以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 模式窗口下的新增行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=59712)

--  作者:wumingrong1
--  发布时间:2014/11/9 14:58:00
--  [求助] 模式窗口下的新增行
我有一个 窗口类型 为 “模式” 的窗口,在该窗口中有一个 录入按钮 写有以下命令,

想实现:在”系统注册信息表“中新增一行,并将本窗口中相对应控件的内容填到新增行中去;但是点击  录入按钮  后,再打开项目在”系统注册信息表“中没有看到新增行。是不是在”模式“窗口中的命令不一样?我该怎么改?


    Dim nd As DataRow = DataTables("系统注册信息表").AddNew
    
    
    nd("分公司") = e.Form.Controls("分公司").Text
    nd("所属部门") = e.Form.Controls("所属部门").Text
    nd("电脑类别") = e.Form.Controls("电脑类别").Text
    nd("姓名") = e.Form.Controls("姓名").Text
    nd("联系电话") = e.Form.Controls("联系电话").Text
    nd("机器码") = e.Form.Controls("机器码").Text

Tables("系统注册信息表").Current.Save() \'保存"***"表

--  作者:有点甜
--  发布时间:2014/11/9 15:01:00
--  
Dim nd As DataRow = DataTables("系统注册信息表").AddNew
    
    nd("分公司") = e.Form.Controls("分公司").Text
    nd("所属部门") = e.Form.Controls("所属部门").Text
    nd("电脑类别") = e.Form.Controls("电脑类别").Text
    nd("姓名") = e.Form.Controls("姓名").Text
    nd("联系电话") = e.Form.Controls("联系电话").Text
    nd("机器码") = e.Form.Controls("机器码").Text

nd.Save() \'保存"***"表

--  作者:wumingrong1
--  发布时间:2014/11/9 15:12:00
--  
如果 保存 ”系统注册信息表“的命令不在当前窗口呢?保存命令该怎么写?

比如:在录入窗口中写有以下命令

Dim nd As DataRow = DataTables("系统注册信息表").AddNew
    
    nd("分公司") = e.Form.Controls("分公司").Text
    nd("所属部门") = e.Form.Controls("所属部门").Text
    nd("电脑类别") = e.Form.Controls("电脑类别").Text
    nd("姓名") = e.Form.Controls("姓名").Text
    nd("联系电话") = e.Form.Controls("联系电话").Text
    nd("机器码") = e.Form.Controls("机器码").Text


在另外的 窗口需要写有保存”系统注册信息表“的按钮;这个保存命令该怎么写?
nd.Save() \'保存"***"表

--  作者:有点甜
--  发布时间:2014/11/9 15:13:00
--  
 DataTables("系统注册信息表").Save