1
ห้อง MS Access / : สวัสดีค่ะ access สามารถ อัพเดทลง excel แบบออโต้ได้ไหมค่ะ
« เมื่อ: 25 เม.ย. 67 , 11:28:59 »
รับสอนทำนะครับ
ถ้าสนใจทักมาครับ
ถ้าสนใจทักมาครับ
แสดงกระทู้
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.
หน้า: [1] 2
2
ห้อง Ms Access อื่นๆ / : รับซ่อมไฟล์ mdb ที่ชำรุด
« เมื่อ: 04 เม.ย. 67 , 07:06:25 »
ช่องทางการติดต่อ
Tel. ศูนยฺ์81-906 ห้าสองเก้าหนึ่ง <-- เพื่อป้องกันพวกมิจ แอบเอาเบอร์ไปใช้ครับ
Line ID : 36202015 <-- ไม่ได้ตั้งค่าเป็น Auto AddFriend
สะดวกโทรมากกว่า Add Line
Tel. ศูนยฺ์81-906 ห้าสองเก้าหนึ่ง <-- เพื่อป้องกันพวกมิจ แอบเอาเบอร์ไปใช้ครับ
Line ID : 36202015 <-- ไม่ได้ตั้งค่าเป็น Auto AddFriend
สะดวกโทรมากกว่า Add Line
3
ห้อง Ms Access อื่นๆ / รับซ่อมไฟล์ mdb ที่ชำรุด
« เมื่อ: 20 มี.ค. 67 , 14:04:36 »
สวัสดีครับ
สำหรับเพื่อนสมาชิกท่านใดติดปัญหา mdb ไฟล์ชำรุด ฟ้อง Unrecognized database format
สามารถติดต่อมาที่ผมได้ครับผม
สำหรับเพื่อนสมาชิกท่านใดติดปัญหา mdb ไฟล์ชำรุด ฟ้อง Unrecognized database format
สามารถติดต่อมาที่ผมได้ครับผม
4
ห้อง Ms Access อื่นๆ / รับแกะ Password mdb File
« เมื่อ: 20 มี.ค. 67 , 13:33:35 »
สวัสดีครับ
สำหรับเพื่อนสมาชิกท่านใดติดปัญหา Password เวลาเปิดไฟล์หรือต้องการเข้าถึงข้อมูลไฟล์ mdb แล้วติดรหัสผ่าน
สามารถติดต่อมาที่ผมได้ครับผม
สำหรับเพื่อนสมาชิกท่านใดติดปัญหา Password เวลาเปิดไฟล์หรือต้องการเข้าถึงข้อมูลไฟล์ mdb แล้วติดรหัสผ่าน
สามารถติดต่อมาที่ผมได้ครับผม
5
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 18 มี.ค. 67 , 19:42:47 »
ในความเห็นของผม
ถ้าจะให้ถูกตามหลักการ เกี่ยวกับเลขที่ Inv ถ้าถูกใช้แล้ว หากต้องการยกเลิก ควรจะมีฟิลด์สักอันหนึ่งเป็นตัวมาร์คว่า Cancel
เป็นต้นว่า InvCancel = (Y/N)
เพราะจะได้ทราบว่า Inv เลขที่ดังกล่าวโดน Cancel ในระบบไปแล้ว แต่ตัวเอกสารจริงอาจจะไปถึงมือ หรือ อยู่ในมือลูกค้า
หากมีประเด็นก็จะได้ทราบว่า เอกสาร เลขที่ดังกล่าวโดนยกเลิกไปแล้ว
ถ้าลบ ก็จะเป็นการลบร่องรอยของเอกสารที่ออกไป
ถ้าจะให้ถูกตามหลักการ เกี่ยวกับเลขที่ Inv ถ้าถูกใช้แล้ว หากต้องการยกเลิก ควรจะมีฟิลด์สักอันหนึ่งเป็นตัวมาร์คว่า Cancel
เป็นต้นว่า InvCancel = (Y/N)
เพราะจะได้ทราบว่า Inv เลขที่ดังกล่าวโดน Cancel ในระบบไปแล้ว แต่ตัวเอกสารจริงอาจจะไปถึงมือ หรือ อยู่ในมือลูกค้า
หากมีประเด็นก็จะได้ทราบว่า เอกสาร เลขที่ดังกล่าวโดนยกเลิกไปแล้ว
ถ้าลบ ก็จะเป็นการลบร่องรอยของเอกสารที่ออกไป
6
ห้อง MS Access / : สอบถามการแสดงข้อมูลวันที่ใน Report MS Access ในกรณีไม่นับวันอาทิตย์
« เมื่อ: 15 มี.ค. 67 , 19:22:01 »
ก็ลองทำเป็นตัวอย่างออกมาให้แกะตัวอย่างโค๊ต และนำไปประยุกต์ต่อนะครับ
ส่วนหนึ่ง ต้องลองฝึกแกะโค๊ตด้วยครับ จะได้เข้าใจหลักการ ไม่กล้าก็ไม่เกิดครับ
ส่วนหนึ่ง ต้องลองฝึกแกะโค๊ตด้วยครับ จะได้เข้าใจหลักการ ไม่กล้าก็ไม่เกิดครับ
7
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 15 มี.ค. 67 , 15:51:37 »
มีน้องอีกคน ไม่ทราบวิธี Save As ไฟล์จาก accdb --> mdb
ผมรบกวนเข้าไปแนะนำหน่อยครับ
https://www.thai-access.com/index.php?topic=2436.msg16060#new
ผมรบกวนเข้าไปแนะนำหน่อยครับ
https://www.thai-access.com/index.php?topic=2436.msg16060#new
8
ห้อง MS Access / : สอบถามการแสดงข้อมูลวันที่ใน Report MS Access ในกรณีไม่นับวันอาทิตย์
« เมื่อ: 15 มี.ค. 67 , 14:29:38 »
ถ้า Save เป็น mdb ไฟล์ไมไ่ด้ผมก็คงช่วยไม่ได้
คงต้องรบกวน กูรูท่านอื่นครับผม
คงต้องรบกวน กูรูท่านอื่นครับผม
9
ห้อง MS Access / : สอบถามการแสดงข้อมูลวันที่ใน Report MS Access ในกรณีไม่นับวันอาทิตย์
« เมื่อ: 15 มี.ค. 67 , 14:07:31 »
รบกวน Save as ไฟล์ตัวอย่างเป็น Accdb --> MDB ไฟล์ แล้ว Upload เข้ามาให้ด้วยครับ
พอดีผมใช้ access 2002
ข้างใน Zip ไฟล์ที่ส่งมายังเป็น Accdb อยู่ครับ ขอเป็น mdb ไฟล์ครับ
แต่เท่าที่อ่านดู ใจความสำคัญคือ นับวันอบรม ไม่นับวันอาทิตย์ Weekday()
โดยฟังค์ชั่นนี้ จะนับวันอาทิตย์ = 1 เรื่อยไป เสาร์ = 7
เราก็สามารถใช้ประโยช์จากตรงนี้มาประยุกต์ใช้งานได้ครับผม
พอดีผมใช้ access 2002
ข้างใน Zip ไฟล์ที่ส่งมายังเป็น Accdb อยู่ครับ ขอเป็น mdb ไฟล์ครับ
แต่เท่าที่อ่านดู ใจความสำคัญคือ นับวันอบรม ไม่นับวันอาทิตย์ Weekday()
โดยฟังค์ชั่นนี้ จะนับวันอาทิตย์ = 1 เรื่อยไป เสาร์ = 7
เราก็สามารถใช้ประโยช์จากตรงนี้มาประยุกต์ใช้งานได้ครับผม
10
ห้อง MS Access / : สอบถามการแสดงข้อมูลวันที่ใน Report MS Access ในกรณีไม่นับวันอาทิตย์
« เมื่อ: 15 มี.ค. 67 , 11:48:12 »
ใช้ DAO ร่วมกับคำสั่ง Do While
Do while not rst1.EOF
เงื่อนไขที่ 1
เงื่อนไขที่ 2
เงื่อนไขที่ 3
rst1.movenext
Loop
Do while not rst1.EOF
เงื่อนไขที่ 1
เงื่อนไขที่ 2
เงื่อนไขที่ 3
rst1.movenext
Loop
11
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 15 มี.ค. 67 , 11:09:03 »
Function GenInvNo()
Dim rst1, rst2, rst3 As DAO.Recordset
Dim vStkID, vInvID, vInv1, vInv2, IntMax, vValRef As Long
Dim vStkNo, vInvNo, vInv As String
Dim dbs As Database
Set dbs = CurrentDb()
If IsNull(Me.INvNo) Or (Me.INvNo = "") Then
'สร้างเลขที่ Inv ใบใหม่
vInv = "IV" & Format(Date, "yy") & Format(Date, "MM")
If DCount("Val(Right([InvNo],4))", "[tbl_main]", "Mid([InvNo],1,6) = '" & vInv & "'") = 0 Then
vInvNo = vInv & "0001"
Else
IntMax = DMax("Val(Right([InvNo],4))", "[tbl_main]", "Mid([InvNo],1,6) = '" & vInv & "'")
vInvNo = vInv & Format(IntMax + 1, "0000")
End If
'ใส่ค่าลงไป
Me.INvNo = vInvNo
End If
End Function
Dim rst1, rst2, rst3 As DAO.Recordset
Dim vStkID, vInvID, vInv1, vInv2, IntMax, vValRef As Long
Dim vStkNo, vInvNo, vInv As String
Dim dbs As Database
Set dbs = CurrentDb()
If IsNull(Me.INvNo) Or (Me.INvNo = "") Then
'สร้างเลขที่ Inv ใบใหม่
vInv = "IV" & Format(Date, "yy") & Format(Date, "MM")
If DCount("Val(Right([InvNo],4))", "[tbl_main]", "Mid([InvNo],1,6) = '" & vInv & "'") = 0 Then
vInvNo = vInv & "0001"
Else
IntMax = DMax("Val(Right([InvNo],4))", "[tbl_main]", "Mid([InvNo],1,6) = '" & vInv & "'")
vInvNo = vInv & Format(IntMax + 1, "0000")
End If
'ใส่ค่าลงไป
Me.INvNo = vInvNo
End If
End Function
12
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 13 มี.ค. 67 , 14:29:54 »
อันนี้ต้องทำหน้าแยกเพิ่มขี้นมาอีกอันในการยกเลิกรายการ โดยอาศัยหลักการเดียวกัน เพียงแต่จากบวกเพิ่มเป็นลบ
rst2.Edit
rst2!Qty = rst2!Qty - 1
rst2.Update
หรือจะไปกำหนดให้ User ไปแก้จำนวนเอาก็ได้ที่ SubForm โดยไปดูที่ Property ของ SubForm : Editting แต่มีความเสี่ยงตรงแก้ผิด
วิธีที่ปลอดภัยสุดคือ ยิงด้วยเลขที InvNo --> ยิงบาร์โค๊ต เพื่อให้ระบบวิ่งไปตรวจสอบความถูกต้องแล้ว ค่อยลดจำนวน
ลองฝึกทำครับ แค่ประสบการณ์จะบังเกิด
rst2.Edit
rst2!Qty = rst2!Qty - 1
rst2.Update
หรือจะไปกำหนดให้ User ไปแก้จำนวนเอาก็ได้ที่ SubForm โดยไปดูที่ Property ของ SubForm : Editting แต่มีความเสี่ยงตรงแก้ผิด
วิธีที่ปลอดภัยสุดคือ ยิงด้วยเลขที InvNo --> ยิงบาร์โค๊ต เพื่อให้ระบบวิ่งไปตรวจสอบความถูกต้องแล้ว ค่อยลดจำนวน
ลองฝึกทำครับ แค่ประสบการณ์จะบังเกิด
13
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 13 มี.ค. 67 , 13:38:10 »
ผมมีปรับตัวอย่างเพิ่ม เป็น Sample3.Zip
หากต้องการลบ รายการไหนให้คลิ๊เลือกแบบนี้แล้วกด Del
หากต้องการลบ รายการไหนให้คลิ๊เลือกแบบนี้แล้วกด Del
14
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 13 มี.ค. 67 , 12:28:11 »
ให้ Download ตัวอย่างไฟล์อีกครั้งครับ
ผมมีการปรับให้ใหม่แล้ว
ผมมีการปรับให้ใหม่แล้ว
15
ห้อง MS Access / : สอบถามการทำ barcode สำหรับชำระเงินให้ธนาคารครับ
« เมื่อ: 13 มี.ค. 67 , 11:52:46 »
ตัวอย่าง
16
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 13 มี.ค. 67 , 09:36:49 »
ได้ทำตัวอย่างมาให้ศึกษาเป็นแนวทางแล้วนะครับ
โดยมีการแก้ไขซื่อฟิลด์ที่ซื่อ ID ในบาง Table เพื่อให้มือใหม่ได้ตามถูก
เนื่องจากตัวอย่างต้นฉบับที่ได้มาใช้ฟิลด์ ชื่อ ID เหมือนกันหลาย Table อาจจะทำให้เกิดความสับสนได้
โดยตัวอย่างที่ทำให้มีทำตัวอย่างฟังค์ชั่นอื่นเพิ่มให้นิดหน่อย เพื่อ่ให้มองเห็นภาพได้เร็วขี้น
โดยมีการแก้ไขซื่อฟิลด์ที่ซื่อ ID ในบาง Table เพื่อให้มือใหม่ได้ตามถูก
เนื่องจากตัวอย่างต้นฉบับที่ได้มาใช้ฟิลด์ ชื่อ ID เหมือนกันหลาย Table อาจจะทำให้เกิดความสับสนได้
โดยตัวอย่างที่ทำให้มีทำตัวอย่างฟังค์ชั่นอื่นเพิ่มให้นิดหน่อย เพื่อ่ให้มองเห็นภาพได้เร็วขี้น
17
ห้อง MS Access / : ขอความช่วยเหลือเรื่องการสแกน barcode เพื่อเพิ่มสินค้าหน่อยครับ
« เมื่อ: 12 มี.ค. 67 , 14:13:46 »
สามารถทำได้ครับ โดยใช้ DAO ช่วยจะทำให้ง่ายขี้น
แต่เนื่องจากไฟล์ตัวอย่างที่ให้มานั้นเป็นเวอร์ชั่นใหม่ รบกวน Convert ลงเป็น Access2002
ที่มีนามสกุล mdb แล้ว Upload เข้ามาใหม่ครับ เพราะผมใช้เวอร์ชั่นเก่า เลยไม่สามารถทำเป็นตัวอย่างให้ได้ครับ
แต่เนื่องจากไฟล์ตัวอย่างที่ให้มานั้นเป็นเวอร์ชั่นใหม่ รบกวน Convert ลงเป็น Access2002
ที่มีนามสกุล mdb แล้ว Upload เข้ามาใหม่ครับ เพราะผมใช้เวอร์ชั่นเก่า เลยไม่สามารถทำเป็นตัวอย่างให้ได้ครับ
18
ห้อง MS Access / : สอบถามการทำ barcode สำหรับชำระเงินให้ธนาคารครับ
« เมื่อ: 11 มี.ค. 67 , 18:17:31 »
ไม่ทราบว่า น่าจะเคยใช้ App. ธนาคารกันทุกคน
โดย App. จะมีเมนูให้สร้าง QRCode : ThaiPayment เหมือนที่แม่ค้าทั่วไปเตรียมไว้ให้เรา Scan จ่าย
เราก็เพียง Cap หน้าจอนั้นเป็นรูป Save เป็นนามสกุล JPG แล้วไปครอบตัดในส่วนที่เป็น ส่วนที่เป็นหน้าตา QR Code
จากนั้นเอารูปที่ได้ไปแทรกลงฟอร์มหรือ บน Report เพื่อให้อำนวยความสะดวกให้ผู้ใช้สามารถ Scan ได้เลย
หรือหากต้องการสร้างบาร์โค๊ตที่เป็นรูปแบบของเราต้องการก็สามารถทำได้โดยทำการ Download Font QRCode มาติดตั้งเพิ่ม
ต้องหาในNet เอาครับ มีทั้งฟรีและไม่ฟรี แต่ที่ผมใช้อยู่คือ เอา QRCode ที่ไม่ฟรีมาแคร๊กเอา
ข้อดีของ QRCode คือ ยิงติดง่าย ต่างจากบาร์โค๊ตแท่ง แต๋เครื่องอ่านก็ต้องรองรับ QRCode ด้วยเช่นกัน
โดย App. จะมีเมนูให้สร้าง QRCode : ThaiPayment เหมือนที่แม่ค้าทั่วไปเตรียมไว้ให้เรา Scan จ่าย
เราก็เพียง Cap หน้าจอนั้นเป็นรูป Save เป็นนามสกุล JPG แล้วไปครอบตัดในส่วนที่เป็น ส่วนที่เป็นหน้าตา QR Code
จากนั้นเอารูปที่ได้ไปแทรกลงฟอร์มหรือ บน Report เพื่อให้อำนวยความสะดวกให้ผู้ใช้สามารถ Scan ได้เลย
หรือหากต้องการสร้างบาร์โค๊ตที่เป็นรูปแบบของเราต้องการก็สามารถทำได้โดยทำการ Download Font QRCode มาติดตั้งเพิ่ม
ต้องหาในNet เอาครับ มีทั้งฟรีและไม่ฟรี แต่ที่ผมใช้อยู่คือ เอา QRCode ที่ไม่ฟรีมาแคร๊กเอา
ข้อดีของ QRCode คือ ยิงติดง่าย ต่างจากบาร์โค๊ตแท่ง แต๋เครื่องอ่านก็ต้องรองรับ QRCode ด้วยเช่นกัน
หน้า: [1] 2
