: Saturday, January 26, 2008 9:14 AM
Subject: Re: [indoprog-vb] Nomor Otomatis
kk / guru2 vb, tolong donk, gmn yach buat supaya
bisa nomor automatis ?
contoh : No.JobSheet
text1.text = textbox
nomor di mulai dari 3000
setiap form di panggil atau aktif, akan terus
From: 7linuxs [EMAIL PROTECTED]
To: indoprog-vb@yahoogroups.com
Sent: Friday, January 25, 2008 3:04:35 PM
Subject: [indoprog-vb] Nomor Otomatis
kk / guru2 vb, tolong donk, gmn yach buat supaya bisa nomor automatis ?
contoh : No.JobSheet
text1.text = textbox
nomor di mulai dari 3000
setiap form
kk / guru2 vb, tolong donk, gmn yach buat supaya bisa nomor automatis ?
contoh : No.JobSheet
text1.text = textbox
nomor di mulai dari 3000
setiap form di panggil atau aktif, akan terus bertambah, dan tidak boleh
duplikasi
thx ya kk, saya masih newbie nich di VB 6.0
[Non-text
Udah punya PCMAV BARu
Klik Disini nih
http://k4lijati.blogspot.com/
[Non-text portions of this message have been removed]
kk / guru2 vb, tolong donk, gmn yach buat supaya
bisa nomor automatis ?
contoh : No.JobSheet
text1.text = textbox
nomor di mulai dari 3000
setiap form di panggil atau aktif, akan terus
bertambah, dan tidak boleh duplikasi
thx ya kk, saya masih newbie nich di VB 6.0
Menurut
-vb@yahoogroups.com
Sent: Friday, January 25, 2008 3:04:35 PM
Subject: [indoprog-vb] Nomor Otomatis
kk / guru2 vb, tolong donk, gmn yach buat supaya bisa nomor
automatis ?
contoh : No.JobSheet
text1.text = textbox
nomor di mulai dari 3000
setiap form di
] Nomor Otomatis
Saya sudah coba isi N = 1 tetap tidak bisa
- Original Message -
From: Development, ID-IT
To: indoprog-vb@yahoogroups.com
Sent: Monday, April 30, 2007 10:51 AM
Subject: RE: [indoprog-vb] Nomor Otomatis
Kalau nilai awal N diisi 1 bagaimana
tidak bisa
- Original Message -
From: Development, ID-IT
To: indoprog-vb@yahoogroups.com indoprog-vb%40yahoogroups.com
Sent: Monday, April 30, 2007 10:51 AM
Subject: RE: [indoprog-vb] Nomor Otomatis
Kalau nilai awal N diisi 1 bagaimana?
If AdoNoUrut.RecordCount = 0 Then
N = 1
Else
@yahoogroups.com
Sent: Monday, April 30, 2007 10:51 AM
Subject: RE: [indoprog-vb] Nomor Otomatis
Kalau nilai awal N diisi 1 bagaimana?
If AdoNoUrut.RecordCount = 0 Then
N = 1
Else
AdoNoUrut.MoveLast
N = AdoNoUrut.Fields(N)
End If
N = N + 1
Selamat pagi rekan-rekan semua, saya punya koding seperti dibawah.
Sub NoUrut()
Set AdoNoUrut = New Recordset
AdoNoUrut.Open Select Left(Max(tblIn.In_Id),4) As N from tblIn, db,
adOpenStatic, adLockOptimistic
If AdoNoUrut.RecordCount = 0 Then
N = 0
Else
AdoNoUrut.MoveLast
N =
10:24 AM
To: indoprog-vb@yahoogroups.com; [EMAIL PROTECTED]
Subject: [indoprog-vb] Nomor Otomatis
Selamat pagi rekan-rekan semua, saya punya koding seperti dibawah.
Sub NoUrut()
Set AdoNoUrut = New Recordset
AdoNoUrut.Open Select Left(Max(tblIn.In_Id),4) As N from tblIn, db,
adOpenStatic
Saya sudah coba isi N = 1 tetap tidak bisa
- Original Message -
From: Development, ID-IT
To: indoprog-vb@yahoogroups.com
Sent: Monday, April 30, 2007 10:51 AM
Subject: RE: [indoprog-vb] Nomor Otomatis
Kalau nilai awal N diisi 1 bagaimana?
If AdoNoUrut.RecordCount = 0
: [indoprog-vb] Nomor Otomatis
Selamat pagi rekan-rekan semua, saya punya koding seperti dibawah.
Sub NoUrut()
Set AdoNoUrut = New Recordset
AdoNoUrut.Open Select Left(Max(tblIn.In_Id),4) As N from tblIn, db,
adOpenStatic, adLockOptimistic
If AdoNoUrut.RecordCount = 0 Then
N = 0
Saya ingin membuat Nomor Induk Siswa yang otomatis tapi diawali dengan
tahun ini kemudian nomor urut.
Ya kalo nomor urut biasa sich bisa tinggal ditambah 1.
Tapi kalo ada tahunnya, saya ingin ketika tahun berubah, maka nomor
urutnya mulai lagi dari awal.
Contoh: 2004073
2004074
[mailto:[EMAIL PROTECTED] On
Behalf Of dafiet_dann
Sent: Friday, April 29, 2005 10:06 PM
To: indoprog-vb@yahoogroups.com
Subject: [indoprog-vb] Nomor otomatis diawali dengan tahun. Syntax-nya
gimana ?
Saya ingin membuat Nomor Induk Siswa yang otomatis tapi diawali dengan
tahun ini kemudian nomor urut
15 matches
Mail list logo