bir veritabanı içerisinde bir formun otomatik kapatıldığı inceledim...
kısacası 10 sn içinde bir form kendiliğinden kapanıyor
sorum şu acaba aynı şekilde veritabanına kapatmak mümkün mü ?
Kodda close olarak belirtilen yer vardır o Close'i Quit ile değiştir dene
kodları göremiyorum ve kendi yaptığım dosyayı ekliyorum....
Merhaba;
Kodu ekledim fakat biraz karışık uygulama kontrol edebilirmisiniz
(11/12/2010, 22:36)schworse yazdı: Merhaba;
Kodu ekledim fakat biraz karışık uygulama kontrol edebilirmisiniz
teşekkür ederim fakat bu defa 10 sn de hiç düşme olmuyor ve bu defa formda kapanmaz durumda
kod yazmaktan hiç anlamıyorum küçük bir kasabada resmi bir porgramı kendi işimi kolaylaştırmak amacıyla bu işie girdim...
lutfen biraz daha yardımlarınıza ihtiyacım var....
amacım formdaki eklenti tıklandığında bu köprü vasıtasıyla veritabanı kapansın istiyorum...
Private Sub Form_Timer()
Dim Y As String
Y = "00:00"
If X <= 10 Then
Me.Label10.Visible = True
X = X + 1
If X = 11 Then: Beep
Me.Label10.Caption = Format(Choose(X, "10", "9", "8", "7", "6", "5", "4", "3", "2", "1", "0"), Y)
Else
''DoCmd.Close acForm, "F00-MAİN" Close yerine Quit yazaksınız
DoCmd.Quit acForm, "F00-MAİN"
End If
End Sub
Kod burada uygulamanız çok karışık ve eksikleri var kod yukarıdaki gibi olacak X=10 dan geriye sayar sıfır olduğunda program kapanır