请问如何从子窗体的数据表里添加记录到另一个子窗体的数据表并且都能关联到主窗体的字段上

charlie　发表于：2013-12-30 12:58:56 　

我想制作一个制作清单，点击按钮后从产品结构数据表表中选择需要(最好可以多选）的字段（如ID,物料编号，父子关系，名称等）到制作清单的字段内再修改其他类似数量重量等

下面是我随便拿了个表做的试验，但是不是找不到对象就是值错误

Private Sub Command3_Click()
    Dim n As String
    Dim m As String
    Dim l As String
    DoCmd.GoToRecord , , acNewRec '定位到单据明细表的新纪录上？？
    insert into 单据明细表(料品id,单据id,name) values(n,m,l)
    n = BOM表.[BOMid]
    m = BOM表.[单据id]
    l = BOM表.[产品编码]
    Forms!单据明细表.Requery

End Sub

Top

煮江品茶发表于：2013-12-30 13:21:38

Top

charlie 发表于：2013-12-30 13:24:33

老师我初学就表笑我嘛

我又看了些资料修改了下，但提示找不到窗体：窗体明细表。

Private Sub Command3_Click()
    Dim rec_insert As String
    rec_insert = "insert into me.单据明细表 (料品id,单据id) select [产品编码],[id] from Me.BOM表"
    Forms!单据明细表.Requery
End Sub

Top

煮江品茶发表于：2013-12-30 13:31:43

Forms!单据明细表_子窗体.Requery

Top

charlie 发表于：2013-12-30 13:43:27

用了DOCMD.RUNSQL“insert into..."后发现他把整个表格的记录全导进去了，怎么才能把我选择的复制过去，或者双击需要的内容复制到新表里呢？

Top

煮江品茶发表于：2013-12-30 13:48:02

加where子句

Top

charlie 发表于：2013-12-30 14:05:01

Private Sub Command3_Click()
On Error GoTo Err_Command3_Click
'还是不行没有反应了