รบกวนแก้บัคให้ทีครับ
กระทู้เก่าบอร์ด อ.Yeadram

 1,012   1
URL.หัวข้อ / URL
รบกวนแก้บัคให้ทีครับ

สวัสดีครับ...รบกวนสอบถามทีครับคือผมเขียนโปรแกรมรับสมัครสอบ
ติดบัคอยู่ 1 เรื่องใหญ่เลย

ปัญหา คือ ในการสมัครประกอบ เลข 8 ตัว คือ 4 ตัวแรก รหัสตำเเหน่ง(7011,7012 ผู้บันทึกเลือก) เเละ 4 ตัวต่อมา เลข gen โดย+1 เรื่อยๆ

ปัญหา คือ สมมุติ
คนแรกมาสมัคร ตน.7011 ก็จะได้รหัสเป็น 70111001
คนที่สองมาสมัคร ตน.7011 ก็จะได้รหัสเป็น 70111002
คนที่สามมาสมัคร ตน.7012 ก็จะได้รหัสเป็น 70121003 นี่หละครับบัค
ผมอยากให้ คนที่สาม(ซึ่งเป็นคนเเรกของ ตน. 7012) ได้รหัส 70121001 ครับ

สรุป คือ ตน.ไหนก็ให้ gen เลข 4 ตัวหลังของรหัสใดรหัสนั้นครับ

code เขียนตอน gen เลขครับ
Private Sub Combo105_LostFocus()
If Me.NewRecord Then
    If DCount("[id_num]", "register") = 0 Then
        Text1 = 1001
    Else
        Text1 = DMax("id_num", "register") + 1
    End If
End If
End Sub

***ขอบอกรายละเอียด database นิดครับ
ใน database filed id_nun เก็บ เลขที่ gen 4 ตัวหลัง
ใน database filed id_pos เก็บ เลขรหัสตำแหน่ง 4 ตัวแรก

ใน from combo105 เชื่อมกับ filed id_pos
ใน from text1 เชื่อมกับ filed id_num

***อยากจะได้วิธี chack combo105 เป็นรหัสตำแหน่งใด คนสมัครไปกี่คนแล้ว
จึงนำไป +1 ครับ

รบกวนทีนะครับ

1 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R17060


Private Sub Combo105_LostFocus()
If Me.NewRecord Then
    if(DCount("id_num","register","[id_pos]=Forms!ชื่อฟอร์ม!combo105"))>0 then
Text1=1001+DCount("id_num","register","[id_pos]=Forms!ชื่อฟอร์ม!combo105")
else
Text1=1001
    End If
End If
End Sub
ไม่รู้ใช้ได้หรือปล่าว ลองดูครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.2518s