ช่วยหน่อยครับ อยากรู้เรื่องโค้ด auto id ให้มีตัวอักษรนำหน้าครับ โค้ด VB
เช่น CAS00001 เป็นต้นครับ คือผมเขียนโค้ดเเบบนี้แล้ว
มันไม่ได้อ่ะครับ รบกวนบอกหน่อยนะครับ ขอบคุณล่วงหน้านะครับ
Code (VB.NET)
Sub Loadrunno()
Me.Connection()
Dim str As String
Dim dsruno As New DataSet
str = "SELECT ISNULL(MAX(i.ism_id),0) + 1 AS runno FROM installment i"
da = New SqlDataAdapter(str, conn)
da.SelectCommand.CommandText = str
da.Fill(dsruno, "installment")
txtism_id.Text = dsruno.Tables(0).Rows(0)("runno").ToString().PadLeft(6, CChar("0"))
End Sub
Tag : .NET, MySQL
Date :
2012-02-28 22:13:36
By :
naiikalon
View :
1854
Reply :
5
No. 1
Guest
Code (VB.NET)
Sub Loadrunno()
Me.Connection()
Dim str As String
Dim dsruno As New DataSet
str = "declare @id varchar(10),@tempid varchar(10)" & _
"select top 1 @id=ism_id from installment order by convert(int,right(@id,5)) desc"& _
"set @tempid='CAS'+right('0000'+convert(varchar,convert(int,right(@id,5))+1),5)"& _
"select @tempid as runno "
da = New SqlDataAdapter(str, conn)
da.SelectCommand.CommandText = str
da.Fill(dsruno, "installment")
txtism_id.Text = dsruno.Tables(0).Rows(0)("runno")
End Sub
Load balance : Server 03
