แสดงกระทู้

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 - TaroKung Ichimura

หน้า: [1] 2
1
ทดสอบเปลี่ยนเดือน เลขสามตัวท้ายไม่กลับไปเริ่มนับ 001 นะครับ (ฉบับมาโครก็เช่นเดียวกัน)

  RunnungNum    myDate    Data 
  6107001   26-07-18    11
  6107002   26-07-18    22
  6108003   01-08-18    33
  6108004   01-08-18    44
  6109005   01-09-18    55
  6109006   01-09-18    66


รบกวนสอบถามครับ พอดีผมลองโหลดมาแล้วลองเอาโค้ดมาปรับอิงตามไฟล์งานผม พอลองเปลี่ยนเดือนแล้วเลขมันไม่ขึ้น 001 ใหม่ครับ ไม่แน่ใจว่าเงื่อนไขที่ว่าคือส่วนไหนครับ

Private Sub Name_AfterUpdate()
    ID = Format([date], "yymm") & Right("000" & DCount("[ID]", "[tbl_Tet]", "Left([ID],4) = Format([date],'yymm')") + 1, 3)
End Sub

***
ทำได้แล้วครับ ผมสับสนเอง ขอโทษด้วยนะครับ

2
ขอบคุณครับ อ. เดีียวผมลองดุก่อนนะครับ

3
สวัสดีครับ รบกวนอีกแล้ว รู้สึกเกรงใจ อ.ทุกท่าน มากครับ ขอโทษที่ถามบ่อยๆนะครับ พอดีช่วงนี้จะเริ่มส่งงาน แทบไม่ได้นอนหลายคืนแล้วครับ
ขอโทษ อ.ทุกท่านจริงๆนะครับ  :cry: :cry:

วันนี้ผมมีคำถามครับคือว่า ผมอยากดึงข้อมูล ID จาก table ด้วยเงื่อนไขหนึ่ง ถ้าในเงื่อนไขนั้นมีกี่ record ก็ดึงมาหมดเลยครับ
เช่น ผมมี 1.table Group ใน table จะมีข้อมูล Group
            2.table Item มี Field Group อยู่เพื่อเซทว่า item นี้อยู่ Group ไหนครับ สมมุติ Group 1 มี item อยู่ 5 อย่างครับ

     ในหน้าฟอร์มผมต้องการดึงข้อมูลมาดังนี้ครับ textbox1 = item1(Group1), textbox2 = item2(Group1),..., textbox5 = item5(Group1)
ประมาณนี้ครับ ตอนนี้ผมใช้เป็นสร้าง formDatasheet แล้วดึงข้อมูลโดยการ Select * from อยู่ครับ แต่พอเอาไปทำในหน้า Report แล้ว Gridline มันไม่สมบูรณ์ครับ
มันจะมีแค่บางฟิวแต่ส่วนหัวฟิวมันไม่มีให้ครับ หรือถ้ามีวิธีใส่ Gridline ส่วนหัว Field ก็รบกวนด้วยนะครับ

ขอโทษอีกครั้งนะครับถ้ารบกวน :cry: :cry:


     

4
ขอบคุณครับ ตอนนี้ผมลองแก้โดยใช้วิธีรัน Autonumber แบบ short Text แทนครับ
เดี๊ยวถ้ามีปัญหายังไงเดี๊ยวผมขอรบกวนด้วยนะครับ

5
ขอความช่วยเหลือครับ :cry:
ผมกด New Record แล้วเลข Auto Number ที่เซทไว้ไม่ขึ้นครับ ก่อนเชื่อม ODBC เข้า SQL ใช้งานได้ปกติครับ พอเชื่อมแล้วไม่ขึ้นครับต้องกรอกข้อมูลให้ครบแล้ว
กดที่วงกลมไว้หมายเลข 2 Auto Number ถึงจะขึ้นครับ(ถ้าไม่กดแล้ว save จะขึ้น Runtime Error 3164 ครับ)



 :cry: :cry: :cry:

6
ขอบคุณมากนะครับที่ช่วยตอบตลอด ตอนนี้ใช้งานได้แล้วครับ

7
ตอนนี้ทำได้แล้วครับ แต่ติดตรงที่เขียนแบบไหนให้แก้หลาย Record ครับ

เขียนแบบนี้ไปแล้วแก้แค่ Record เดียวครับ
    DoCmd.RunSQL "Update[dbo_Devices] " _
              & "Set Status_Devices = '" & "1" & "'" _
              & "Where Device_ID = '" & Me.Devices1 & "' and '" & Me.Devices2 & "';"

8
ผมใส่ข้อมูลไปตามนี้ ขึ้น Runtime error 3144 Syntax Error in Update Statement
ไม่แน่ใจว่าผมใส่ข้อมูลตรงไหนผิดไปหรือเปล่าครับ


10
เริ่มด้วยผมทำระบบเบิก-คืนอุปกรณ์ครับ โดยหน้าเบิกจะแบ่งเป็น 2 ส่วนครับ
Set อุปกรณ์(ทำtable Setไว้ จึงไม่มีปัญหาครับ) และตัวอุปกรณ์เสริมที่มีปัญหา ใน Table ผมทำ Field สถานะของอุปกรณ์นั้นไว้ว่า 1= เบิก 0= คืน

ในหน้าเบิกมี 2 ส่วนตามรูปครับ


ส่วนที่ 1 เป็น Set ครับผมทำ Table เก็บข้อมูลอุปกรณ์ไว้แล้ว จึงไม่มีปัญหาอะไรครับ
ส่วนที่ 2 คือการเพิ่มอุปกรณ์เสริมซึ่งในแต่ละครั้งอุปกรณ์ไม่เหมือนกันครับ ผมจึงใช้ table อุปกรณ์ เพิ่ม Field สถานะที่ Table Devices เลย


รูปนี้คือตัวโค้ดที่ผมใช้ครับ


คำถามคือมีวิธีใดที่กดปุ่ม Save แล้วเปลี่ยนค่าสถานะ อุปกรณ์ทั้งหมดเป็น 0 เลยได้ไหมครับ หรือมีวิธีอื่นๆที่ดีกว่านี้ครับ
รบกวนด้วยนะครับ

11
ผมเจอจากข้อมูลเก่าแล้วนะครับ ขอบคุณครับ

12
สอบถามครับ ผมตั้งค่าการเพิ่มข้อมูลให้มันรัน autoid ไว้ครับ
แต่ผมมีกรณีที่ว่าผมเริ่มกรอกข้อมูลใส่แล้วเลข id จะเริ่มรัน แล้วผมกดออกหรือยกเลิกไปเลย พอจะสร้างข้อมูลใหม่
เลข id มันข้ามไปเลยครับ มีวิธีแก้ไขหรือมีโค้ดป้องกันไหมครับ



13
ได้แล้วครับ ขอบคุณมากๆๆๆๆครับ ไม่งั้นผมแย่เลย

14


พอดีผมปิด Ribbon
Use Special Key
Allow full Menu
Allow Default Shotcut Menu
ใน Option ไปแล้ว และผมต้องการที่จะเปิดมาแก้ไข มีคำสั่งหรือวิธีใดเปิดได้บ้างครับ  :cry: :cry:

15
ขอบคุณมากเลยนะครับ อ.สันติสุข ผมไม่ได้ใส่ Primary Key ไว้ ตอนนี้ใส่เรียบร้อย และได้เลือกตามที่บอกใช้งานได้แล้วครับ ขอบคุณมากครับ

16
พอดีผมจะเชื่อม table เข้ากับ SQL Server ครับ
table อื่นเชื่อมได้ปกติ แต่ table นี้มี 25 fields ไม่ทราบว่ามีวิธีแก้ไขให้ใช้ได้ไหมครับ


หน้า: [1] 2