กระทู้เก่าบอร์ด อ.Yeadram
3,605 4
URL.หัวข้อ /
URL
ตั้งautonumberให้ขึ้นต้นด้วยตัวอักษร ต้องทำยังไง
ต้องการให้G0001เป็นคีย์หลักแล้วก้อรันต่อไปเรื่อยๆอะค่ะ แต่ว่าไม่รุ้จะไปตั้งตรงไหน ถ้าต้องเขียนโค๊ดกำกับ เค้าเขียนใส่ตรงไหน พอดีมือใหม่ แต่งานเร่งมากเลยค่ะ รบกวนผู้รู้ด้วยนะค่ะ
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R07916
ขอบคุณค่ะ
3 @R07917
รบกวนอิกนิดนะค่ะคือว่า"G" & [autorun] มันจะไปใส่ตรงไหนหรอค่ะ แล้วเวลาเราเขียนโค๊ดอ่ะค่ะ มันจะเขียนตรงไหน ขอบคุณมากกกกก จริงๆค่ะ
4 @R07975
Public RstType As New ADODB.Recordset
Sub Autorun()
If RstType.RecordCount = 0 Then
TxtId = Format(1, "000")
Else
RstType.MoveLast
nub = Val(RstType!idemp)
nub = nub + 1
aa = Format(nub, "G0000")
TxtId = aa
End If
End Sub
call Autorun ไว้ตรงปุ่ม CommandAdd ค่ะ
เลือกแสดง ที่ text TxtId ค่ะ
ลองไปประยุกติ์ดูนะค่ะ ตัวนี้ใช้เขียนใน VB.6 เชื่อมต่อกับ Access
เราเคยไปเขียนใน Access แล้วใช้ได้ค่ะ
ถ้าไม่ตรงตามความต้องการก็ขออภัยจ้า
Sub Autorun()
If RstType.RecordCount = 0 Then
TxtId = Format(1, "000")
Else
RstType.MoveLast
nub = Val(RstType!idemp)
nub = nub + 1
aa = Format(nub, "G0000")
TxtId = aa
End If
End Sub
call Autorun ไว้ตรงปุ่ม CommandAdd ค่ะ
เลือกแสดง ที่ text TxtId ค่ะ
ลองไปประยุกติ์ดูนะค่ะ ตัวนี้ใช้เขียนใน VB.6 เชื่อมต่อกับ Access
เราเคยไปเขียนใน Access แล้วใช้ได้ค่ะ
ถ้าไม่ตรงตามความต้องการก็ขออภัยจ้า
Time: 0.3392s
"G" & [autorun]
ก็จะได้ตามต้องการ
เพียงแต่ถ้ามีการยกเลิกรายการ ตัวเลข มันจะข้ามไปเท่านั้น
ถ้าไม่ต้องการให้ตัวเลขข้าม มันต้องเขียน code เพิ่มขึ้น