Кто-нибудь создавал базу данных Access через DAO.

Variant eng, bs;
eng=CreateOleObject("DAO.DBEngine.36");
bs=eng.OleFunction("CreateDatabase",(WideString)"D:\\база.mdb",(WideString)";pwd=password",Variant::NoParam());

Не пойму в чем дело: на последней строчке вылетает ошибка (во время выполнения)
Я уж и так код упростил...
Второй аргумент - ";pwd=password" - так записывается пароль, третий аргумент - Optional
В VB ксати все нормально

Для примера создание Workspace в с++:

ws=eng.OleFunction("CreateWorkspace",(WideString)"name",(WideString)"admin","",2); - все работает

Мож кто сталкивался...