Kalo Pake MS Access, setahu saya
kalo datanya udah lebih dari 9999 harus pake script tambahan
sayangnya saya lupa lg scriptnya..
coba tanya ajah mas google


----- Pesan Asli ----
Dari: yudi susanto <[EMAIL PROTECTED]>
Kepada: [email protected]
Terkirim: Minggu, 1 Juni, 2008 23:42:55
Topik: Bls: [Programmer-VB] overflow


mungkin type datanya di database mas, bukan Type Long, mungkin lho........


----- Pesan Asli ----
Dari: god ril <[EMAIL PROTECTED] com>
Kepada: master Visual basic <programmer-vb@ yahoogroups. com>
Terkirim: Sabtu, 31 Mei, 2008 23:53:09
Topik: [Programmer- VB] overflow


Dim Conn As New ADODB..Connection
Dim Rs As New ADODB.Recordset
Dim StrConnect As String
Dim StrSQL As String
 
Sub Konek()
StrConnect = "Provider=Microsoft .Jet.OleDB. 4.0;Data Source=" + App.Path + 
"\penjualan. mdb"
If Conn.State = adStateOpen Then
Conn.Close
Set Conn = New ADODB.Connection
Conn.Open StrConnect
Else
Conn.Open StrConnect
End If
End Sub
 
Private Sub Form_Load()
Dim i As Integer
Call Konek
StrSQL = "select No_faktur from item"
Set Rs = Conn.execute( StrSQL)
i = Rs("No_Faktur" )
Txtfaktur = i + 1
End Sub

 
"Kenapa pasti overflow kalau datanya lebih dari 9999?"
tolong jelasin + kasih solusinya... .
trims... 

________________________________
 Dapatkan info tentang selebritis  - Yahoo! Indonesia Search.     


      Yahoo! Toolbar kini dilengkapi dengan Search Assist. Download sekarang 
juga.
http://id.toolbar.yahoo.com/

Kirim email ke