ทำอย่างไรที่จะ Update field ว่าง ๆ ในตาราง ให้เป็นข้อมูล สดใหม่เสมอ
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 304   3
URL.หัวข้อ / URL
ทำอย่างไรที่จะ Update field ว่าง ๆ ในตาราง ให้เป็นข้อมูล สดใหม่เสมอ

ตาราง HRM 
Cashier ID   Full Name 
100001 เอ๋  
100013 โอ๋  
 
ตาราง WorkData 
Cashier ID Date of work Type of work Wage 
100001 30/08/2002 พนักงานส่งของ 150 
100013 02/09/2002 ผู้จัดการร้าน 500 
100001 09/09/2002 พนักงานส่งของ 160 
 
ตาราง WorkType 
Work Type Type                   Description Wage 
01                                    ผู้จัดการร้าน 500 
02                                    พนักงานส่งของ 150 
******** เพิ่มค่าแรงอีก 10 บาท ********************** 
 
 
ผมใช้ HRM เป็น Main Table และมี subform คือ WorkData (link กันด้วย Cashier ID) 
ใน Field Type of Work  ของ WorkData ผมตั้งField Name เป็น WorkTypeID  แล้วทำ Combo Box แต่ให้ lookup ค่าใน 
 
ตาราง WorkType 
คำถาม  
1. ผมต้องการให้ field Wage ของ Table WorkData มัน update ทุกครั้งที่เราป้อน record ใหม่ โดยให้มันไปดูที่ Table      
 
WorkType ว่าตอนนี้ ค่าแรง (Wage) เป็นเท่าไหร่  แล้วไปใส่ค่า field Wage ใน Table Workdata 
2. สมมุติว่า เราเปลี่ยนค่าจ้างแล้ว ก็ให้มัน update เพราะ record ที่เราเลือก ไม่ใช้ update ทั้งหมด เช่น ตั้งแต่วันที่ 09/09/02 
เราเปลี่ยนค่าแรงของพนักงานส่งของ จาก 150 เป็น 160 ก็ให้มันเปลี่ยนเฉพาะ record ใหม่ ตั้งแต่วันที่ 09 หรือเฉพาะ  
 
record ที่เรา click เข้าไปแก้ไขโดยอ้างอิงจาก filed Wage ใน Table WorkType

3 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R00914
ใช้ DLookup เข้าช่วยครับ ใช้กับ On Update ของช่อง Type Of Work ครับ Private Sub TypeOfWork_AfterUpdate() Me.Wage = DLookUp("Wage", "WorkType", "WorkTypeID = " & Me.TypeOfWork & "") End Sub
2 @R00919
เรียน สุภาพ ขอขอบพระคุณที่แนะทางให้ครับ ผมทำตามที่ อ. แนะนำมา มันยังไม่ได้ 100% ครับ ต้องปรับเปลี่ยน ตรง " ' ตอนช่วงท้ายเป็น "WorkTypeID = '" & Me![WorkTypeID] & "'" มันถึงจะไม่ error ครับ รูปแบบเต็ม ๆ ที่มันสามารถใช้ได้ก็คือ Me!TxtWage = DLookup("Wage", "WorkType", "WorkTypeID = '" & Me! [WorkTypeID] & "'") *** แต่คราวนี้มีปัญหาต่อเนื่องอยากจะเรียนถาม อ. เพิ่มครับ คราวนี้ มาถึงช่วงตอนค้นหาข้อมูลแล้วครับ ขอถามเพิ่มดังนี้ครับ คือว่า ผมเอา TxtBox ที่เป็น Unbound ไป แปะไว้ที่ MainForm เพื่อที่จะให้ Subform มันเลือกแสดงผล แบบ กำหนดวันเริ่มต้น และวันสิ้นสุด แล้วให้ SubForm (ตาราง WorkData) แสดงเฉพาะข้อมูลในวันที่กหนด เช่น แสดงเฉพาะข้อมูลที่เป็น 01/09/02 - 30/09/02 ไม่ทราบว่าผมต้องเขียนโค้ดอย่างไรครับ ถึงจะมีการส่งผ่านค่าระหว่าง Main Form และ Sub Form ได้ รวมทั้งเราจะ query ข้อมูลให้เป็นไปตามเงื่อนไขอย่างไร เช่น อาจจะทำได้ 2 แบบ คือ 1. ค้นหาแบบ เป็น วัน-เดือน-ปี 2. ค้นหาแบบเดือน อย่างเดียว เช่น August ผมอ้างอิงค่าระหว่าง Main Form กับ Subform ไม่เป็นครับ รบกวน อ. ช่วยชี้แนะด้วยครับ
3 @R00920
ลองดูตัวอย่างที่ http://www.thai-access.com/suphap.php?topic_id=159 ครับ แล้วปรับใช้ดู
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.0434s