Makasih atas petunjuknya .. Cara pakainya gmn pa? saya masih awam banget.. Maaf kalo pertanyaan kekanak-kanakan, Thx
2009/1/9 Haer Talib <[email protected]> > 1. tentu bisa. > caranya, bikin koneksi database dengan VBA. > > *DAO example - JET Connection* > > Dim ws as Workspace > Dim db as Database > > Set ws=DBEngine.Workspaces(0) > set db=ws.OpenDatabase({databasepath and name}) > > *DAO example - ODBC Connection* > > Dim ws as Workspace > dim db as database > dim strConnection as string > > set ws=DBEngine.Workspaces(0) > let strConnection= "ODBC;DSN=" & DatabaseName & ";UID=" & UserName > > & ";PWD=" & UserPassword > set db=ws.OpenDatabase("", False, False, strConnection) > > *ADO Example* > > Dim ad as ADODB.Connection > > set ad=New ADODB.Connection > Let ad.ConnectionString= "ODBC;DSN=" & DatabaseName & ";UID=" & > UserName & ";PWD=" & UserPassword > > ad.Open > > > Haer Talib > > > > > 2009/1/9 Teguh JAP <[email protected]> > > Salam Sejahtera semuanya, >> >> Perkenalkan, saya *Teguh JAP 24 Thn*. >> Bekerja sebagai ADM Gudang diperusahaan Distributor Farmasi. Merangkap >> sebagai IT juga. >> Sebelumnya saya sudah terdaftar di milis ini dgn email: * >> [email protected]* dan YM ID :* nduh_jap* >> Tapi karena sesuatu hal Yahoo membekukan email & YM saya. >> Email saya sekarang adalah : *[email protected] *dan ID YM : *teguhjap84*. >> >> Sudi kiranya teman-teman semua meng-ADD email dan YM saya. >> >> Langsung ke pertanyaan : >> >> Saya membuat Aplikasi mis dgn nama *Program.mde >> *Dan membuat database mis dgn nama *DB_2008.mdb* dan *DB_2009.mdb >> * >> Saya ingin agar Program.mde bisa *memilih database dengan bebas & >> fleksible* >> Misal saya ingin melihat data di tahun *2008*, maka Program.mde akan link >> tabel dari *DB_2008.mdb >> *Ketika saya ingin proses di thn *2009*, maka Program.mde akan link tabel >> dari *DB_2009.mdb >> *Begitu seterusnya untuk tahun 2010 keatas.. >> >> 1. Apakah Access bisa seperti itu ? bagaimana caranya ? >> 2. Jika tidak bisa, apakah ada cara lain ? mis dgn MySQL ato SQLServer ? >> >> Mohon bantuannya.. >> >> Terima Kasih >> >> *Teguh JAP >> 081 804 6364 96 / 081 802 3030 19* >> > > > > -- > [Haer Talib] > MVP Office Access > Meet me at www.RumahAccess.com > > => > > >
