Arkadaşlar, bir veritabanı içinden C:\ sürücüsünde vt1.mdb adında yeni bir veritabanı dosyası oluştururken, ekli olan örnekte ilk kez çalıştırıldığında problem yok. Dosya orada daha önce oluşturulmuşsa "veritabanı zaten var" uyarısı veriyor. uyarı vermesin istiyorum. Bu kodu sözkonusu şekilde ayarlayacak arkadaşlara şimdiden teşekkürler. Kod şöyle:
Private Sub vtyap_Click()
Dim Yol As String
Dim Cat As Object
Yol = "C:\vt1.mdb"
Set Cat = CreateObject("ADOX.Catalog")
Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Yol
End Sub
Private Sub vtyap_Click()
Dim Yol As String
Dim Cat As Object
Yol = "C:\vt1.mdb"
Set Cat = CreateObject("ADOX.Catalog")
Cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Yol
End Sub