Sebelum .AddNew mungkin bisa dicheck dulu .State nya
Apakah tabel sudah dalam kondisi Open atau belum dibuka (soal .STATE ini
bisa dilihat di MSDN)
Salam,
Newbie
On Jan 28, 2008 9:53 AM, ayik imut <[EMAIL PROTECTED]> wrote:
> yap, semoga terjawab, access 2000nya dataa, hasil conventnya dataku.mdb
>
> Private Sub Form_Load()
> dataa.DatabaseName = App.Path + "\dataku.mdb"
> dataa.RecordSource = "tbldata"
> end sub
>
> Private Sub txtnama_keypress(keyascii As Integer)
> If keyascii = 13 Then
> txtalamat.SetFocus
> End If
> End Sub
>
> Private Sub txtalamat_keypress(keyascii As Integer)
> If keyascii = 13 Then
> txttlp.SetFocus
> End If
> End Sub
>
> Private Sub txttlp_keypress(keyascii As Integer)
> If keyascii = 13 Then
> txttgl.SetFocus
> End If
> End Sub
>
> Private Sub txttgl_keypress(keyascii As Integer)
> If keyascii = 13 Then
> cmdsave.SetFocus
> End If
> End Sub
> Private Sub cmdsave_Click()
> dataa.Recordset.AddNew
> dataa.Recordset("Nama") = txtnama.Text
> dataa.Recordset("Alamat") = txtalamat.Text
> dataa.Recordset("Telp") = txttlp.Text
> dataa.Recordset("tgl_lahir")=txttgl.Text
> dataa.update
> cmdcancel.value = True
> end sub
>
> jontampubolon <[EMAIL PROTECTED] <jontampubolon%40telkom.net>>
> wrote: Begini aja, coba tampilkan kode programnya, agar orang2 yang ada di
> grup ini bisa melihat dan menganalisanya. Bagaimana, setuju?
>
> --- In [email protected] <indoprog-vb%40yahoogroups.com>, ayik
> imut <[EMAIL PROTECTED]> wrote:
> >
> > yap makasih tanggapannya, aku udah convert ke 97. tetep tuh nggak
> bisa.gimana ya??
> >
> > jontampubolon <[EMAIL PROTECTED]>
> wrote: Setahu saya kalo pake access 97
> pemrogramannya dengan DAO, sedangkan
> > access 2000 dan yang terbaru pemrogramannya dengan ADO. Mungkin
> > pemrograman yang anda gunakan DAO tetapi anda menggunakan access
> 2000.
> > Biasanya nggak bisa, kecuali anda convert database-nya ke versi
> access
> > 97.
> >
> >
> >
> >
> >
> >
> > ---------------------------------
> > Be a better friend, newshound, and know-it-all with Yahoo!
> Mobile. Try it now.
> >
> > [Non-text portions of this message have been removed]
> >
>
>
>
>
>
> ---------------------------------
> Be a better friend, newshound, and know-it-all with Yahoo! Mobile. Try it
> now.
>
> ---------------------------------
> Looking for last minute shopping deals? Find them fast with Yahoo! Search.
>
> [Non-text portions of this message have been removed]
>
>
>
[Non-text portions of this message have been removed]
