Bls: [belajar-access] Re: bagaimana cara mencegah duplikasi data pada satu tanggal

numpang nibrung.

bang saya coba bantu ya..

Dim strNIK As String
Dim strCriteria As String
Dim rsc As DAO.Recordset

Set rcs = Me.RecordsetClone
strNIK = Me.nik.Value
dTglST = "tglST = Date()"
strCriteria = "[nik]=" & "'" & strNIK & "'"

If DCount("nik", "[tbl_st]", strCriteria)>0 Then
    Me.Undo
    Msgbox "Maaf NIK = " & strNIK & "  hari ini sudah, masukan NIK yang lain,", vbInformation,"NIK tidak boleh Double"
   Docmd.GoToRecord, , acNewRec
End If
Set rsc = Nothing 

Salam,
Rully newbie

---

Dari: Zamrudy <akh_jamrud@yahoo.co.id>
Kepada: belajar-access@yahoogroups.com
Terkirim: Sen, 18 April, 2011 15:00:54
Judul: [belajar-access] Re: bagaimana cara mencegah duplikasi data pada satu tanggal

 

terimakasih mas Darsono buat atensinya..
cuman di tugas yang saya kerjakan ini, karyawan yang melakukan tugas memang tidak diperkenankan melakukan tugas lain dikarenakan pada tanggal tersebut juga berkaitan dengan perjalanan dinas. sehingga jika terjadi double entry maka akan yang saya harapkan akan muncul message box di aplikasi. perjalanan dinas sendiri biasanya lebih dari 2 hari.

(ato mungkin perlakuannya sama dengan aplikasi untuk reservasi kamar hotel ya mas??)

--- In belajar-access@yahoogroups.com, Darsono <darsono72@...> wrote:
>
> Hallo mas Zamrudy,
> untuk memulainya siapkan dua tabel
> 1. tbl_SuratTugas   field minimal :      - NoST  (PrimaryKey) --> contoh format misalnya 20110520-001     - TglST
> 2. tbl_SuratTugasDetail    field minimal :    - NoSTDetail (PrimaryKey) -->> gunakan kombinasi NoST + NoKaryawan    - NoKaryawan    - KetTugas    - dlll
> Buat Form Induk dan SubForm dari kedua table tersebut,Jangan di batasi satu orang hanya satu tanggal, karena ada kemungkinan orang tugas bisa lebih dari satu kali dengan tugas yang sama atau tugas yang lain.
> Selamat berkreasi
> Darsono
>
>
> --- On Fri, 4/15/11, Zamrudy <akh_jamrud@...> wrote:
>
> From: Zamrudy <akh_jamrud@...>
> Subject: [belajar-access] bagaimana cara mencegah duplikasi data pada satu tanggal
> To: belajar-access@yahoogroups.com
> Date: Friday, April 15, 2011, 2:44 PM
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>  
>
>
>
>
>
>
>
>
>
> siang belajar-access.. ijin gabung ya. sekalian pengin tanya2...
>
> baru-baru ini saya memliki tugas untuk membuat aplikasi Pembuatan Surat Tugas berbasis access.
> data2 yang perlu dimasukkan antara lain
>
> Nomer surat tugas
> Tanggal surat tugas
>
> untuk yang menjalankan tugas direncanakan dengan menggunakan subform karena biasanaya yang menjalankan Surat tugas (ST) lebih dari 1 orang dengan isi subform berupa
> Nomor induk karyawan
> tanggal ST
> akhir ST
> lama ST
>
> >>dst
>
> yang menjadi masalah adalah bagaimana cara mencegah dan mendeteksi input pegawai yang sudah diinput pada tanggal yang sama walaupun diinput pada ST yang berbeda?
>
> mohon pencerahannya n terima kasih sebelumnya
>

__._,_.___

SPAM IS PROHIBITED

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___