主子窗体保存例子

你是坏蛋

根据小宝帮主的例子改的
各位看看如何？
请多指教。

你是坏蛋

主子窗体都采用不绑定模式，彻底解决子窗体自动保存的问题。

保存后，按理应该关闭记录集，
但是用.close后，提示出错
奇怪，公司的电脑就不会，不知道为什么？
请高手帮忙看下。

t小宝

你是坏蛋 发表于 2012-11-21 21:30
主子窗体都采用不绑定模式，彻底解决子窗体自动保存的问题。

保存后，按理应该关闭记录集，

   Set rs = Nothing
   Set rst = Nothing
   'rs.Close
   'rst.Close

顺序搞反了，应该rst.Close在前，Set rst = Nothing在后。
另外你这个库没看出是从我的例子改过来的呀

你是坏蛋

  Set rs = New ADODB.Recordset
  With rs
    .CursorLocation = adUseClient
    .Open str, CurrentProject.Connection, adOpenStatic, adLockBatchOptimistic
     Set .ActiveConnection = Nothing
  End With
  Set Me.订单明细子窗体.Form.Recordset = rs
-----------------------------------------------------
你的是建立一个类模块
我直接放在窗体模块了，我是根据你的思路，建立一个记录集，然后断开连接。这样在子窗体更新数据就不会自动保存了。然后再建立另外一个记录集（我用的是DAO），保存到需要保存的表里

你是坏蛋

我足足研究了一个礼拜你的例子，才搞得有点明白。
{:soso_e106:}