ผนวกข้อมูล
กระทู้เก่าบอร์ด อ.Yeadram

 1,723   5
URL.หัวข้อ / URL
ผนวกข้อมูล

หนูใช้แบบสอบถามชื่อ silppay มี ฟิวส์คือ
Cusno       Cusname   Product     Addd      TCC   TCName          TypeLT
19001900    นายก          FC        บางรัก      398       แอด            3P020510
19001901    นายข          PB        บางเขน    453       ออด            3O020510
มาสร้างฟอร์ม ชื่อ Payment แล้วก็ Report ชื่อ Barcode
คำถามคือ หนูสร้าง ปุ่มไว้ที่ ฟอร์ม Payment เพื่อเวลากดปุ่มแล้วให้มัน ผนวกไปที่ตารางชื่อ RunNOLetter แล้วก็ปริ้น Report ออกมาเลย

อีกอย่างคือถ้าเปิด Cusno ไหนอยู่ก็ให้ผนวกและก็ปริ้น Cusno นั้นนะครับ

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

1 @R08349
ไม่เข้าใจหนะหนู ผนวก คืออะไรคะ
ถ้าแปลตรงตัว ผนวก คือการรวมเข้าไว้ด้วยกัน ....
เอ่อ... แล้วจะรวมอะไรหรือครับ

อีกอย่าง ผมว่าเรียกทับศัพท์เถอะ อย่างเช่น แบบสอบถาม ก็เรียก Query เถอะ
เวลาคุยกันจะได้ไม่งง
2 @R08350
โทษทีจ๊ะ พอดีใช้เมนูภาษาไทยเลยติด
ก็คือ สมมุติว่าเราเปิด Form ชื่อ Payment ข้อมูลคือ
Cusno       Cusname   Product     Addd      TCC   TCName          TypeLT
19001900    นายก          FC        บางรัก      398       แอด            3P020510
19001902    นายข          FC        บางซื่อ     448       แอด            3P020510

ถ้าเปิด Form ลูกค้ารหัส Cusno 19001900 คลิกที่ปุ่ม ก็จะส่งออกข้อมูลไปยังตารางชื่อ RunNOLetter และก็ปริ้น Report ชื่อ Barcode ไำด้ด้วย
ง่ายๆก็คือ ปุ่มเดียวสามารถ ส่งออกข้อมูล แล้วก็ ปริ้นข้อมูลได้้เลยจ๊ะ เช่น

ถ้าอ่านเข้าใจยากหน่อยขอประทานอภัยด้วยนะจ๊ะ
3 @R08351
พอเข้าใจละครับ...
การผนวกหรือการส่งข้อมูลไปยังตารางนั้นหนะ น่าจะเรียกว่าการ append
ทำได้โดยการใช้ Query Append เลือกจากตัวเลือกใน Query ได้เลย
หลักการก็คือ นำข้อมูลที่เราต้องการไปเพิ่มใน Table ที่เราต้องการ ใช้ไม่ยากครับ
ส่วนที่จะอยากทำพร้อมกันทั้ง append และ print report(พิมพ์รายงาน)
ต้องขอถามกลับว่า ทำอะไรเป็นบ้างครับ ของเดิมที่มีจะพิมพ์รายงานทำอย่างไรครับ...

เขียน code หรือ macro เป็นหรือเปล่า คนในบอร์ดจะได้แนะนำถูก
4 @R08366
พอได้ระดับนึงจ๊ะ โค๊ดปุ่มที่ทำไว้แล้ว คือตอนนี้มันปริ้นออกอย่างเดียว เหลือให้มัน
append ไปยัง tabal อย่้างเดี๋ยว ที่ทำไม่ได้ หนูรองทำแล้ว เวลามัน append มันส่งออกไปหมดทั้ง Port งานเลย แค่อยากให้มันส่งแค่ Cusno ไหนก็ส่ง Cusno นั้นก็พอจ๊ะ เคส by เคส อะจ๊ะ

Private Sub Command47_Click()
On Error GoTo Err_Command47_Click
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "Barcode" (ชื่อรายงาน)
    stLinkCriteria = "[Cusno]=" & "'" & Me![Cusno] & "'" (รหัสล.ค)
    DoCmd.OpenReport stDocName, , , stLinkCriteria

Exit_Command47_Click:
    Exit Sub

Err_Command47_Click:
    MsgBox Err.Description
    Resume Exit_Command47_Click
    
End Sub
5 @R08402
ก็เขียนเงื่อนไขใน query สิจะหนู
อยากให้มันเลือกอะไรก็ใส่ลงในช่อง condition นะ
ถ้าจะอ้างอิงค่าจาก ฟอร์มก็ลองค้นหาตัวอย่างในบอร์ดนี้ดู
...ตัวอย่างเงื่อนไขแบบอ้างอิงค่าจาก Form
=Forms!Form1!Textbox01
Like Forms!Form1!Textbox01
อะไรประมาณนี้อะค่ะ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.2458s