Kebetulan saya pakai pkzip untuk aplikasi foxpro ( ada yang DOS maupun Visual
Foxpro ) . Nah ini bisa dicoba
'====
sub testPKZIP()
dim retval as variant
RetVal = Shell("m:\pkzip.exe m:mem m:*.mem" ,vbHide )
end sub
'=====
Salam Sejahtera
--- In [email protected], "Bambang Mahfudin" <bamba...@...> wrote:
>
> Bapak Moderator dan Accessers....
>
> Saya bikin program di access 2003 yg menggunakan metode FE dan BE. Semua
> tabel berdiri sendiri dalam sebuah MDB, jadi satu tabel satu MDB. Dan saya
> kumpulkan dalam satu folder misal 'DATA'
> Yang saya harapkan adalah membackup folder 'DATA' tsb ke folder misal
> 'DATA_BACKUP'
>
> Problem :
> Bagaimana perintah DOS-nya membuat backup folder 'data' tsb dalam bentuk ZIP
> dg menggunakan PKZIP dan nama file hasil ZIP nya berupa tanggal. Misal
> 01092010.ZIP, 25122010.ZIP dll... Atau dipermudah dg nama yg urut misal
> 0001.ZIP , 0002.ZIP , dll...
>
> Jadi perintah DOS tsb akan saya simpan dalam extensi BAT dan dipanggil lewat
> menu
>
> Mohon petunjuk atau saran-nya, terima kasih sebelumnya.
>
> SalamAccess
> BambangMahfudin
>
