Di milis ini udah cukup orang tuanya, ndak usah ditambah lagi.
Mbah Anom - bang Aksan Mbah Tuo - bapak Budi Laksamana (ndak berani manggil bang :-) ) Engkong Access - ini orangnya baek deh.. dan entar waktu kopdar mau jadi pembicara. E-Young (Eyang kan kang Muntahar.) MBA aja. Murid Bang Aksan, dan mbah2 di atas. (biar tetep ngerasa muda.) MBA. _____ From: [email protected] [mailto:[email protected]] On Behalf Of Aksan Kurdin Sent: Tuesday, March 09, 2010 11:00 AM To: [email protected] Subject: Re: [belajar-access] mencegah user mengupdate data di luar list combo Yup, jangan keliru manggil MBAk lo ya .... MBAh .... pake "h" .... :) aksan kurdin On 3/8/2010 6:08 PM, yokananwahyono wrote: Mantap MBA memang "Mbahnya Acces" Salam Hangat Yokanan wahyono _____ From: [email protected] [mailto:[email protected]] On Behalf Of MBA Sent: Saturday, March 06, 2010 6:51 PM To: [email protected] Subject: RE: [belajar-access] mencegah user mengupdate data di luar list combo Lebih praktis dengan set property combo box bernama limited to list = yes / true Salam hangat dan jabat erat, MBA _____ From: [email protected] [mailto:[email protected]] On Behalf Of yokananwahyono Sent: Saturday, March 06, 2010 11:45 To: [email protected] Subject: [belajar-access] mencegah user mengupdate data di luar list combo Dear Teman - teman Saya coba membuat parameter di "PO_Line" Di combo "Item_Name" "Lihat" akan dlookup data di masing2 combo jika lihat = kosong maka akan keluar pesan "kode tidak ada" itu untuk mencegah user mengupdate "Item_code" di luar daffar di combo berikut kodenya Item_Code = Trim(Item_Code) Item_Code.Requery If [item/gl].Value = "GL" Then lihat = DLookup("[acount_code]", "[t_account]", "[acount_code]='" & [Item_Code] & "'") Else lihat = DLookup("[item_kode]", "[t_item_master]", "[item_kode]='" & [Item_Code] & "'") End If If lihat = "" Then MsgBox " Item / GL " & UCase(Item_Code) & " Tidak Ada ", vbOKOnly [item/gl].SetFocus Item_Code.SetFocus Item_Code = "" Else End If apanya yang salah y? Thanks Yokanan wahyono No virus found in this incoming message. Checked by AVG - www.avg.com Version: 9.0.733 / Virus Database: 271.1.1/2725 - Release Date: 03/06/10 02:34:00 No virus found in this incoming message. Checked by AVG - www.avg.com Version: 9.0.733 / Virus Database: 271.1.1/2731 - Release Date: 03/09/10 02:33:00
