Formdan Başka Bir Veritabanını Aç.

[buketb]

Arkadaşlar Merhaba,

Bir tane müşteriler formum var. Bu form üzerine yerleştirdiğim bir buton yardımıyla başka bir veritanını açmak istiyorum.

Yardımlarınız için şimdiden çok teşekürler.

 

[GKMER]

örnek ekte

 

[buketb]

Çok teşekkürler

 

[Ersen]

Arkadaşlar bu dosyayı yeniden foruma kazandıracak kimse yok mu?

 

[modalı]

Sayın Ersen,

Aşağıdaki kodları kullanabilirsiniz.

Option Compare Database
Option Explicit
Dim a As Access.Application
Sub deneme()
  Set a = Nothing
  Set a = New Access.Application
  a.OpenCurrentDatabase "c:\belgelerim\db1.mdb"
  a.DoCmd.OpenForm "Form1"
  a.DoCmd.Maximize
  a.Visible = True
End Sub

İyi çalışmalar

 

[Ersen]

Çok teşekkür ederim, Sayın modalı.