Private Sub cmdfrmKaryawan_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("TblLogHistory", dbOpenDynaset)
rs.AddNew
rs!note = "Form Karyawan dibuka "
rs!logtime = Now()
rs.Update
rs.Close
db.Close
End Sub
Salam,
Edi Rosadi
http://edirosadie.blogspot.com
http://cilegonmap.blogspot.com
http://cilegonan.wordpress.com
komersilkan blog atau website anda dengan bergabung di sini atau di sini
--- On Fri, 12/3/10, Cecep W <[email protected]> wrote:
From: Cecep W <[email protected]>
Subject: [belajar-access] Ambil data untuk tabel
To: [email protected]
Date: Friday, 12 March, 2010, 1:31 PM
hallo pakar access semua,
saya punya tabel 'TblLogHistory' dengan field sbb:
User
Log Time
Note
saya ingin ketika saya menjalalnkan event On Clik pada suatu Form maka
Field Note pada tabel 'TblLogHistory' aka terisi kata.
misalkan ketika saya klik Command button untuk membuka form Karyawan
maka Note pada tabel 'TblLogHistory' akan terisi "Form Karyawan
dibuka"
cara ini juga akan diberlakukan untuk mengisi Field 'User' dan 'Log Time'
regards
CW
Yahoo! Toolbar is now powered with Search Assist.Download it now!
http://sg.toolbar.yahoo.com/
