Senin, 23 Mei 2011

Fw: Re: [belajar-access] Re: Tanya Lagi Soal Looping [1 Attachment]

 
[Attachment(s) from Sumiyanto - included below]

Pada email sebelumnya sudah saya sertakan pula file attachmentnya, tetapi jika belum menerima, ini saya kirimkan sekali lagi. bapak bisa mempelajarinya.

Thank you | Terima Kasih | Matur Suksema

Sumiyanto

--- On Sat, 5/21/11, Sumiyanto - <sumiyanto@yahoo.com> wrote:

From: Sumiyanto - <sumiyanto@yahoo.com>
Subject: Re: [belajar-access] Re: Tanya Lagi Soal Looping
To: belajar-access@yahoogroups.com
Date: Saturday, May 21, 2011, 10:06 PM

Dear Pak Bozz Hermawan,

1. jika bapak menginginkan demikian maka buat event AfterUpdate pada Form Pinjaman di textbox NoAnggota, setting default valuenya =0
Private Sub NoAnggota_AfterUpdate()
On Error Resume Next
Me.PinjamanKe = DMax("PinjamanKe", "Pinjaman", "NoAnggota=" & Forms!F_Pinjaman!NoAnggota & "") + 1
End Sub

2. kalau hanya field tertentu yang dinginkan sedikit di revisi sbb:
strSQL = "INSERT Into PinjamanSub (NoPinjam,AngsuranKe,TglJatuhTempo)" _
                & "VALUES ('" & NoPinjaman & "'," & PinjamanKe & ",#" & StrTglJatuhTempo & "#)"

Semoga tetap bersemangat..

Thank you | Terima Kasih | Matur Suksema

Sumiyanto

--- On Fri, 5/20/11, Bozz <hermawan_b29@yahoo.com.au> wrote:

From: Bozz <hermawan_b29@yahoo.com.au>
Subject: [belajar-access] Re: Tanya Lagi Soal Looping
To: belajar-access@yahoogroups.com
Date: Friday, May 20, 2011, 6:59 PM

 

Great..Makasi Pak Yanto.
Ada hal yg saya tanyakan lagi:
1. Tp kok PinjamanKe nya tdk berubah ya pak klo atas nama orang yang sama. harunya kan 1, 2, 3 gitu..
2. utk angs detail subform, harusnya tgl bayar di set di tgl hari ini pak (saya pake =date() ) trus angs pokok, jasa, denda di isi manual. hanya jumlahnya bisa di buat otomatis terisi.

jdi yg trisi cuma Angs ke, Jatuh Tempo, saja pak.

VB ini mana yg harus saya hapus?

strSQL = "INSERT Into PinjamanSub (NoPinjam,AngsuranKe,TglJatuhTempo,TglBayar,AngPokok, AngJasa, Denda,NoKary ) " _
& "VALUES ('" & NoPinjaman & "'," & PinjamanKe & ",#" & Tgl_JatuhTempo & "#, #" & Tgl_JatuhTempo & "#," & FormatNumberEn(AngsPokok) _
& "," & FormatNumberEn(AngsBunga) & ",'" & 0 & "','" & NoKaryawan & "')"

Maaf merepotkan, krn mmg bener2 udh mentok utak utiknya..

Hatur Nuhun.

--- In belajar-access@yahoogroups.com, Sumiyanto - <sumiyanto@...> wrote:
>
> Dear Mas Hermawan,
>
> Bagus pak yang penting semangat belajar terus, lama-lama juga akan jadi mahir. Sedikit revisi untuk table PinjamanSub: pada field jumlah sebaiknya di buat rumus di Query:
> Q_PinjamanSub:
> Jumlah: Format(nz([AngPokok]+[AngJasa]+[Denda]),"Currency")
>
> Query ini yang di jadikan sumber data untuk subform PinjamanSub.
>
> Thank you | Terima Kasih | Matur Suksema
>
>
>
> Sumiyanto
>
>
> --- On Thu, 5/19/11, hermawan <hermawan_b29@...> wrote:
>
> From: hermawan <hermawan_b29@...>
> Subject: [belajar-access] RE: Re: Tanya Lagi Soal Looping [1 Attachment]
> To: "'hermawan'" <hermawan_b29@...>, sumiyanto@..., belajar-access@yahoogroups.com
> Date: Thursday, May 19, 2011, 6:53 PM
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>  
>
>
>
>
>
>
>
>
>
> [Attachment(s) from hermawan included below]
>
>
>
>
>
>
>
>
>
>
> Ini pak Looping yg sdg saya
> buat…
>
> Memang  masih
> acak-acakan. Krn masih newbi jd seadanya dulu..
>
> Krn masi belajar, saya
> makainya yg simple2 aja..
>
> Abis blum tau VB c..
>
>  
>
> Mohon di bantu Pak..…
>
> Kemaren smpet nyerah, krn gak
> dapt ilmu, tp semenjak Pak Sumiyanto bantu, jadi tambah giat blajar..
>
>  
>
> Thx
>
>  
>
>  
>
> --- In
> belajar-access@yahoogroups.com, Sumiyanto - <sumiyanto@> wrote:
>
>  
>
>  Gambar saja tidak cukup
> untuk melakukan perbaikan, karena property name, column, kita disini tidak
> mengetahuinya, silahkan di attachment yang versi telah dibuat, agar bisa
> dilakukan perbaikan. datanya dummy (dikosongin) saja. jangan lupa di zip/rar.
>
>  
>
>  Thank you | Terima
> Kasih | Matur Suksema
>
>  
>
>
>
>
>
> From: hermawan
> [mailto:hermawan_b29@...]
>
> Sent: Wednesday, May 18, 2011 4:00 PM
>
> To: 'sumiyanto@...'; 'belajar-access@yahoogroups.com'
>
> Subject: Re: Tanya Lagi Soal Looping
>
>
>
>
>
>  
>
> Ini saya sdh jadi form nya tuh pak..
>
> Nah di form sdh saya buat sperti ini.
>
> Jd klo harus merubah kok kayaknya hrs dari awal
>
>  
>
> Klo misalkan combo boxnya sperti ini gimana pak? Udh coba
> utak-utik kok gagal ya..
>
> Salahnya dimana ya pak?
>
>  
>
>
>
>  
>
> Atau ada yg perlu di ubah?
>
> Maaf pak, saya bener2 pengen blajar…
>
>  
>
> Thanks..
>
>  
>
>  
>
> --- In belajar-access@yahoogroups.com,
> "sumiyanto surabaya" <sumiyanto@>
> wrote:
>
> >  
>
> > Dear Pak Bozz,
>
> > Apapun model pengennya, belajar-access@yahoogroups.com 
> selalu punya
>
> > solusinya,
>
> >
>
> >     * buat tblPilihan
>
> >     *
>
> >     * tabel ini yang akan digunakan
> untuk rowsource combobox
>
> >     *
>
> >     * pada property sheet, textbox
> name : pilihan
>
> >
>
> >     * (catatan yang option button
> name : pilihan sebelumnya di hapus,
>
> > agar tidak double, penamaan pilihan ini dan agar tidak
> merubah code pada
>
> > event on click schedule, yang telah kita buat
> sebelumnya)
>
> >     * column count : 2, column widths:
> 0cm;3cm (catatan kenapa nol cm,
>
> > yang satunya 3 cm, ini dimaksudkan agar tidak tampak
> terlihat ID: 1,2,3
>
> > sehingga yang terlihat hanya : Mingguan, Bulanan,
> Musiman pada saat
>
> > pilihan combobox dilakukan)
>
> >
>
> >     *
>
> >     * kemudian jalankan button
> schedule.
>
> > Regards,
>
> > Sumiyanto
>
> >
>
> >
>
> > --- In belajar-access@yahoogroups.com,
> "Bozz" <hermawan_b29@> wrote:
>
> > >
>
> > > Makasi pak sebelumnya... bener2 dapat ilmu baru
> neyh..
>
> > > Mau tanya lagi pak?
>
> > > klo misalkan Option pilihan tersebut diganti
> dengan combo box apakah
>
> > sama code nya pak?
>
> > >
>
> > > krn pengennya pake combo box. list combo box sama,
> mingguan, bulanan,
>
> > dan musiman.
>
> > >
>
> > >
>
> > > --- In belajar-access@yahoogroups.com,
> "sumiyanto surabaya" sumiyanto@
>
> > wrote:
>
> > >
>
> >  
>

__._,_.___

Attachment(s) from Sumiyanto -

1 of 1 File(s)

Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar