แสดงกระทู้

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 - nonc31

หน้า: 1 ... 6 7 8 [9]
145
ควรสร้างฟิลด์เพิ่ม ในทุกตาราง ที่ต้องการ แล้วใส่เงื่อนไข ดังรูป  เวลากดปุ่มบันทึกก็ให้ค่าฟิลด์ chk เป็น true แบบนี้ง่ายดีครับ

146
ห้อง MS Access / : รวมตาราง
« เมื่อ: 02 ก.ย. 61 , 09:28:09 »
สงสัยจะได้ขอ ตัวอย่าง  2013  :shout: :shout: :shout:

147
ตรงสูตรคุณใช้ฟังชั่น Round ร่วมด้วย ดังนั้น ในคอลัมน์ PricePerPcs ก็ต้องใช้ด้วย(เพื่อให้ตรงกับค่าในสูตร) ในตัวอย่าง จะเห็นเป็น 2.18 พอกดเครื่องคิดเลขเทียบ ก็เพี้ยนเลย  แต่ค่าจริงคือ 2.175 พอใช้ Round จะเป็น 2.17(งง ว่าทำไมมันไม่ปัดขึ้นเป็น 2.18) คงประมาณนี้ครับ

148
ห้อง MS Access / : รวมตาราง
« เมื่อ: 02 ก.ย. 61 , 07:33:01 »
UNION น่าจะใช้แบบนี้นะครับ

SELECT [user1].user1
FROM [user1]
UNION SELECT [user2].user2
FROM [user2]
UNION SELECT [user3].user3
FROM [user3]
UNION SELECT [user4].user4
FROM [user4]
UNION SELECT [user5].user5
FROM [user5]
UNION SELECT [user1_not].user1
FROM [user1_not];

149
กรณีนี้ คือ สร้างใหม่  =  Set FD = TD.CreateField("H", dbMemo) จะรันผ่าน
ถ้ากรณีฟิลด์นี้ มีอยู่แล้ว แต่ Type เป็น Text ถ้าเราจะเปลี่ยนมาเป็น Hyperlink
ผมดูใน Google เขาให้จัดการที่ property แต่ผมลองทำแล้วไม่ได้ครับ
ไม่รู้ติดตรงไหน  อ. มีวิธี มี code สำหรับการเปลี่ยน Type นี้มั๊ยครับ

ที่ผมทำไว้


150
ขอบคุณครับ ได้ซะที หาใน Google หาไม่เจอคำตอบนี้
ขออีก  ตัวครับ คือ
แบบ  Hyperlink  กำหนดยังครับ  รบกวนอีกทีนะครับ อ.สันติสุข

151
=nz(DSum("money","q_income","month([date])= month([income_date])"))+0
น่าจะ + 0 ด้วยนะ

และ ควรตรวจสอบ ชื่อฟิลด์ ชื่อตาราง  และ ตำแหน่งเครื่องหมาย "  ว่ามันอยู่ในตำแหน่งที่ถูกหรือไม่


152
ตรงใจป่าวนะ   :grin:

153
แบบนี้ก็พอไปได้  :XD:

155
ใช้คิวรี่   :cool: :XD:
SELECT A.Charge, A.Code
FROM A LEFT JOIN B ON (A.Code = B.Code) AND (A.Charge = B.Charge)
WHERE (((B.Charge) Is Null) AND ((B.Code) Is Null));

156
Private Sub Command0_Click()
DoCmd.SetWarnings False
Dim db As DAO.Database
Dim tbl As TableDef
Dim fld As DAO.Field
Dim strSQL As String
   
Set db = CurrentDb
    strSQL = "ALTER TABLE testFieldType ALTER COLUMN fieldA Integer;"
    db.Execute strSQL

        Set fld = Nothing
        Set tbl = Nothing
        Set db = Nothing

End Sub

ผลออกมามันเป็น Long Integer  ทำไมมันไม่เป็น  Integer  ช่วยด้วยครับ

หน้า: 1 ... 6 7 8 [9]