[belajar-access] Access Project 2007 & SQL Server 2005

----- Original Message -----
From: "Mulyawan, Ayi Teguh" <mulyawan.tea@gmail.com>
To: <belajar-access@yahoogroups.com>
Sent: Sunday, June 06, 2010 11:48 PM
Subject: RE: [belajar-access] Access Project 2007 & SQL Server 2005

> Alhamdulillah.akhirnya permasalahan saya sudah terselesaikan berkat
bantuan sang master pak Edy,
>
> Sekedar share mungkin ini bisa jadi ide buat rekan-rekan yang sedang
> membangun access dengan database yg ada di SQLServer.
>
> Terutama Mba Asri ini bisa jadi untuk inputan.
>
>
>
> Disini saya memakai Access2007 dan SQL2005, Semua database terletak di SQL
> server jadi access berperan sebagai frontend saja dengan harapan kinerja
nya
> tetap maximal.
>
>
>
> Dengan asumsi database & view alias query sudah ada di sql server dan
access
> sudah konek lewat ODBC tinggal buat prosedur sama formnya:
>
> 1. Buat procedure seperti ini:
>
> CREATE PROCEDURE [dbo].[NamaProsedure]
>
> @DevID char(20),@DATE VarChar(50) /*Maaf disini Date saya pakai VarChar */
>
> AS
>
> SELECT
> dbo.Tabel1.Time,
> dbo.Tabel1.U12,
> dbo.Tabel1.U23,
> dbo.Tabel1.U31
> FROM dbo.Tabel1

> WHERE dbo.Tabel1.DevID=@DevID AND <mailto:dbo.Tabel1.Date=@DATE>
> dbo.Tabel1.Date=@DATE
>
>
>
> 2. Buat sebuah form yang sumber datanya dari table atau dari view,
> bisa dengan form wizard kemudian simpan dengan nama subform1
>
> 3. Buat main Form untuk data selection yang berisikan dua buah
> combobox yaitu DevID(cboDevID) dan Date(cboDate) , subform yang source
> datanya dari subform1 kemudian sebuah button dengan event on click di isi
> sebagai berikut :
>
>
>
> Private Sub Command0_Click()
>
> Dim strSQL As String
>
> strSQL = "exec NamaProsedure '" & Forms!Form1!cboDevID & "','" &
> Forms!Form1!cboDate & "'"
>
> With Me. Subform1.Form
> .RecordSource = strSQL
> .Requery
> End With
>
> End Sub
>
>
>
> Mudah mudahan penjelasan saya diatas bias membantu rekan-rekan yang
> sama-sama sedang belajar access dengan database di SQLServer.
>
> Kalau masih ada yang salah mohon dikoreksi.
>
> Terimakasih atas support nya terutama untuk Pak Edy.
>
>
>
> Thank you & Best Regards,
>
> - ATM -
>
>
>
> From: belajar-access@yahoogroups.com
[mailto:belajar-access@yahoogroups.com]
> On Behalf Of MBA
> Sent: Sunday, June 06, 2010 20:16
> To: belajar-access@yahoogroups.com
> Subject: RE: [belajar-access] Access Project 2007 & SQL Server 2005
>
>
>
>
>
> Penjelasan di bawah adalah dengan asumsi pak Mulyawan membuat link table
ke
> sql server.
>
> Tapi kelihatannya salah ya.
>
> Berarti anda menggunakan format ADP (access data project).
>
>
>
> Kalau format anda ADP sih, mestinya lebih enak karena langsung bisa
> dituliskan sbb:
>
> Misalnya:
>
>
>
> dim strSQL as string
> strSQL = "EXEC SP_LAPORAN " & Forms!Report110!cboDevID ",'" &
> FORMAT(FORMS!report110!cboDate,"yyyy-mm-dd") & "'"
>
>
>
>
> kalau diletakkan di form :
>
>
>
> Me.RecordSource = strSQL
>
> Me.Requery
>
>
>
>
>
>
>
> Salam Hangat dan Jabat Erat
>
>
>
>
>
> Murid Belajar Access
>
> EdyWiyono
>
>
>
>
>
> _____
>
> From: belajar-access@yahoogroups.com
[mailto:belajar-access@yahoogroups.com]
> On Behalf Of Mulyawan, Ayi Teguh
> Sent: Sunday, June 06, 2010 19:12
> To: belajar-access@yahoogroups.com
> Subject: RE: [belajar-access] Access Project 2007 & SQL Server 2005
>
>
>
>
>
> Dear Pak Edy,
>
>
>
> Saya Sudah coba pak.sesuai petunjuk bapak dibawah saya sudah berhasil
> membuat procedure tapi mentok di query nya.karena saya belum bisa
melakukan
> step :
>
>
>
> Klik menu sbb: Query - SQL Specific - Pilih Pass-through. "Tidak ada
pilihan
> tersebut pak..apakah karena query saya ada di SQL ? " sehingga saya belum
> bisa melanjutkan ke step berikutnya.
> Klik menu sbb: view - properties atau tekan ALT + ENTER
>
> Edit ODBC Connect str menjadi: ODBC;DRIVER={SQL
>
SERVER};SERVER=NAMA_SERVER_ANDA;DATABASE=NAMA_DATABASE;UID=NAMA_LOGIN_SQL;PW
> D=PASSWORD
> Mohon pencerahannya lebih detail pak.
>
>
>
> Thank you & Best Regards,
>
> - ATM -
>
>
>
> Dear Pak Edy,
>
>
>
> Thanks berat atas penjelasan & response nya.ternyata panjang juga
ceritanya
> ya.
>
> Maaf kalau nanti saya rada bawel.maklum masih cetek ilmu Access & SQLnya.
>
> Baiklah nanti akan saya coba dan saya akan kirim kembali reportnya.
>
>
>
> Thank you & Best Regards,
>
> - ATM -
>
>
>
> From: belajar-access@yahoogroups.com
[mailto:belajar-access@yahoogroups.com]
> On Behalf Of MBA
> Sent: Sunday, June 06, 2010 09:20
> To: belajar-access@yahoogroups.com
> Subject: RE: [belajar-access] Access Project 2007 & SQL Server 2005
>
>
>
>
>
> Pak Mulyawan..
>
> Jika anda menggunakan link table - tentu saja bisa dibuat query parameter
/
> dinamis seperti layaknya dengan tabel local di accdb / mdb.
>
> Tapi jika anda ingin menggunakan query berparameter di sql server, anda
> harus membuat stored procedure dengan parameter, atau function dengan
> parameter.
>
> Sedangkan cara memanggilnya dari accdb / mdb adalah dengan memanfaatkan
> query passthrough dan DAO atau bisa anda panggil dengan teknik ADO.
>
> Bisa dicoba sbb:
>
> Dari query analyzer / sql server management studio anda ketikkan sbb:
>
> CREATE PROCEDURE SP_LAPORAN(@DEV_ID BIGINT,@RPT_DATE DATETIME)
>
> AS
>
> SELECT
>
> dbo_QMeasMoni.Time,
>
> dbo_QMeasMoni.U12,
>
> dbo_QMeasMoni.U23,
>
> dbo_QMeasMoni.U31
>
> FROM dbo_QMeasMoni
>
> WHERE dbo_QMeasMoni.DevID)=@DEV_ID AND dbo_QMeasMoni.Date=@RPT_DATE
>
> Buat sebuah query di ACCDB / mdb anda.
>
> Klik menu sbb: Query - SQL Specific - Pilih Pass-through.
>
> Klik menu sbb: view - properties atau tekan ALT + ENTER
>
> Edit ODBC Connect str menjadi: ODBC;DRIVER={SQL
>
SERVER};SERVER=NAMA_SERVER_ANDA;DATABASE=NAMA_DATABASE;UID=NAMA_LOGIN_SQL;PW
> D=PASSWORD
>
> misalnyal:ODBC;DRIVER={SQL
>
SERVER};SERVER=PC_POEGOEH;DATABASE=DB_KEUANGAN;UID=AKMANAGER;PWD=PWD_MANAGER
>
> tuliskan isi query tsb sbb:
>
> SELECT TOP 1 * FROM dbo.QMEASMONI
>
> simpan query dengan nama misalnya : qryRPT_MEAS.
>
> Query Pass-though ini read only, tidak bisa di edit langsung dari form,
>
> dan tidak bisa dipasangi parameter.
>
> jadi seandainya anda menulis-
>
> SELECT dbo.QMeasMoni.Time, dbo.QMeasMoni.U12, dbo.QMeasMoni.U23,
> dbo.QMeasMoni.U31
>
> FROM dbo.QMeasMoni
>
> WHERE (((dbo.QMeasMoni.DevID)=[Forms]![Report110]![cboDevID]) AND
> ((dbo.QMeasMoni.Date)=[Forms]![Report110]![cboDate]));
>
> pasti akan timbul error.
>
> Bayangkan anda menuliskan statement sql di atas langsung di Query Analyser
/
> SQL Server Management Studio.
>
> Jadi kita lakukan dengan cara DAO.
>
> tuliskan kode ini di form anda, misalnya di command button event on click
> atau di form event on current.
>
> dim strSQL as string
>
> strSQL = "EXEC SP_LAPORAN " & Forms!Report110!cboDevID ",'" &
> FORMAT(FORMS!report110!cboDate,"yyyy-mm-dd") & "'"
>
> jika dilihat strSQL menjadi sbb: "EXEC SP_LAPORAN 1,'2010-10-10'
>
> dengan angka 1 dan '2010-10-10' berubah2 sesuai nilai di form yang
dipilih.
>
> trus kita ubah string SQL di qryRPT_MEAS.
>
> Currentdb.querydefs("qryRPT_MEAS").sql = strSQL
>
> lengkapnya sbb:
>
> dim strSQL as string
>
> strSQL = "EXEC SP_LAPORAN " & Forms!Report110!cboDevID ",'" &
> FORMAT(FORMS!report110!cboDate,"yyyy-mm-dd") & "'"
>
> Currentdb.querydefs("qryRPT_MEAS").sql = strSQL
>
> Me.requery
>
> Jika dari awal anda mengeset recordsource form / report anda dengan:
> qryRPT_MEAS, maka data anda akan berubah sesuai dengan perubahan
> parameternya.
>
> Mudah-mudahan bener ya.. soalnya belum di test.
>
> Salam Hangat dan Jabat Erat
>
> Murid Belajar Access
>
> EdyWiyono
>
> _____
>
> From: belajar-access@yahoogroups.com
> <mailto:belajar-access%40yahoogroups.com>
> [mailto:belajar-access@yahoogroups.com
> <mailto:belajar-access%40yahoogroups.com> ]
> On Behalf Of Mulyawan, Ayi Teguh
> Sent: Sunday, June 06, 2010 07:59
> To: belajar-access
> Subject: [belajar-access] Access Project 2007 & SQL Server 2005
>
> Assalamu'alaikum,
>
> Dear Rekan-rekan & para master access, mohon maaf kalau pertanyaan ini
sudah
> pernah ada yang posting. Saya baru belajar membuat aplikasi dengan
> mic.access. yang ingin saya tanyakan mengenai link Access 2007 ke
> SQLServer2005 :
>
> Bagaimana supaya query pada SQL mengenali input pencarian dari form
access?
> Saya sudah coba seperti biasanya yang digunakan pada database local access
> yaitu :
>
> SELECT dbo_QMeasMoni.Time, dbo_QMeasMoni.U12, dbo_QMeasMoni.U23,
> dbo_QMeasMoni.U31
>
> FROM dbo_QMeasMoni
>
> WHERE (((dbo_QMeasMoni.DevID)=[Forms]![Report110]![cboDevID]) AND
> ((dbo_QMeasMoni.Date)=[Forms]![Report110]![cboDate]));
>
> SQL script diatas bekerja kalau database SQLnya saya import dulu ke local
> access dan data yang ditampilkan sudah sesuai dengan input dari ComboBox
> DevID & Date. Saya ingin semua query ada di SQLServer jadi di access hanya
> berperan sebagai front end saja.
>
> Terimakasih sebelumnya
>
> Wassalam,
>
> -ATM-