Posted by: yuli nurachman on: October 25, 2009
Pertama buka program Microsoft access -> File new -> [simpan dengan menggunakan nama yang diInginkan] -> pilih Module new pada Kotak dialog. Kemudian ketikkan code

Sub newFolder()
MkDir “C:\dataTest”
End Sub
Jalankan program yang telah anda ketikkan atau tekan F5.

Lihat hasil dari program yang telah anda buat dengan memeriksa apakah Terdapat Folder dataTest pada drive c. jika telah terdapat folder dataTest pada drive c maka program anda telah berjalan dengan baik.
Untuk program yang berikutnya folder dari dataTest akan dihapus dengan menggunakan program yang dibuat dengan menggunakan code
Sub removeFolder()
RmDir “C:\dataTest”
End Sub
Untuk menjalankan program tekan F5 kemudian lihat hasil dari program yang telah dijalankan. Jika folder dataTest telah terhapus maka anda telah sukses untuk membuat Folder dan menghapusnya dengan menggunakan VBA Script.