[belajar-access] Re: Harga Paket

Silakan download [MasBuchori no29092.rar] di [Files] [jkssbma] [cobasolusi] [MasterDetail]

perubahan :
1. buat relasi tabel yang diperlukan
2. Buat Form wizard dengan menyertakan table2 ( column : [ID], [tanggal] ) dan table3 ( column : [Nama Pelayanan] dan [Biaya], maka akan muncul susunan form induk ( table2 ) dan anak ( table3)
3. buat Query untuk jenis paket (Table1 Query]
4. tambahkan comboKlasifikasi pada form induk dengan memanfaatkan wizard ( data dari [Table1 Query] )
5. buat koding event AfterUpdate untuk comboKlasifikasi, seperti petunjuk sebelumnya

****
** saya kutip agar lebih mudah dimengerti
*****

Private Sub ComboKlasifikasi_AfterUpdate()
>
> DoCmd.RunCommand acCmdRefreshPage
>
> DoCmd.SetWarnings False
>
> DoCmd.RunSQL "DELETE ID FROM Table3 WHERE ID=" & Me![ID] & ";"
>
> DoCmd.RunSQL "INSERT INTO Table3 ( ID, [Nama Pelayanan], Biaya ) " & _
>
> "SELECT " & Me![ID] & ", [Nama Pelayanan], Biaya " & _
>
> "FROM Table1 " & _
>
> "WHERE [Klasifikasi Pelayanan]='" & Me!Combo1 & "';"
>
> DoCmd.SetWarnings True
>
> Me.Table3_Subform.Requery
> End Sub
>

tambahan :
coba dimengerti lewat contoh [MasBuchori no29092.mdb] , sebelumnya di kopi dulu agar aman.

****************
Salam sejhatera

--- In belajar-access@yahoogroups.com, Sofyan Efendi <sofyanefendi@...> wrote:
>
> Mohon maaf ada yg terlupa, properties link master field dan link child field nya isi dengan ID .... supaya ketika buat record baru, subformnya jadi bersih (kosong) kembali... atau ketika berpindah record data pada subform sesuai dengan ID di header nya .....
>
>
>
>
>
> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> Sofyan Efendi.
> http://opi.110mb.com/
> ----- Original Message -----
> From: Sofyan Efendi
> To: belajar-access@yahoogroups.com
> Cc: bc.buchori@...
> Sent: Tuesday, November 02, 2010 2:51 PM
> Subject: Re: [belajar-access] Harga Paket [1 Attachment]
>
>
>
> [Attachment(s) from Sofyan Efendi included below]
>
>
> Ok Mas Buchori, mohon maaf bila kami terkesan lambat membalas, karena adanya kesibukan dll
>
> Table1 yg sudah mas buat kan sbb yah:
>
>
>
> Nama Pelayanan
> Klasifikasi Pelayanan
> Biaya
>
> Cuci biasa
> Paket 1
> 12.000
>
> cuci mesin
> Paket 1
> 50.000
>
> Cuci Kering Jok
> Paket 2
> 125.000
>
> Poles
> Paket 2
> 40.000
>
> wet look
> Paket 1
> 250.000
>
> paket 1
> Paket 1
> 300.000
>
>
>
>
> lalu Mas tinggal buat table2 dan table3 untuk transaksinya...
>
> nanti coba buat suatu form dan subformnya yg bisa otomatis input data ketika suatu paket dipilih....
>
>
>
>
>
>
>
> Mas tinggal buat event after update di klasifikasi pelayanan:
>
>
>
> Private Sub Combo1_AfterUpdate()
>
> DoCmd.RunCommand acCmdRefreshPage
>
> DoCmd.SetWarnings False
>
> DoCmd.RunSQL "DELETE ID FROM Table3 WHERE ID=" & Me![ID] & ";"
>
> DoCmd.RunSQL "INSERT INTO Table3 ( ID, [Nama Pelayanan], Biaya ) " & _
>
> "SELECT " & Me![ID] & ", [Nama Pelayanan], Biaya " & _
>
> "FROM Table1 " & _
>
> "WHERE [Klasifikasi Pelayanan]='" & Me!Combo1 & "';"
>
> DoCmd.SetWarnings True
>
> Sheet1.Requery
>
> End Sub
>
>
>
> untuk lengkapnya Mas Buchori silahkan download file yg sdh saya buat
>
> coba dicheck saja ya mas, mudah2an sudah sesuai dengan yg diinginkan...
>
>
>
> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> Sofyan Efendi.
> http://opi.110mb.com/
>
>
> ----- Original Message -----
> From: bc.buchori
> To: belajar-access@yahoogroups.com
> Sent: Tuesday, November 02, 2010 1:28 PM
> Subject: [belajar-access] Harga Paket
>
>
>
> Hallo Semua abang'' ku.
> ada yang bisa bantu aku masalah harga paket yang kemaren.
> trimakasih buat perhatiannya.
>
> Regard Buchori,
>

------------------------------------

SPAM IS PROHIBITEDYahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/belajar-access/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)

<*> To change settings via email:
belajar-access-digest@yahoogroups.com
belajar-access-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
belajar-access-unsubscribe@yahoogroups.com

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/