กระทู้เก่าบอร์ด อ.Yeadram
1,720 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 นั้นนะครับ
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
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 ไำด้ด้วย
ง่ายๆก็คือ ปุ่มเดียวสามารถ ส่งออกข้อมูล แล้วก็ ปริ้นข้อมูลได้้เลยจ๊ะ เช่น
ถ้าอ่านเข้าใจยากหน่อยขอประทานอภัยด้วยนะจ๊ะ
ก็คือ สมมุติว่าเราเปิด 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 เป็นหรือเปล่า คนในบอร์ดจะได้แนะนำถูก
การผนวกหรือการส่งข้อมูลไปยังตารางนั้นหนะ น่าจะเรียกว่าการ 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
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
อะไรประมาณนี้อะค่ะ
อยากให้มันเลือกอะไรก็ใส่ลงในช่อง condition นะ
ถ้าจะอ้างอิงค่าจาก ฟอร์มก็ลองค้นหาตัวอย่างในบอร์ดนี้ดู
...ตัวอย่างเงื่อนไขแบบอ้างอิงค่าจาก Form
=Forms!Form1!Textbox01
Like Forms!Form1!Textbox01
อะไรประมาณนี้อะค่ะ
Time: 0.2833s
ถ้าแปลตรงตัว ผนวก คือการรวมเข้าไว้ด้วยกัน ....
เอ่อ... แล้วจะรวมอะไรหรือครับ
อีกอย่าง ผมว่าเรียกทับศัพท์เถอะ อย่างเช่น แบบสอบถาม ก็เรียก Query เถอะ
เวลาคุยกันจะได้ไม่งง