Maaf baru balas hasilnya pak Edy, Alhamdulillah sudah MANTAFFF!!!...ternyata benar hanya karena kurang syntax seperti yg pak Edy berikan "SET NOCOUNT ON;"
Thanks berat pak... Salam Hangat, -ATM- -----Original Message----- From: MBA <[email protected]> Sent: Thursday, June 10, 2010 07:23 To: [email protected] Subject: RE: [belajar-access] Erorr pada saat event procedure Mungkin seperti ini. New query, copy paste tsql string di bawah Yang dilakukan hanyalah menambahkan satu kata: SET NOCOUNT ON; ALTER PROCEDURE [dbo].[Proc_V_hMeasCreateReport] @DevID varchar(50), @DATE varchar(50) WITH EXECUTE AS CALLER AS SET NOCOUNT ON; --ditambahkan ini.. IF EXISTS (SELECT * FROM ThMeasReporter) BEGIN DELETE FROM ThMeasReporter WHERE XXX is NULL END INSERT ThMeasReporter(Time, DevID, U12, U23, U31, I1, I2, I3, P, Q, S, PF, Hz) EXEC Proc_V_hMeasFindData @DevID, @Date Salam Hangat dan Jabat Erat Murid Belajar Access EdyWiyono _____ From: [email protected] [mailto:[email protected]] On Behalf Of Mulyawan, Ayi Teguh Sent: Thursday, June 10, 2010 01:00 To: belajar-access Subject: [belajar-access] Erorr pada saat event procedure [2 Attachments] [Attachment(s) from Mulyawan, Ayi Teguh included below] Dear Accesser, Mohon bantuannya untuk permasalahan yang sedang saya hadapi soalnya saya cari-cari di mail-archive tidak menemukan kasus serupa. Begini ceritanya : Saya menggunakan ADP pada Access2007 dengan database pada SQLServer2005 [Posting saya attach], saya sudah membuat sebuah procedure "Proc_V_hMeasFindData" dan sudah bisa berjalan sesuai yang diinginkan, karena saya masih terus mengembangkan untuk membuat report-nya, saya membuat sebuah procedure "Proc_V_hMeasCreateReport" dengan tujuan agar data hasil dari procedeure yang pertama "Proc_V_hMeasFindData" masuk ke sebuah table dengan nama "ThMeasReporter" sehingga untuk report nantinya saya cukup mengambil data dari table "ThMeasReporter". Tetapi tidak seperti yang di harapkan Mr.Error yang muncul. Script pada button di access : Private Sub Command28_Click() Dim strSQL As String strSQL = "exec Proc_V_hMeasCreateReport '" & Forms!SICAMReport!cboDevID & "','" & Forms!SICAMReport!cboDate & "'" Debug.Print strSQL With Me.SF_QMeasMoni.Form .RecordSource = strSQL .Requery End With End Sub Mohon sarannya apa yang salah dari project yang saya buat? & apakah langkah saya sudah benar dengan memasukkan data hasil procedure ke table baru dengan cara mengosongkan terlebih dahulu table tersebut untuk source report? Thank you & Best Regards, - ATM - No virus found in this incoming message. Checked by AVG - www.avg.com Version: 9.0.829 / Virus Database: 271.1.1/2927 - Release Date: 06/09/10 13:35:00
