arkadaşlar yaptığım programda otomatik database yaratması lazım ancak databaseyi access 95 e gore duzenliyor.Bana bunun ustu 2000 lazım yapamadım sanırım bir yerlerde eksiklik var yardım edin lutfen...

Dim Yeni_Dosya As Database

Private Sub Form_Load()
Set Yeni_Dosya = CreateDatabase(App.Path & "" & Form1.DataList1.Text, dbLangTurkish,(Burada bişi olması lazım ama bulamıyorum:S))
Set dosya = OpenDatabase(App.Path & "" & Form1.DataList1.Text)
End Sub


Tekrar Teşekkurler İyi Gunler.
__________________