กระทู้เก่าบอร์ด อ.Yeadram
1,042 3
URL.หัวข้อ /
URL
เอาค่าฟิว จากเทเบิลไปใส่ฟิวอีกเทเบิลยังไงครับ
เอาค่าฟิว จากเทเบิลไปใส่ฟิวอีกเทเบิลยังไงครับ
เช่น
Table-A
-filled1
Table-B
-filled1
ขอบคุณครับ
เช่น
Table-A
-filled1
Table-B
-filled1
ขอบคุณครับ
3 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R15988
รบกวนด้วยครับ..
2 @R15991
Dim rst1 As Recordset
Dim rst2 As Recordset
Set rst1 = CurrentDb.OpenRecordset("Table-A",dbOpendynaset)
Set rst2 = CurrentDb.OpenRecordset("Table-B",dbOpendynaset)
rst1.MoveFirst
While Not rst1.EOF
With rst2
.Edit
.Fields("field1) = rst1.Field("field1")
.Update
End With
rst1.MoveNext
Wend
Dim rst2 As Recordset
Set rst1 = CurrentDb.OpenRecordset("Table-A",dbOpendynaset)
Set rst2 = CurrentDb.OpenRecordset("Table-B",dbOpendynaset)
rst1.MoveFirst
While Not rst1.EOF
With rst2
.Edit
.Fields("field1) = rst1.Field("field1")
.Update
End With
rst1.MoveNext
Wend
3 @R15992
ขอบคุณมากครับ
โคดนี้คือ เอาฟิวเทเบิลA ไป B หรือครับ
แล้วเอาโคดนี้ไปวางไว้ไหนครับ ในช่องข้อมูลใช่ไหมครับผม
โคดนี้คือ เอาฟิวเทเบิลA ไป B หรือครับ
แล้วเอาโคดนี้ไปวางไว้ไหนครับ ในช่องข้อมูลใช่ไหมครับผม
Time: 0.3326s