/* */

Wednesday, December 23, 2009

[belajar-access] Re: Bagaimana menghilangkan warna putih pada Treeview

----- Original Message -----
From: "Heru Wibowo" <heru.wibowo456@yahoo.co.id>
To: <belajar-access@yahoogroups.com>
Cc: <harry.siswanto@gmail.com>
Sent: Wednesday, December 23, 2009 10:01 PM
Subject: RE: [belajar-access] Re: Bagaimana menghilangkan warna putih pada
Treeview


> Pak exz@ant....saya tidak begitu familiar dengan bahasa pemrograman atau
> apalah namanya...namun saya pernah lihat di web
>
http://www.tutcity.com/tutorial/access-tree-view-and-list-box-row-source.174
> 92.html
>
>
>
> Mungkin akan dapat memberikan gambaran2 solusi mengenai kendala yang
> dihadapi pak Exant...sory cuman bisa ngebantu ini.
>
>
>
> Heru Wibowo
>
>

Tuesday, December 22, 2009

[belajar-access] Gmn caranya membuat Ribbon Menu ?

----- Original Message -----
From: "exz@nt" <exzantmilis@gmail.com>
To: "belajar-access" <belajar-access@yahoogroups.com>
Sent: Tuesday, December 22, 2009 11:45 AM
Subject: [belajar-access] Gmn caranya membuat Ribbon Menu ?


> Dear All,
>
> Mohon solusinya.
> Gimana caranya membuat Ribbon Menu sesuai file terlampir ?
> termasuk objek lain spt combo, checkbox, image, dll
> contoh pada http://www.accessribbon.de/en/index.php?Downloads
> sdh sy utak-atik, tp belum ketemu solusinya.
> Terima kasih.
>
> salam,
> exz@nt
>

[belajar-access] relationship

----- Original Message -----
From: "Aksan Kurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, December 22, 2009 4:25 PM
Subject: Re: [belajar-access] relationship


> Ruchi,
> yang anda butuhkan adalah relasi many-to-many.
> Relasi ini selalu diwakili oleh tabel perantara.
> Perhatikan relasi berikut, yang saya normal-kan dari tabel yang anda
> berikan.
> tblkartualat merupakan relasi many-to-many dari tblAlat dan transaksi
> peminjaman
> tblKartuMekanik juga sama, penghubung many-to-many dari tabel mekanik
> dan tabel transaksi peminjaman
> interface yang anda buat nantinya adalah master detail, dengan master
> adalah tblPeminjaman, dan detail ada dua subform, yaitu tblKartuAlat dan
> tblKartuMekanik.
>
> Bisa kan ?
> dan yang lebih penting, saya tidak salah kan menangkap maksud anda, ruchi
?
>
> aksan kurdin
>
>
>
>
>
>
> Ruchi Msaccess wrote:
> >
> > Saya ada 2 tabel berikut
> >
> > tblalat tblpeminjaman
> > ________ _______________
> >
> > idtalat No Kartu Peminjaman
> > Nama alat Nama Peminjam
> > no seri Tgl Pinjam
> > sertifikat Tgl Kembali
> > ID Barang
> > nama barang
> > kode proyek
> >
> > saya ingin menghubungkan 2 tabel tersebut dengan ketentuan, tblalat
> > dapat dipinjam oleh beberapa nama dan satu nama bisa meminjam beberapa
> > alat
> >
> > Mohon bantuan senior-senior semua
> > thank's
> >
> >
>
>


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


> Ruchi,
> yang anda butuhkan adalah relasi many-to-many.
> Relasi ini selalu diwakili oleh tabel perantara.
> Perhatikan relasi berikut, yang saya normal-kan dari tabel yang anda
berikan.
> tblkartualat merupakan relasi many-to-many dari tblAlat dan transaksi
peminjaman
> tblKartuMekanik juga sama, penghubung many-to-many dari tabel mekanik dan
tabel transaksi peminjaman
> interface yang anda buat nantinya adalah master detail, dengan master
adalah tblPeminjaman, dan detail ada dua subform, yaitu tblKartuAlat dan
tblKartuMekanik.
>
> Bisa kan ?
> dan yang lebih penting, saya tidak salah kan menangkap maksud anda, ruchi
?
>
> aksan kurdin
>
>
>
>
>
>
> Ruchi Msaccess wrote:
>
> Saya ada 2 tabel berikut
>
> tblalat tblpeminjaman
> ________ _______________
>
> idtalat No Kartu Peminjaman
> Nama alat Nama Peminjam
> no seri Tgl Pinjam
> sertifikat Tgl Kembali
> ID Barang
> nama barang
> kode proyek
>
> saya ingin menghubungkan 2 tabel tersebut dengan ketentuan, tblalat
dapat dipinjam oleh beberapa nama dan satu nama bisa meminjam beberapa alat
>
> Mohon bantuan senior-senior semua
> thank's
>
>
>
>

[belajar-access] Re: membuang dan menambah sebagian kata

----- Original Message -----
From: "Aksan Kurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, December 22, 2009 3:58 PM
Subject: Re: [belajar-access] Re: membuang dan menambah sebagian kata


> P. Anang,
> Database anda belum bisa disebut sebagai database, karena kaidah rdbms
> sama sekali tidak dipenuhi.
> Saya sertakan contoh sederhana modifikasi dari mdb anda, hanya sebagai
> contoh lo P. Anang, bukan solusi total.
>
> tabel nama, nip, jabatan, pangkat, gol, saya gabungkan dalam satu tabel
> master karyawan M_Karyawan
> tabel SPT saya normal-kan menjadi bentuk master/detail -> T_SPTH dan
T_SPTD
>
> dengan desain seperti ini, lebih memudahkan anda untuk mencetak laporan
> SPT untuk berapa pun karyawan yang ditunjuk hanya dengan satu report
> saja (rpt_SPTH). Mainnya ada di subreport rpt_SPTD_sub.
> Untuk interface pembuatan reportnya saya contohkan di form frm_SPTH, ada
> satu tombol print report untuk cetak SPT yang sedang di edit.
>
> Rekan-rekan yang punya waktu dan memahami apa yang saya buatkan untuk P.
> anang, jika ada yang berminat menjelaskan cara kerjanya, monggo ....
> silakan nulis yang panjang-panjang ... :)
>
>
> Silakan dikembangkan kembali ide awal ini.
>
> Aksan Kurdin

[belajar-access] Connection string

 
----- Original Message -----
Sent: Tuesday, December 22, 2009 9:16 AM
Subject: Re: [belajar-access] Connection string

coba cek ke sini
http://www.sqlstrings.com/SQL-Server-connection-strings.htm
utk menentukan nama server & database bs pake combobox
smg membantu.

salam,
exz@nt



On Mon, Dec 21, 2009 at 10:43 AM, <setiawan_ishak@yahoo.com> wrote:

> Dear all,
>
> Minta petunjuk kepada semua pakar dan rekan2,
> Bagaimana program connection string ke sql server, tujuannya agar saat
> login user diarahkan ke database yg dituju.
> Ini jd pemikiran, karena database dan program sama, tp persh saya memiliki
> bbrp usaha distribusi yg di bagi menjadi bbrp nama usaha dengan prod msg2
> berbeda
>
> Mohon pencerahannya,
>
> Salam
> Sent from my BlackBerry®
> powered by Sinyal Kuat INDOSAT
>

[belajar-access] Kalkulator

----- Original Message -----
From: "Roland" <roland@alkitab.or.id>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, December 22, 2009 10:24 AM
Subject: Re: [belajar-access] Kalkulator


Terima kasih Pak Aksan, suatu pengalaman baru bagi saya pemula ini dalam
membaca listing vba bapak. Saya sendiri coba2 tuk buat kalkulator, tapi
tidak kelar2 :D

Buat teman2 milis, saya coba susun kembali proses pembuatan kalkulator ini.
Jika ada yang salah mohon dikoreksi.

Pembangunan form :
1. Buat form seperti yang ada dicontoh, untuk nama setiap kontrol (tombol,
label) bebas diberi nama apa saja.
2. Buat event yang dapat menangkap tombol apa saja yang ditekan. Khusus
kalkulator, maka karakter yang dipakai hanya angka (1 s/d 9); simbol
operator (+,-,*,/); tanda titik (.) dan reset atas penghitungan terakhir.

Private Sub Form_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57: Call Angka(KeyAscii - 48)
Case 43: Call Calculate("+")
Case 45: Call Calculate("-")
Case 42: Call Calculate("*")
Case 47: Call Calculate("/")
Case 46: Call Period
Case 27: Call ClearDisplay
End Select

Monday, December 21, 2009

[belajar-access] Cara Koneksi Ms Access ke Oracle

----- Original Message -----
From: "exz@nt" <exzantmilis@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Monday, December 21, 2009 8:49 AM
Subject: Re: [belajar-access] Cara Koneksi Ms Access ke Oracle


ato yg ini
http://www.microsoft.com/downloads/details.aspx?FamilyID=6ccd8427-1017-4f33-a062-d165078e32b1&displaylang=en

On Thu, Dec 17, 2009 at 1:32 PM, Ivan Leonardo <ivan@pttdp.com> wrote:

>
>
> Masuk ke website Oracle terus download driver ODBCnya
>

[belajar-access] Bikin Setup

----- Original Message -----
From: "Aksan Kurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Monday, December 21, 2009 11:50 AM
Subject: Re: [belajar-access] Bikit Setup


> Untuk versi access, anda bisa gunakan tool dari access bernama access
> developer extensions.
> yang versi 2003 beli, yang 2007 free, bisa download dari
> www.microsoft.com/downloads,
>
> aksan kurdin
>
>
> erna yanti wrote:
> >
> > salam,
> > para suhu, gimana cara bikin setup database...jadi custumer bisa
install..
> >
> > thx
> >
> >
>
>

[belajar-access] Kalkulator

----- Original Message -----
From: "Aksan Kurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Monday, December 21, 2009 10:36 AM
Subject: Re: [belajar-access] Kalkulator


> senang sekali kalau ada yang punya semangat seperti mas zackie / bambang
> mahfudin ini ....
> berikut saya sertakan utak-atik kalkulator punya zackie/bambang
> mahfudin, dengan modifikasi pada penggunaan fungsinya. setiap tombol
> saya kaitkan langsung dengan nama fungsi pada event procedure on
> clicknya. Mungkin ada beberapa operasi yang keliru, tetapi so far saya
> coba belum menemukannya. Ntar tinggal mas zackie/bambang mahfudin yang
> utak-atik lagi sendiri, kali mau nambahin tombol memory, atau bahkan
> converter sistem bilangan hexa/decimal/binary ...etc.
>
>
> aksan kurdin
>
>
>
> zackie wrote:
> >
> >
> > Kakak Senior.....
> > Saya baru2 aja belajar VBA access 2003 belum banyak fungsi2 yg saya tahu
> > juga pahami. Saya coba bikin kalkulator sederhana dengan alur logika
saya
> > sendiri.
> >
> > Mohon dikoreksi atau "klu / contoh" fungsi2 apa yg seharusnya saya
> > pakai selain :
> > IF....THEN
> > CASE.....SELECT
> > VARIABLE
> >
> > Maaf kalo "Repost" belum buka2 arsip terdahulu
> >
> > Terima kasih sebelumnya.
> >
> > Bambang Mahfudin
> >
>
>

Thursday, December 17, 2009

[belajar-access] Cara Koneksi Ms Access ke Oracle

----- Original Message -----
From: "Ivan Leonardo" <ivan@pttdp.com>
To: <belajar-access@yahoogroups.com>
Sent: Thursday, December 17, 2009 1:32 PM
Subject: Re: [belajar-access] Cara Koneksi Ms Access ke Oracle


> Masuk ke website Oracle terus download driver ODBCnya
>
> --------------------------------------------------------------------------

[belajar-access] Resize Form

----- Original Message -----
From: "exz@nt" <exzantmilis@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Thursday, December 17, 2009 9:00 AM
Subject: Re: [belajar-access] Resize Form


> Sy mo coba sedikit 'memaksakan' solusi :D
> bukan formnya yg dimodif, tetapi resolusi Monitornya
> misal :
> aplikasi yg dibuat idealnya di pake pada resolusi 800x600, tetapi
> resolusi pada komputer user menggunakan resolusi 1280x800
> maka pada saat Load Form, panggil dulu fungsi untuk mengetahui
> resolusi saat Load, misal resolusinya 1280x800
> Width = GetScrResW() 'hasilnya 1280
> Height = GetScrResH() 'hasilnya 800
> kemudian panggil fungsi untuk merubah resolusi menjadi 800x600 (sesuai
> kondisi idealnya)
> ChRes 800,600
> nanti ketika Unload Form, resolusi dibalikin lagi jd 1280x800 (kondisi
> awal pada saat Load Form)
> ChRes Width,Height
>
> module-nya sbb :
> --------------------------------------------------------------------------
----------------------------------------------------------------------------
---------------
> Option Compare Database
> Option Explicit
>
> Type RECT
> x1 As Long
> y1 As Long
> x2 As Long
> y2 As Long
> End Type
>

Monday, December 14, 2009

Re: [belajar-access] Delete Copy and Paste File




OK mas Aksan, nanti saya buat dulu.

regards,



Aksan Kurdin <aksan.kurdin@gmail.com>
Sent by: belajar-access@yahoogroups.com

04/22/2011 09:30 AM
Please respond to belajar-access

       
        To:        belajar-access@yahoogroups.com
        cc:        
        Subject:        Re: [belajar-access] Delete Copy and Paste File



 

paste = copy + delete

jadi fungsi yang anda butuhkan adalah :
filecopy (source, destination)

dan
kill (source)

untuk menentukan destination bisa gunakan windows dialog, atau office dialog.
bisa ?

coba sekarang giliran tio yang posting hasil kerjanya kesini untuk share sama-sama.
kalau masih bingung, tanya lagi di mana bingung-nya, entar kita kasih cekelan-nya ... :)

aksan kurdin

ps.
hati-hati dengan fungsi kill, tidak bisa restore lagi file yang di kill, tidak ada di recycle bin.

On 4/21/2011 1:38 PM,
tio.adjie@ptssb.co.id wrote:
 


Salam Access,


Selamat siang teman-teman.


Mohon bantuannya, adakah diantara teman-teman yang punya coding untuk mendelete , copy dan mempaste (memindahkan) file , seperti File Excel dengan lokasi yang ditentukan user ?


Terima kasih semoga Allah membalas kebaikan teman-teman.


Salam.





__._,_.___


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

__,_._,___

Wednesday, December 9, 2009

[belajar-access] Re: Action Query Confirmation in AccessRuntime

----- Original Message -----
From: "dayat" <dayat@postgresql-id.org>
To: <belajar-access@yahoogroups.com>
Sent: Wednesday, December 09, 2009 9:51 AM
Subject: [belajar-access] Re: Action Query Confirmation in AccessRuntime


> Sori udah ketemu jawabannya, ternyata ada disini
> http://support.microsoft.com/kb/229802 :D hehe
>
> Hidayat
>
> 2009/12/9 dayat <dayat@postgresql-id.org>
>
> > Rekan-rekan Access mania,
> >
> > Setiap melakukan update data melalui DoCmd.RunSQL selalu keluar pesan
> > konfirmasi. Jadinya saya coba hilangkan konfirmasi ini dengan unchecked
pada
> > Access Option, Confirm, Action Query. Nah saat aplikasi siap dan
dideploy ke
> > client menggunakan paket instalasi bersama AccessRuntime, pesan
konfirmasi
> > ini kembali muncul pada komputer client. Pertanyaannya bagaimana caranya
> > untuk menghilangkan pesan konfirmasi ini pada aplikasi AccessRuntime.
> >
> > Trimakasih atas bantuannya
> > Hidayat
> >
>

[belajar-access] Event waktu Print

----- Original Message -----
From: "Ivan Leonardo" <ivan@pttdp.com>
To: <belajar-access@yahoogroups.com>
Sent: Wednesday, December 09, 2009 9:43 AM
Subject: Re: [belajar-access] Event waktu Print


> exz@nt wrote:
> >
> >
> > kalo dibuat 2 button gmn ?
> > button Preview & Print
> > flag cm ditaruh di button Print sj..
> >
> >
> Thanks utk idenya, sy dapat jawaban dari forum luar mungkin bermanfaat
>
> On a report already open in print preview mode, you wish to log the
> print action only if the user has actually gone ahead with final OK in
> print dialog box. If at any stage, the user cancels the print dialog
> box, there should be no activation of print logging routine.
>
> Considering the fact that report header's print event fires afresh for
> each new print-out, your objective can be met by monitoring the print
> event for report header from the second occurrence onwards.
>
> Let F_Report be the name of calling form. Place an unbound text box
> named TxtPreview on this form. Code in click event of command button
> named CmdReport would be as follows:
>
> ' Code in form's module
> '===========
> =======================
> Private Sub CmdReport_Click()
> Me.TxtPreview = Null
> DoCmd.OpenReport "<<NameOfMyReport>>", _
> acViewPreview, , "MyCriteria"
> DoCmd.Maximize
> DoCmd.RunCommand acCmdZoom100
> End Sub
> '==================================
>
> The code in print event of report header section would be as follows:
>
> ' Code in report's module
> '==================================
> Private Sub ReportHeader_Print(Cancel As Integer, _
> PrintCount As Integer)
> With Forms("F_Report")
> If !TxtPreview = "Y" Then
> CurrentDb.Execute "<<SQL_ForActionQuery>>", _
> dbFailOnError
> Else
> !TxtPreview = "Y"
> End If
> End With
> End Sub
> '==================================

Saturday, December 5, 2009

[belajar-access] mode cetak langsung ke line printer

----- Original Message -----
From: <budilaks@yahoo.com>
To: <belajar-access@yahoogroups.com>
Sent: Saturday, December 05, 2009 7:47 AM
Subject: Re: [belajar-access] mode cetak langsung ke line printer


hallo, mau jawab ah.
kalo print langsung ke printer, tanpa melalui driver di windows.
maka perhatikan/baca buku dari printer itu.
bagaimana mengirimkan perintah perintah Condensed, font size, dll.dengan
menggunakan character string yang sesuai di buku manual printer tsb.
bila langsung langsung aja, yaa sesuai setting di printer.
atau, printer nya di pencet mode condensed, misalkan.
saya belum sempat bermain dengan perintah tsb, jadi gak bisa kasih contoh
nya.
lakukan test dari command prompt windows anda, lalu mulai ketik perintah
perintah spt yang ada di module anda satu persatu.kemudian kombinasikan
perintah perintah font dll.
cheers,budilaks

Tuesday, December 1, 2009

[belajar-access] Re: Option Group (radio button) - menangkap bilainya?

----- Original Message -----
From: "aksankurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, December 01, 2009 10:50 AM
Subject: [belajar-access] Re: Option Group (radio button) - menangkap
bilainya?


@mbak sri,
sebenarnya apa yang anda lakukan ?
jika pertanyaan anda mengenai option group, maka bentuk kontrolnya berupa
sebuah frame dengan beberapa option button di dalamnya.

+--Nama Group-----------+
| |
| ( ) Option 1 |
| |
| ( ) Option 2 |
| |
+-----------------------+

Misalkan nama framenya adalah fraJenisPerawatan, nilai option value setiap
option button adalah berturut-turut 1 dan 2 (default), maka seharusnya kode
anda seperti:

select case fraJenisPerawatan
case 1: rst![jenis_perawata n] = "PM"
case 2: rst![jenis_perawata n] = "PB"
case else: rst![jenis_perawata n] = ""
end select

Jadi bukan nge-trap kode di setiap option button, tetapi cukup dari
frame-nya saja.
pergunakan event frame_on_klik.


aksan kurdin

[belajar-access] Re: tanya update stok barang

----- Original Message -----
From: "aksankurdin" <aksan.kurdin@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Tuesday, December 01, 2009 11:06 AM
Subject: [belajar-access] Re: tanya update stok barang


> penyelesaian sederhana bisa anda lakukan melalui catch event before update
dari form isian detail penjualan barang. anda bisa mengecek saldo dari tabel
master barang untuk menentukan boleh tidaknya lanjut isi penjualan.
>
>
> sub formanu_beforeupdate(cancel as integer)
> dim dummy as integer
> dummy = nz(dlookup("saldo","tabelbarang","kodebarang='" &
me.txtKodeBarang & "'"),0)
> if dummy < me.txtQuantity then
> msgbox "Barang tidak cukup"
> cancel = -1
> endif
> end sub
>
> sub formanu_afterupdate
> docmd.runsql "UPDATE tabelbarang SET saldo = saldo - " &
me.txtQuantity & " WHERE kodebarang = '" & me.txtKodeBarang & "'"
> end sub
>