ACCESS FEED: Bls: [belajar-access] Re: ask : update entry date dan user [1 Attachment]

Rabu, 18 Mei 2011

Bls: [belajar-access] Re: ask : update entry date dan user [1 Attachment]

[Attachment(s) from Jarjit Aco included below]

Asslm....

Berikut ada sampel, copas dari milis ini..... maaf lupa nama filex :) , sy dibuat thn lalu

menggunakan memory dalam VBA, bisa dipelajari dengan menggunakan function Get_LoginId(), function Get_LoginName(), function Get_LoginLevel() pada Modul Mdl_Var,

Me.UserUpdate = Get_LoginId()
Me.TglUpdate = Now()

cuma mungkin perlu diperbaiki lagi pada saat memberi nilai karna dalam sampel ini pada form login variabel public V_LoginId, V_LoginName dan V_LoginLevel langsung diberi nilai mungin bisa dibuatkan function dengan Let_LoginId, Let_LoginName dan Let_LoginLevel... maklum sama newbie :) dan mohon perbaikan dari para master dan rekan2 milis...........

     V_loginName = txt_userLogin
    V_loginLevel = DLookup("[level]", "user", loginkriteria)
    V_loginId = DLookup("[userid]", "user", loginkriteria)

Waslm........

Dari: Sofyan Efendi <sofyanefendi@gmail.com>
Kepada: belajar-access@yahoogroups.com
Dikirim: Kamis, 19 Mei 2011 7:38
Judul: Re: [belajar-access] Re: ask : update entry date dan user

Dear Mas Hendra Agestha Hamid, samplenya ada kantor, selain itu, catatan / log user yg masuk setiap kali login tercatat dalam table khusus. Sehingga tanggal sekian, jam sekian, siapa saja yg login, tercatata semua.

But this morning i'm still in home, sederhananya, setiap user login, simpan ke table temporary nama usernya. Kemudian buat module baru misal:

Public Function NamaUserLogin() As String
NamaUserLogin = DLookup("NamaUser", "tmpUserLogin")
End Function

Nanti pada form yg hendak dijadikan inputan untuk user, bisa ditambahakan field dengan default value : =NamaUserLogin()

Hanya saja =NamaUserLogin() ini tidak bisa diset di table langsung, hanya di form saja, baik dalam bentuk datasheet atau lainnya.

Ini hanya sample, boleh saja menggunakan cara lain, semisal user login disimpan dalam memori VBA. Saya sendiri menggunakan cara lain, yakni user yg login disimpan dalam text box di Main Form (Menu Utama), sehingga Current User nya tinggal merujuk ke text box di menu utama, sehingga tidak memakan memori, dan lebih cepat karena menu utama kan selalu terbuka.

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi.
http://opi.110mb.com/

Pada 18 Mei 2011 20:09, Hendra Agestha Hamid <the_agestha@yahoo.com> menulis:

Maaf Mas Sofyan nimbrung...

Boleh minta contoh form login dengan daftar user name dan password yang dibuat sendiri dan kemudian nama username yg login tsb bisa tercatat secara otomatis dalam suatu field setiap kali penambahan record.... berarti ini gak pakai mdw ya mas..?
biasanya saya pake mdw, kemudian di field yg mau dimasukkan nama usernamenya pada properties default value saya set =CurrentUser().
terima kasih mas ...

From: Sofyan Efendi <sofyanefendi@gmail.com>
To: belajar-access@yahoogroups.com
Sent: Wed, May 18, 2011 3:18:28 PM
Subject: [belajar-access] Re: ask : update entry date dan user

Sekedar menambahkan, untuk fungsi currentuser efektif untuk data mdb yang dikaitkan dengan file mdw, namun untuk file accdb, alternatifnya bisa menggunakan user name dari login windows. Atau bisa juga membuat form login dengan daftar user name dan password yang dibuat sendiri.

Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi.
http://opi.110mb.com/

--- In belajar-access@yahoogroups.com, Rosyid Komputer <rosyidcom@...> wrote:
>
> pada formnya dipasang event
>
> private sub Form_BeforeInsert
> me!InputBy=currentuser
> me!inputDate=Now
> end sub
>
> private sub Form_BeforeUpdate
> me!EditBy=CurrentUser
> me!EditDate=Now
> end sub
>
> Terima kasih,
>
>
> Agung Santoso
> email:rosyidcom@yahoo. com
> Hp. 02191466149 (sms ok)
> Yahoo Messenger = rosyidcom (jam kerja 08 s/d 17, senin - jumat)
> website : www.indonetwork.co.id/rosyidcom
>
>
>
>
> ________________________________
> From: ephot cr <ephot_independent@...>
> To: belajar-access@yahoogroups.com
> Sent: Wed, May 18, 2011 2:45:15 PM
> Subject: [belajar-access] ask : update entry date dan user
>
>
> salam,
>
> ada yang ingin saya tanyakan soal access sbb:
> 1. bagaimana supaya entry date/tanggal input berubah terus setiap ada perubahan
> data (tidak berubah ketika tidak ada perubahan data)/edit data
> 2. bagaimana supaya user login menjadi terinpunt pada saat transaksi dan pada
> saat edit transaksi (edit data)
>
> terima kasih,
> ephot
>