EarnTheStar WebBoard : เอิร์น เดอะสตาร์ เว็บบอร์ด

หมวดคอมพิวเตอร์ => ห้องเว็บและโปรแกรม => หัวข้อที่ตั้งโดย: วัชรากรณ์ ศักดิ์บูรณะ เมื่อ 10 พ.ย 22, 12:16:02

ชื่อ: Ms Access
โดย: วัชรากรณ์ ศักดิ์บูรณะ เมื่อ 10 พ.ย 22, 12:16:02
ms access เรียงลำดับภาษาไทยไม่ถูกต้อง
-----------------

ลำดับการเรียงจะขึ้นกับ Sort Order ที่ได้กำหนดไว้ล่วงหน้า (กำหนดใน Options - General - New Database Sort Order) ตอนที่ถูกสร้างฐานข้อมูลหรือตอนถูก Compact and Repair ครั้งหลังสุด
ดังนั้น ถ้าตอนนี้วินโดว์หรือ New Database Sort Order กำหนด เปลี่ยนจาก legacy เป็นไทยแล้ว ก็ให้ Compact and Repair ฐานข้อมูลอีกทีครับ
ชื่อ: ต่อ: Ms Access
โดย: JioHome Admin เมื่อ 26 มิ.ย 25, 00:07:56
การดึงหลายฟิลด์ในโดเมน
dlookup("ชื่อตัว & "" "" & [ชื่อสกุล]","Tเจ้าหน้าที่","[รหัสผู้รับ]="&dlookup("wlog","TSettings"))

ฟิลด์เดียว
=DLookUp("[ProductNameTh]","T Shopee","[ProductCode]=" & "'ง'")
ชื่อ: ต่อ: Ms Access
โดย: JioHome Admin เมื่อ 10 ส.ค 25, 23:32:49
ตรวจว่า Table มี Field นี้หรือไม่ ถ้ามีให้ค่าเป็นจริง 1 ถ้าไม่มี ให้ค่าไม่จริง 0
สร้าง Fn ไว้ใช้งานก่อน
---
Function FieldExists(ByVal Table As String, ByVal Field As String) As Boolean
    On Error Resume Next
    FieldExists = (DCount(Field, Table) >= 0)
End Function

แล้วจึงไปใช้งาน
เช่น
If FieldExists("Order S", "[เหตุผลในการยกเลิกคำสั่งซื้อ]") Then
DoCmd.RunSQL "INSERT INTO [T Order Shopee] SELECT [Order S].* FROM [Order S] WHERE ((([Order S].[*หมายเลขติดตามพัสดุ])<>'')) OR ((([Order S].[เหตุผลในการยกเลิกคำสั่งซื้อ])=''));"
Else
DoCmd.RunSQL "INSERT INTO [T Order Shopee] SELECT [Order S].* FROM [Order S] WHERE ((([Order S].[*หมายเลขติดตามพัสดุ])<>''));"
End If