แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - UnKnown

หน้า: [1] 2 3 4 ... 9
1
ตรงส่วนของตั้งค่าหน้ากระดาษของรายงาน
สามารถกำหนด 2 column ได้ครับ แต่หัวเรื่องแบบนั้นจะมีอันเดียวครับ
:love: :love: :love:

MS Access 2007: Create a 2 column report link
Microsoft Access 2016 Reports: Multiple Report Columns and Groups link
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

2
แนวแบ่งอย่างนี้ผมก็ทำไม่เป็นนะครับ :dizzy:
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

3
-> กรองชื่อลูกค้าโดยวิธีลิ้งฟอร์มหลัก-ฟอร์มย่อย
-> กรองวันที่ออกบิลโดยใช้คำสั่ง Filter
โค๊ด: [Select]
Private Sub cmdDate_Click()
Me.fm_Invoice_sub2.Form.Filter = "[Saledate] BETWEEN #" & Format(Me.BeginDate, "dd mmm yyyy") & "# AND #" & Format(Me.EndDate, "dd mmm yyyy") & "#"
Me.fm_Invoice_sub2.Form.FilterOn = True
Me.fm_Invoice_sub2.Form.Refresh
Call Form_Current
End Sub

ไฟล์ตัวอย่างผมสร้างตาราง,ฟอร์มหลัก,รีพอร์ทชื่อ Invoice มาให้ใหม่ ส่วนฟอร์มย่อย Invoice_sub จะดึงข้อมูลบิลที่เคยออกไปจากตาราง Sale_H
โพสต์นี้ได้รับคำขอบคุณจาก: PNR, I love movies

4
ผลรวม อยู่ด้านล่าง ตำแหน่งเดิมทุกครั้ง ไม่ว่าจะมีกี่รายการก็ตาม
ใช้ Page Footer   แสดงผลในทุกหน้า-อยู่ด้านล่างของหน้ากระดาษเสมอ

อยากให้มีเส้น...
ไม่ต้องทำเส้นที่กล่องข้อความหรือวาดเส้นบนหน้าฟอร์มแต่ใช้เป็นเขียนโค้ดใน VBA
https://www.thai-access.com/index.php?topic=220.msg781#msg781
https://www.thai-access.com/index.php?topic=243.msg1060#msg1060
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

5
1.ความหมายของส่วนต่างๆ
Report Header    ส่วนบนสุดของข้อมูล
Report Footer   ส่วนล่างสุดของข้อมูล
Page Header   ส่วนบนของหน้ากระดาษ
Page Footer   ส่วนล่างของหน้ากระดาษ

2.การแสดงผมตามจริง
Report Header    บนสุดของข้อมูลแสดงครั้งเดียวโดยอยู่เหนือ Page Header หน้าแรก
Page Header   แสดงผลในทุกหน้า-อยู่ด้านบนของหน้ากระดาษเสมอ
   
Report Footer   แสดงครั้งเดียวโดยจะอยู่ส่วนท้ายของข้อมูลหมดตรงไหนแสดงต่อจากตรงนั้นเลย
   
Page Footer   แสดงผลในทุกหน้า-อยู่ด้านล่างของหน้ากระดาษเสมอ
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

6
รายการขึ้นสีสลับแถว ไม่ต้องปรับอะไรใช่มั๊ยคะ เวลาปริ้นซ์ สีไม่ออกใช่ปะคะ

วิธีแก้ให้สีไม่สลับกันคือตั้งค่า Alternate Back Color = No Color ตามรูปตัวอย่างครับ



จากไฟล์"ฐานข้อมูล1"ที่แนบมาก็ดูงงๆช่วยจัดให้ดูเรียบร้อยและใส่ข้อมูลในตารางมาให้เยอะสมบูรณ์กว่านี้อีกได้ใหมครับเดี๋ยวช่วยทำให้(ชื่อใส่ กกกก,ขขขข,คคคค มาก็ได้ครับ)
รูปตย.ไฟล์ของผมจะกรองตามรหัส-ชื่อลูกค้าและบิลตั้งแต่วันไหนถึงวันไหน

โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

7
ลองดูกระทู้หล่าวนี้ยังครับ
https://www.thai-access.com/topic_post.asp?CategoryID=1&TopicID=5599

https://www.thai-access.com/topic_post.asp?CategoryID=1&TopicID=4879

https://www.thai-access.com/index.php?topic=836.0

https://www.thai-access.com/topic_post.asp?CategoryID=1&TopicID=5163
ผมก็ไปค้นหาดูแล้วจะมาตอบคล้ายแบบท่านเลยนะนี่ :shout:

ตามที่ไล่อ่านผมขอคิดว่าการที่จะทำให้รองรับ Access ทั้ง 32,64 bit ได้นั้นเราต้องไปไล่เพิ่มคำสั่งตรวจสอบ,บางที่อาจต้องแยกชุดคำสั่ง32ใช้อันนี้-64ใช้อันนี้,นำไปทดลองใช้งานคำสั่งต่างๆทั้งบนเครื่องที่เป็น32และ64แล้วใช้งานได้สมบูรณ์เท่าเทียมกัน แต่มันจะง่ายกว่าไหมถ้าจะใช้ Access ระบบเดียวกันทั้งหมดนะครับ
โพสต์นี้ได้รับคำขอบคุณจาก: raweerot

8
แบบโหดร้ายแต่ได้ชัวคือลบข้อมูลในตารางทั้งหมดจากนั้นไปสั่ง compact and repair database วิธีอยู่ต้นคลิปอาจารย์เลยครับ https://youtu.be/ajoDSu7_kqk link

แบบรักษาข้อมูลฟิวล์อื่น(อันนี้ไปลองทำดูว่าจะได้ใหมนะครับ) :question:
>ลบฟิวล์ ID ที่เป็น Auto number ออก->ปิดตาราง
>compact and repair database
>กลับมาแทรกฟิวล์ที่เป็น Auto number ใหม่แล้วกลับไปดูว่าเริ่มนับ 1 หรือเปล่านะ
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

9
ที่ขึ้น error ไม่เกี่ยวกับที่ช่อง ทุนรวม มีการใช้คูณแล้วใช่รึเปล่าคะ
ใช่ครับ ที่ error ไม่เกี่ยวกับที่ช่อง"ทุนรวม"มีการใช้บวก,ลบ,คูณ,หาร แต่เกี่ยวกับการที่จะ SUM แบบนี้ได้ค่านั้นจะต้องมีการบันทึกอยู่ในที่ใดที่หนึ่งก่อนไม่ใช่ที่คำนวนแล้วมาแสดงผลแบบลอยๆไม่ได้บันทึกผลใว้ที่ไหนนะ

วิธีที่2.จึงไปคำนวนในคิวรี่เมื่อฟอร์มดึงตารางคิวรี่มาก็จะเห็นว่ามี"ทุนรวม"เก็บค่าอยู่ในตารางที่นี้เราก็ SUM([ทุนรวม]) ได้ตามนั้นครับ

วิธีที่3.ใช้ dsum ตามไปดูคลิปอาจารย์ Access-Creator link นาทีที่16:00เลยครับ

โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

10
วิธีที่1.ทำให้ทุนรวมเก็บค่าอยู่ในตารางถึงจะ Sum ได้(ผมใช้วิธีีนี้อยู่แต่มันยุ้งยากไปพึ่งจะเจอวิธีที่2นี่ล่ะ)

วิธีที่2.นำตารางที่ใช้ไปทำคิวรี่แล้วเพิ่มฟิวล์ ทุนรวม: [จำนวน]*[ทุน] ที่ฟอร์มก็เปลี่ยนจากที่ดึงข้อมูลจากตารางมาเป็นคิวรี่,กล่องทุนรวม([text34])ก็ดึงผลมาจากคิวรี่ได้เลย,=SUM([ทุนรวม])

ตย.คิวรี่
  จำนวน    ทุน   ทุนรวม: [จำนวน]*[ทุน]

ตย.ฟอร์ม
          =SUM([ทุนรวม]) 1000
  จำนวน    ทุน   ทุนรวม
  10  100   1000
  0  200   0
โพสต์นี้ได้รับคำขอบคุณจาก: PNR, I love movies

11
เปลี่ยนฟอร์นหรือปรับขนาดตัวอักษรที่เมนูด้านบนได้เลยครับ
โพสต์นี้ได้รับคำขอบคุณจาก: pattan0013

12
หลังอัพเดทข้อมูลฟิวล์ Barcode(กล่องท่านชื่อ Text6) สั่งให้นำ6ตัวท้ายมาใส่กล่อง,ฟิวล์ IDProduct
โค๊ด: [Select]
Private Sub Text6_AfterUpdate()
    Me.IDProduct = Right(Me.Text6, 6)
End Sub

หรือเมื่อใส่ IDProduct แล้วให้ Barcode = A$+IDProduct
โค๊ด: [Select]
Private Sub IDProduct_AfterUpdate()
    Me.Text6 = "A$" & Me.IDProduct
End Sub
โพสต์นี้ได้รับคำขอบคุณจาก: pirin, nawahovvp

13
วิธีที่สอง.ทำให้ VBA รอบรับภาษาไทยไปที่เมนู Tools -> Options -> Editor Format แก้ฟอร์นในรายการต่างๆให้เป็นฟอร์นที่รองรับภาษาไทยแล้วก็รองพิมพ์ข้อความอะไรลงไปดูครับ
ปล.ถ้าพิมพ์ภาษาไทยลงไปเองไม่มีปัญหา เวลาก๊อปมาวางก็ไล่ดูแล้วพิมพ์แก้เองเลยครับ :yuush:
โพสต์นี้ได้รับคำขอบคุณจาก: I love movies

14
2013 ผมหา Compile / DeCompile ไม่เจอครับ
compact and repair ทำแล้วแต่ก็ยังไม่ได้


โหลดไฟล์ Database39.mdb ของท่านมาใช้ได้ :sweat:
โพสต์นี้ได้รับคำขอบคุณจาก: ชวลิต เสนะสุทธิ

15
ไม่ว่าจะใช้แบบไหนผมก็รันไม่ได้เกิดจากอะไรครับนี่


โพสต์นี้ได้รับคำขอบคุณจาก: ชวลิต เสนะสุทธิ

16
ถ้าอยากใช้ DAO ก็เพิ่ม reference ตัวนี้เข้าไป


เครื่องผมเพิ่มไม่ได้ขึ้น Name conflicts with existing module, project, or object library แก้ยังไงครับ :question:
โพสต์นี้ได้รับคำขอบคุณจาก: ชวลิต เสนะสุทธิ

หน้า: [1] 2 3 4 ... 9