給我帶來問題的欄位是unique required欄位，它在tbl1上叫做ItemNo。我想從tbl2中復制ItemNo欄位的值，并將其添加到tbl1ItemNo檔案中，但在字串的末尾添加D。所有的ItemNo欄位都被格式化為Text
tbl1目前看起來像：
ID ItemNo ItemDescription ....
1 001 環氧樹脂 ....
2 002 木膠 ....
tbl2目前看起來像：
ID ItemNo ItemDescription ....
1 001 環氧樹脂 ....
2 002 WD40 ....
期望更新后的tb1看起來像：
ID ItemNo ItemDescription ....
1 001 環氧樹脂 ....
2 002 木膠 ....
3 001D 環氧樹脂 ....
4 002D WD40 ....
也許是這樣的：
CurrentDB.Execute "INSERT INTO tbl1 SELECT * FROM tbl2 ...."
我可以使用DAO完成任務，但想知道它是否也可以使用SQL。
Dim rs1 As DAO.recordset
Dim rs2 As DAO.Recordset
Set rs1 = CurrentDb.OpenRecordset("SELECT*FROM tbl1"/span>)
Set rs2 = CurrentDb.OpenRecordset("SELECT*FROM tbl2")
With rs2
.MoveFirst
Do Until rs2.EOF
rs1.AddNew
rs1.Fields("ItemNo").Value = rs2.Fields("ItemNo") .Value & "D"
....
....
rs1.編輯
rs1.更新
rs2.MoveNext
Loop Loop
結束 有
rs1.關閉
Set rs1 = Nothing
rs2.關閉
Set rs2 = Nothing
uj5u.com熱心網友回復：
嗯 . . 你似乎想：
insert into tbl1 (itemNo, itemDescription)
select itemNo & 'd'/span>, itemDescription
from tbl2;
這假定id是自動分配的。
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/314200.html
標籤：
上一篇：標準運算式中的資料型別不匹配
下一篇：VBA檔案保存路徑問題