biasanya saya menggunakan cara berikut(dalam VB.NET):

sub generate()

dim str,kode as String

str = "Select ISNULL(Count(kode),0) as jml From Transaksi"

sqlCommand = New SqlCommand(str,objKoneksi)
jml = objPerintah.ExecuteScalar

labelKode.text = jml+1

end sub


Salam,

Agus Pradikta


Kirim email ke