[Attachment(s) from agung hend included below]
--- In belajar-access@yahoogroups.com, Andi Ali <aliandi05@...> wrote:
>
> Mas Agung ko ga bisa ya... ada pesan invalid call argument or prosedure. pada baris ...
> Â CommandBars("Menu Bar").Controls("Tools").Controls("Database utilities").Controls("Compact and repair database...").accDoDefaultAction
>
> gimana ya...
>
>
> ________________________________
> From: agung agunghend2001@...
> To: belajar-access@yahoogroups.com
> Sent: Saturday, April 7, 2012 6:32 AM
> Subject: Re: Bls: [belajar-access] VBA Repair and Compact database
>
>
> Â
>
> Mas Andi,
>
> coba cara berikut, sy sdh terapkan dan hasilnya sih terlihat spy yg Anda butuhkan, semoga...
>
> buat 1 command button, lalu copy paste code di bawah:
>
> Private Sub cmdOk_Click()
> Â Â Â If MsgBox("Program akan melakukan compact & repair!" _
>       & Chr(13) & "Ketika selesai, & bila diperlukan..." _
> Â Â Â Â Â Â & Chr(13) & "tutup aplikasi terlebih dulu lalu Anda harus login kembali.", _
> Â Â Â Â Â Â vbExclamation + vbYesNo, "Compact & Repair") = vbYes Then
> Â Â Â Â Â Â CommandBars("Menu Bar").Controls("Tools").Controls("Database utilities").Controls("Compact and repair database...").accDoDefaultAction
> Â Â Â End If
> End Sub
>
> Regards,
> Agung Hend
>
> http://simrs.tk
>
>
> --- In belajar-access@yahoogroups.com, Andi Ali aliandi05@ wrote:
> >
> > makasi mas syarief dan mas sofyan.. sudah saya coba dan berhasil...
> > namun yang saya harapkan adalah meng-Compac dan repair data pada file access yang terkait, bukan file access di luar aplikasi yang dijalankan...
> > mohon penjelasannya....
>
> > ________________________________
> > From: Sofyan Efendi sofyanefendi@
> > To: belajar-access@yahoogroups.com
> > Sent: Friday, April 6, 2012 6:06 AM
> > Subject: Re: Bls: [belajar-access] VBA Repair and Compact database
> >
> >
Mas Andi, berikut sy lampirkan file contohnya, dgn asumsi mas Andi menggunakan Access 2003.
Kalau 2010 bs mnggunakan caranya mas Sofyan.
Regards,
Agung Hend
--- In belajar-access@yahoogroups.com, Andi Ali <aliandi05@...> wrote:
>
> Mas Agung ko ga bisa ya... ada pesan invalid call argument or prosedure. pada baris ...
> Â CommandBars("Menu Bar").Controls("Tools").Controls("Database utilities").Controls("Compact and repair database...").accDoDefaultAction
>
> gimana ya...
>
>
> ________________________________
> From: agung agunghend2001@...
> To: belajar-access@yahoogroups.com
> Sent: Saturday, April 7, 2012 6:32 AM
> Subject: Re: Bls: [belajar-access] VBA Repair and Compact database
>
>
> Â
>
> Mas Andi,
>
> coba cara berikut, sy sdh terapkan dan hasilnya sih terlihat spy yg Anda butuhkan, semoga...
>
> buat 1 command button, lalu copy paste code di bawah:
>
> Private Sub cmdOk_Click()
> Â Â Â If MsgBox("Program akan melakukan compact & repair!" _
>       & Chr(13) & "Ketika selesai, & bila diperlukan..." _
> Â Â Â Â Â Â & Chr(13) & "tutup aplikasi terlebih dulu lalu Anda harus login kembali.", _
> Â Â Â Â Â Â vbExclamation + vbYesNo, "Compact & Repair") = vbYes Then
> Â Â Â Â Â Â CommandBars("Menu Bar").Controls("Tools").Controls("Database utilities").Controls("Compact and repair database...").accDoDefaultAction
> Â Â Â End If
> End Sub
>
> Regards,
> Agung Hend
>
> http://simrs.tk
>
>
> --- In belajar-access@yahoogroups.com, Andi Ali aliandi05@ wrote:
> >
> > makasi mas syarief dan mas sofyan.. sudah saya coba dan berhasil...
> > namun yang saya harapkan adalah meng-Compac dan repair data pada file access yang terkait, bukan file access di luar aplikasi yang dijalankan...
> > mohon penjelasannya....
>
> > ________________________________
> > From: Sofyan Efendi sofyanefendi@
> > To: belajar-access@yahoogroups.com
> > Sent: Friday, April 6, 2012 6:06 AM
> > Subject: Re: Bls: [belajar-access] VBA Repair and Compact database
> >
> >
__._,_.___
Attachment(s) from agung hend
1 of 1 File(s)
SPAM IS PROHIBITED
.
__,_._,___
Tidak ada komentar:
Posting Komentar