Autonumber Pada VB.Net Database SQL Server
Sebelum membuat pencarian data alangkah baik nya lihat tutorial di bawah ini :
- Koneksi Akurat pada VB.Net
Tutorial kali ini saya mau membahas tentang Autonumber pada VB.Net.
Buat lah sebuah fungsi pada vb.net, koding seperti di bawah ini
Sub autonumber()
Dim cmd As SqlClient.SqlCommand
Dim reader As SqlClient.SqlDataReader
cmd = New SqlCommand("select * from barang order by kode desc", Conn)
reader = cmd.ExecuteReader
If reader.Read Then
Dim no As Integer
no = reader(0) + 1
TextBox1.Text = "0" & no
Else
TextBox1.Text = "01"
End If
reader.Close()
End Sub
Setelah di buat, double klik form ( pada event load ) panggil fungsi autonumber
Koneksi , database harap di sesuaikan .
Note :
barang : nama table
kode : nama field table database yang akan di buat autonumber
Tutorial kali ini saya mau membahas tentang Autonumber pada VB.Net.
Buat lah sebuah fungsi pada vb.net, koding seperti di bawah ini
Sub autonumber()
Dim cmd As SqlClient.SqlCommand
Dim reader As SqlClient.SqlDataReader
cmd = New SqlCommand("select * from barang order by kode desc", Conn)
reader = cmd.ExecuteReader
If reader.Read Then
Dim no As Integer
no = reader(0) + 1
TextBox1.Text = "0" & no
Else
TextBox1.Text = "01"
End If
reader.Close()
End Sub
Setelah di buat, double klik form ( pada event load ) panggil fungsi autonumber
Koneksi , database harap di sesuaikan .
Note :
barang : nama table
kode : nama field table database yang akan di buat autonumber
Bagi yang butuh project nya silahkan download di bawah ini
Semoga Bermanfaat Bagi Kita Semua
Written by thoestone
We are Creative Blogger Theme Wavers which provides user friendly, effective and easy to use themes. Each support has free and providing HD support screen casting.
Posts
0 comments:
Post a Comment