MS ACCESS MAILING LIST

Re: [belajar-access] [HELP] Multiple Values Box

" multiple values box " itu apa ?
control list box maksudnya ?

biasanya memilih bisa digunakan space bar, atau kombinasi shift panah, ctrl mouse, dll.

aksan kurdin

On 2/23/2012 3:35 PM, fikar.sudo wrote:

Salam Kenal,

Saya kebingungan ne, apakah mungkin di ms access memilih value di multiple values
box pada access, selain menggunakan mouse (click to pick) tetapi menggunakan
keyboard (mengetik value/mengetik kode dari value). Kalau mungkin, bagaimana
caranya?

Thanks

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (3)

Recent Activity:

New Members 12

Visit Your Group

SPAM IS PROHIBITED

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: [belajar-access] lookup reference

Penjelasan lain selain reply saya:
http://www.databasedev.co.uk/filter_combo_boxes.html

aksan kurdin

On 2/23/2012 5:08 PM, Chubby Mike wrote:

Dear all,

bukannya saya ga mau cari, tapi saya bingung kategori apa yg mau saya search. sudah coba cari2 tapi ga ngerti2

begini
tabel A

Channel Product Nama
PL Prem Mick
CC Corp James
CC Prem Rob
PL Comm Jamie

jika dalam form saya taruh 3 combo box, bagaimana cara membuat memilih dari Channel dulu, kemudian combobox2 selanjutnya akan memilah2 data

contoh :
jika channel kita pilih PL, maka di product akan muncul Prem & Comm, jika kita pilih Prem, maka combobox Nama hanya muncul Mick.

maaf kalau berbelit2, baru belajar seminggu. thanks in advance

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (3)

Recent Activity:

New Members 12

Visit Your Group

SPAM IS PROHIBITED

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: [belajar-access] lookup reference

ada di arsip milis kita:
http://tech.groups.yahoo.com/group/belajar-access/messages/33508?threaded=1&m=e&var=1&tidx=1

saya paste-kan saja percakapannya:

#33508    From: "Krishna" <krishna.rusli@gmail.com>
Date: Tue Jan 24, 2012 1:55 pm
Subject: bingung mengenai combo box di Ms.Access    krishna_h_aries
Offline
Send Email

salam kenal mas-mbak..

aku ada persoalan neh, mengenai combobox...

gini, aku punya 3 table..
table lokasi ==> motor ==> catatan pemeliharaan..
LOKASI (tabel nenek) ==> MOTOR (tabel IBU)==>Catatan pemeliharaan (tabel anak)..
lokasi, parrents dari motor.. (1 lokasi bisa punya banyak motor..)
motor, parrents dari catatan pemeliharaan (1 motor, kan bisa dipelihara lebih dari 1x :D)..

nah.. di tabel catatan pemeliharaan, ada field LOKASI sama MOTOR..
di tabel MOTOR, ada field LOKASI..

kira2 tabelnya spt pd gambar berikut

gambar relationship ^_^

nah.. aku bingung buat relationsip LOKASI di tabel CATATAN PEMELIHARAAN.. setiap relationship type field-nya : combo box..

aku pengennya sih ketika aku pilih lokasi A, hanya motor2 di lokasi A saja yang keluar di combo box tabel catatan pemeliharaan..
misal lokasi pabrik, punya motor supra sama jupiter x..
lokasi rumah punya motor vega sama revo..

aku pengennya-di table catatan pemeliharaan- ketika aku pilih pabrik, yg keluar HANYA motor supra sama jupiter x.. ^_^

kl di tabel catatan pemeliharaan, field LOKASI (type combo box), raw sourcenya aku ambil dari tabel lokasi field LOKASI (type text)... (tabel neneknya lah..) aku bingung nyambungin ke tabel motor (tabel ibunya), supaya sesuai dgn spec yg aku ingin... jika pilih lokasi pabrik, yg keluar hanya motor jupiter x dan revo..

kl di tabel catatan pemeliharaan(tabel anak), field LOKASI (type combo box), raw sourcenya aku ambil dari tabel motor field LOKASI (type combo box juga)... aku sudah berhasil buat Meng-update Combo Box berdasarkan Nilai Combo Box lain pada MS Access 2010 nya.. dari tutorial di link itu..

tapi dalam case ku yg keluar malah ID lokasinya, bukan text tempat lokasinya dimana...

ada yg bisa bantu ga???

makasih banget buat yg bantu ^_^

#33509    From: "Krishna" <krishna.rusli@gmail.com>
Date: Tue Jan 24, 2012 10:08 pm
Subject: Re: bingung mengenai combo box di Ms.Access    krishna_h_aries
Offline
Send Email

ada yg bisa bantu ga??

aku bener2 dah nyoba berbagai macam cara, tp gak bisa jg.. :(

akan sangat berterima kasih terhadap semua bantuan dari kakak-kakak sekalian..

#33513    From: "Krishna" <krishna.rusli@gmail.com>
Date: Wed Jan 25, 2012 12:54 pm
Subject: Re: bingung mengenai combo box di Ms.Access    krishna_h_aries
Offline
Send Email

sdh ada solusi beloom, ato cluenya de.. :D..

maklum, nwbie lg buntu.. ;)..

trims gan.. hehe

#33515    From: "Kuncara Arief" <kuncara.arief@yahoo.co.id>
Date: Wed Jan 25, 2012 6:56 pm
Subject: RE: bingung mengenai combo box di Ms.Access    kuncara.arief
Offline
Send Email

Dear Saudara Krishna,

Saya coba bantu ya.. mudah2an interpretasi saya terhadap permasalahan nya bener nih..

Intinya kan ketika Saudara akan bikin form inputan data pemeliharaan ketika akan mengisi Field lokasi A maka yang keluar hanya motor2 yg sudah didefinikan di tablenya..

Pertama2 seh bikin combobox untuk Field LOKASI dengan

Row Source type diisi Table

Row Source diisi SELECT ID, Lokasi From Lokasi

Column Count = 2

Column Width = 0cm;1cm

List Width = Auto

Kemudian dievent after update ketikan (dengan asumsi combobox untuk Field LOKASI sudah dibikin ya..)

Me.Lokasi.requery

Selanjutnya di combobox Lokasi

Row Source type diisi Table

Row Source diisi SELECT ID, Lokasi From Data Motor Where Lokasi = & Forms!NamaForm!Lokasi

Column Count = 2

Column Width = 0cm;1cm

List Width = Auto

Jika sudah demikian ketika Anda pilih lokasi event afterupdate akan berjalan dan akan me REFRESH isi combobox sesuai dengan lokasi nya..

Mudah ga ada yg terlewat ya.. oh iya pastikan field Lokasi di table Data Motor mempunyai tipe data yang sama, krn saya liat anda me-link dengan ID ditable Lokasi

Tentunya field nya harusnya Number ya.. J

Ok smoga sukses ya..

#33526    From: "Krishna" <krishna.rusli@gmail.com>
Date: Sat Jan 28, 2012 10:41 am
Subject: Re: bingung mengenai combo box di Ms.Access    krishna_h_aries
Offline
Send Email

wow..
thx gan ^_^

jd bisa ya

"Row Source diisi SELECT ID, Lokasi From Data Motor Where Lokasi = & Forms!NamaForm!Lokasi", yang keluar di form HAR(/form "cucu"nya), yg keluar NAMA MOTOR??
(gak ada select NAMA_MOTOR) lho.. :D..

apa karena pengaruh "Column Count = 2"??
sory nubi kali.. masih bingung soal query2an.. sifat2nya.. hehe.. *ada referensi ga, yg bs kubaca mengenai sifat2 query.. ^_^ *
(sambil kucoba dulu. hehe..)

well..
1 pertanyaan lagi.. ya ya ya?? :P
aku ada buat form "datasheet"(berbentuk table) dari sebuah table..
tujuan datasheet hanya untuk melihat list2 barang2 yg ada *editnya ku matikan* / read only..

ada 1 buah combobox, dr table tersebut, yg kuganti jadi textbox.. (toh HANYA untuk melihat saja..)
tp kok yg keluar di form datasheet tersebut ID nya ya, bukan NAMA nya??

trims sudah meladeni pertanyaan nubi kek gini..
hahaha..

On 2/23/2012 5:08 PM, Chubby Mike wrote:

Dear all,

bukannya saya ga mau cari, tapi saya bingung kategori apa yg mau saya search. sudah coba cari2 tapi ga ngerti2

begini
tabel A

Channel Product Nama
PL Prem Mick
CC Corp James
CC Prem Rob
PL Comm Jamie

jika dalam form saya taruh 3 combo box, bagaimana cara membuat memilih dari Channel dulu, kemudian combobox2 selanjutnya akan memilah2 data

contoh :
jika channel kita pilih PL, maka di product akan muncul Prem & Comm, jika kita pilih Prem, maka combobox Nama hanya muncul Mick.

maaf kalau berbelit2, baru belajar seminggu. thanks in advance

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (2)

Recent Activity:

New Members 12

Visit Your Group

SPAM IS PROHIBITED

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: [belajar-access] Form ATK [1 Attachment]

[Attachment(s) from Aksan Kurdin included below]

Maksudnya bagaimana ?

Aksan Kurdin

On 2/23/2012 4:13 PM, AN wrote:

mohon pencerahan, saya kesulitan pada form blangko yang kodenya tidak bisa combo. dengan bisa merubah angka langsung di form yaitu kolom BANYAK ITEM dan kolom SATUAN HARGA.

terimakasih atas bantuannya.

__._,_.___

Attachment(s) from Aksan Kurdin

1 of 1 Photo(s)

noname.JPG

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (2)

Recent Activity:

New Members 12

Visit Your Group

SPAM IS PROHIBITED

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

__,_._,___

Re: [belajar-access] menghitung umur [1 Attachment]

[Attachment(s) from Aksan Kurdin included below]

Ini ada fungsi yang saya ambil dari http://putravb.blogspot.com/2010/05/fungsi-hitung-umur.html:
Saya tambahkan penjelasan seperlunya

Public Function HitungUmur(ByVal TglLahir As Date) As String     Dim d As Integer, m As Integer, y As Integer      'Jika belum lahir, jangan dihitung     If TglLahir >= Now Then         HitungUmur = ""         Exit Function     End If      'cari selisih hari, selisih bulan, dan selisih tahun     d = Day(Now) - Day(TglLahir)     m = Month(Now) - Month(TglLahir)     y = Year(Now) - Year(TglLahir)      'fungsi sgn untuk mengecek hasil selisih negatif (-1), nol (0), atau positif (1)     If Sgn(d) = -1 Then         'jika negatif, maka berarti masih 30 - d hari lagi,         'satu bulan dianggap 30 hari         d = 30 - Abs(d)         m = m - 1     End If          If Sgn(m) = -1 Then         'jika negatif, maka berarti masih 12 - m bulan lagi         m = 12 - Abs(m)         y = y - 1     End If      HitungUmur = y & " Tahun, " & m & " Bulan, " & d & " Hari" End Function

Silakan jalankan dengan misalnya :

select nama, tglLahir, HitungUmur(tglLahir) as umur from table

Nah untuk kasus anda, manipulasi fungsi tersebut untuk menerima dua parameter tanggal (tanggal 1, dan tanggal 2):

Public Function HitungUmur2Tanggal(ByVal TglLahir1 As Date, ByVal TglLahir2 As Date) As String     Dim d As Integer, m As Integer, y As Integer      If TglLahir1 >= TglLahir2 Then         HitungUmur2Tanggal = ""         Exit Function     End If      d = Day(TglLahir2) - Day(TglLahir1)     m = Month(TglLahir2) - Month(TglLahir1)     y = Year(TglLahir2) - Year(TglLahir1)      If Sgn(d) = -1 Then         d = 30 - Abs(d)         m = m - 1     End If          If Sgn(m) = -1 Then         m = 12 - Abs(m)         y = y - 1     End If      HitungUmur2Tanggal = y & " Tahun, " & m & " Bulan, " & d & " Hari" End Function

berikut hasilnya dari immediate window:

Aksan Kurdin

On 2/21/2012 8:45 PM, nur kholis wrote:

assalamu'alaikum para master acces ...

saya sedang membuat database pemilih .... dan terkendala pada saat menghitung umur ...

pada saat tanggal 17-04-2112 pemilh harus berusia 17 tahun (paling muda lahir tgl 17-07-1995)

saya coba pake datediff ("yyyy";[tgllahir];#17-04-2112) kok munculnya pembulatan tahun

seharusnya klo lahirnya tanggal 18-04-1995 masih usia 16 kok keluarnya 17 tahun ... mohon bantuan para master acces ...

wassalamu'alaikum ....