05/12/2011, 19:24
arkadaşlar girişte şifre soran bir Access uygulaması var.. bu uygulamayı açmak için başka bir Access uygulamasında buton ekleyip gerekli kodu yazdım. butona tıklayınca şifreli Access uygulaması açılıyor ancak kullanıcı adı şifre sormuyor. direkt açıyor.. kullanıcı adı şifre ekranının gelmesi için ne yapabilirim. kullandığım kod aşağıda
Open form kısmında gözümden kaçmış şifre için ayrı bir form varmış. onu yazınca düzeldi. kusuruma bakmayınız
Kod:
Private Sub Komut13_Click()
Set a = Nothing
Set a = New Access.Application
a.OpenCurrentDatabase "c:\becap\Fatura.mdb"
a.DoCmd.OpenForm "ANAMENU"
a.Visible = True
End Sub
Open form kısmında gözümden kaçmış şifre için ayrı bir form varmış. onu yazınca düzeldi. kusuruma bakmayınız