Программное создание базы Access с созданием отдельного .MDW - VB

Формулировка задачи:

Есть проблемка. Пытаюсь создать базу new.mdb, что бы паралельно создавался new.mdw по указанным мною путям... База создается , авот файл 'рабочих групп' не хочет ни в какую...

Dim adx As New ADOX.Catalog
adx.Create 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\new.mdb;Jet OLEDB:Create System Database=True;Jet OLEDB:System Database=e:\new.mdw;'

Решение задачи: «Программное создание базы Access с созданием отдельного .MDW»

textual
                            Листинг программы 
                        

                            sysDbPath='e:\new.mdw'
adx.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' & _ 
   sysDbPath & ';Jet OLEDB:System database=' & _
   sysDbPath & ';Jet OLEDB:Create System Database=True;')
                        