程序中的文件夹怎么办

程序中的文件夹怎么处理
在写程序中,比如数据库文件放在Database文件夹下,但打包安装后并没有这个文件,怎么在安装程序时候同时也生成这个文件夹呢?

------解决方案--------------------
PATHFILE=App.Path & "\Database" 
if Dir$(PATHFILE, 16) = "" Then
 MkDir (PATHFILE)
end if