 |
|
ช่วยหน่อยครับ อยากรู้เรื่องโค้ด auto id ให้มีตัวอักษรนำหน้าครับ โค้ด VB |
|
 |
|
|
 |
 |
|
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
ลองดูครับ
|
 |
 |
 |
 |
Date :
2012-02-29 09:00:03 |
By :
Thep |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
หรือไม่ลองดูในกระทู้เก่า ๆ ครับ มีถามไว้หลายตัวมาก 
|
 |
 |
 |
 |
Date :
2012-02-29 17:48:13 |
By :
webmaster |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอบคุณมากครับ แต่โค้ดนี้ error อ่ะครับ กิกิ เด๋วผมลองหาดูก่อนนะครับ ไม่ได้ยังไง จะมาถามใหม่นะครับ
|
 |
 |
 |
 |
Date :
2012-02-29 23:42:30 |
By :
naiikalon |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
แก้ไขใหม่ใช้อันนี้
Str = "declare @id varchar(10),@tempid varchar(10)" & vbCrLf & _
"select top 1 @id=ism_id from installment order by convert(int,right(@id,5)) desc" & vbCrLf & _
"set @tempid='CAS'+right('0000'+convert(varchar,convert(int,right(@id,5))+1),5)" & vbCrLf & _
"select @tempid as runno "
|
 |
 |
 |
 |
Date :
2012-03-01 10:12:04 |
By :
Thep |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
พี่ครับทำไมผมลองใส่แล้วมัน run ได้แค่ 2 อะครับ มันไม่ run ต่อแล้วอ่ะครับ ช่วยทีนะครับ +โค้ด VB2008 นะครับ
|
ประวัติการแก้ไข 2012-03-09 21:30:56
 |
 |
 |
 |
Date :
2012-03-09 21:30:21 |
By :
naiikalon |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|