กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
301 2
URL.หัวข้อ /
URL
--- เรียนอาจารย์สุภาพ ครับ ----
โครงสร้างตารางและความสัมพันธ์ของผมถูกต้องหรือป่าวครับ(ดูจากรูปที่แนบ)
vendor - ผู้จำหน่ายสินค้าให้สหกร
buy - รายการสั่งซื้อสินค้า
merchandise - สินค้า
sell - รายการขายสินค้า
customer - สมาชิก
lost_decay - รายการสินค้าชำรุด - หาย
officer - ตารางเก็บรายละเอียดของผู้ขาย-ผุ้ใช้เครื่อง
เออและถามเรื่อง combobox หน่อยอ่ะคับ คือผม ได้สร้าง Combobox ขึ้นมาโดยเก็บค่ารหัสสินค้า mer_id จากตารางสินค้า (อยู่คนละตารางกับตารางที่ใช้เป็นแหล่งระเบียนใน form ที่ใช้อยู่) และในหน้า form นี้จะมี textbox ซึ่งเอาไว้แสดงค่า ราคาสินค้า mer_unitprice ซึ่งจะมาจาก การที่ผมได้คลิ๊กเลือกรหัสสินค้าใน combobox แล้ว รหัสสินค้านั้นมีราคาสินค้าเท่าไหร่ก็จะมาแสดงที่ textbox แต่ว่ามันไม่แสดงอ่ะคับ (ลองเปลี่ยนจาก combobox เป็ฯ textbox โดยจะพิมรหัสสินค้าเข้าไป ถ้ารหัสสินค้าที่พิมเข้าไปนั้นมีอยู่ในตารางสินค้าก็จะแสดงราคาสินค้าที่ textbox อันที่ไว้แสดงราคาสินค้า ได้ไม่มีปัญหา) แต่พอเปลี่ยนมาเป็น combobox แล้วมันไม่แสดงอ่ะคับ เพราะอะไร
Code เป็ฯดังนี้
Private Sub Combo64_Click()
Dim sql As String
Set dbs = CurrentDb()
sql = "select mer_unitprice from merchandise where mer_id = '" & Combo64.Value & "'"
Set rst = dbs.OpenRecordset(sql)
If Not rst.EOF Then
Text1 = rst!MER_UNITPRICE
Form.Refresh
End If
End Sub
และจะทำปุ่ม delete เองยังไงคับ แบบว่าเวลา เลือก record ไหนอยู่แล้วกดปุ่ม delete แล้วจะลบ record นั้นออกจากตาราง ใช้ access2000 น่ะคับ (เอาแบบเขียนเป็น vba ยิ่งดีคับ)
ขอบคุณครับ (คือเคยดู ปุ่ม delete ในตัวอย่าง Project แล้ว ก็ยังไม่เข้าใจน่ะคับ คือพึ่งเริ่มศึกษา access ได้ไม่นานด้วย)
vendor - ผู้จำหน่ายสินค้าให้สหกร
buy - รายการสั่งซื้อสินค้า
merchandise - สินค้า
sell - รายการขายสินค้า
customer - สมาชิก
lost_decay - รายการสินค้าชำรุด - หาย
officer - ตารางเก็บรายละเอียดของผู้ขาย-ผุ้ใช้เครื่อง
เออและถามเรื่อง combobox หน่อยอ่ะคับ คือผม ได้สร้าง Combobox ขึ้นมาโดยเก็บค่ารหัสสินค้า mer_id จากตารางสินค้า (อยู่คนละตารางกับตารางที่ใช้เป็นแหล่งระเบียนใน form ที่ใช้อยู่) และในหน้า form นี้จะมี textbox ซึ่งเอาไว้แสดงค่า ราคาสินค้า mer_unitprice ซึ่งจะมาจาก การที่ผมได้คลิ๊กเลือกรหัสสินค้าใน combobox แล้ว รหัสสินค้านั้นมีราคาสินค้าเท่าไหร่ก็จะมาแสดงที่ textbox แต่ว่ามันไม่แสดงอ่ะคับ (ลองเปลี่ยนจาก combobox เป็ฯ textbox โดยจะพิมรหัสสินค้าเข้าไป ถ้ารหัสสินค้าที่พิมเข้าไปนั้นมีอยู่ในตารางสินค้าก็จะแสดงราคาสินค้าที่ textbox อันที่ไว้แสดงราคาสินค้า ได้ไม่มีปัญหา) แต่พอเปลี่ยนมาเป็น combobox แล้วมันไม่แสดงอ่ะคับ เพราะอะไร
Code เป็ฯดังนี้
Private Sub Combo64_Click()
Dim sql As String
Set dbs = CurrentDb()
sql = "select mer_unitprice from merchandise where mer_id = '" & Combo64.Value & "'"
Set rst = dbs.OpenRecordset(sql)
If Not rst.EOF Then
Text1 = rst!MER_UNITPRICE
Form.Refresh
End If
End Sub
และจะทำปุ่ม delete เองยังไงคับ แบบว่าเวลา เลือก record ไหนอยู่แล้วกดปุ่ม delete แล้วจะลบ record นั้นออกจากตาราง ใช้ access2000 น่ะคับ (เอาแบบเขียนเป็น vba ยิ่งดีคับ)
ขอบคุณครับ (คือเคยดู ปุ่ม delete ในตัวอย่าง Project แล้ว ก็ยังไม่เข้าใจน่ะคับ คือพึ่งเริ่มศึกษา access ได้ไม่นานด้วย)
2 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R01779
เรื่องของ combo box ลองดูว่ามีการเลือกให้แสดงมากกว่า 2 column หรือไม่
ถ้าใช่ ก็คงต้องปรับให้ถูกต้อง ซึ่งก็แล้วแต่กรณี เช่น
ถ้าให้มีการแสดง 2 ฟีลด์ใน combo box นี้ คือ Mer_ID, Mer_Name และ แล้วเลือก column bound ผิดตัวคือเลือก 2 ก็อาจจะเป็นปัญหาอย่างที่เจอก็ได้
ส่วนการลบข้อมูลปัจจุบัน ให้ดูกระทู้ http://agserver.kku.ac.th/basiceng/webboard/question.asp?GID=825 ครับ
2 @R01784
àÍèÍ ÍÒ¨ÒÃÊØÀÒ¾¤ÃѺ áÅéÇàÃ×èͧ Table ¡Ñº¤ÇÒÁÊÑÁ¾Ñ¹¢Í§µÒÃÒ§¼Á¹Õè¶Ù¡µéͧËÃ×Í»èÒǤÃѺ (ÃÙ»¨Ò¡ä¿»ÃСͺ)
¢Íº¤Ø³ÁÒ¡æ ¤ÃѺ
Time: 0.1063s