Skip to main content

AccessTr.neT


Fonksiyon Tuşu İle Program Kapatılırken Yedekleme Formundaki Butona Tıklanma Olayı

Oğuz Türkyılmaz
Oğuz Türkyılmaz
2
505

Fonksiyon Tuşu İle Program Kapatılırken Yedekleme Formundaki Butona Tıklanma Olayı

Çözüldü #1
Merhaba AnaFormumdaki F12 Fonksiyon Tuşuna bastığımda programı kapatıyorum. Fakat program kapatılırken aynı anda yedeklemede yapılsın istiyorum. Bu amaçla fonksiyon tuşunda F_Yedekleme formunu  açıp Formdaki ÇIKIŞ butonuna tıklanma olayını gerçekleştirmem gerekiyor. Yedekleme formu çıkış butonuna tıklandığında kod gereği ana programı kapatıp yedeklemeyi yapıyor. Sanırım benim sadece formun açıldıktan sonra butona tıklanma olayını sağlamam yeterli olacak. Yardımlarınız için teşekkür ederim. 
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Dim ButonaBas As Integer

Select Case KeyCode
      
       Case vbKeyF7
            KeyCode = 0
            DoCmd.OpenForm "F_UyeListesi"
       
        Case vbKeyF12
            KeyCode = 0
            DoCmd.OpenForm "F_Yedekleme"

ButonaBas = Komut66_Click()
           
            DoCmd.Quit
           
        Case Else
    End Select
End Sub


[Resim: do.php?img=9974]
.rar F12 Kapatırken yedekle.rar (Dosya Boyutu: 308,19 KB | İndirme Sayısı: 8)
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#2
anaformda, tuşa basılırken olayındaki kod

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Dim ButonaBas As Integer

Select Case KeyCode
     
      Case vbKeyF7
            KeyCode = 0
            DoCmd.OpenForm "F_UyeListesi"
       
        Case vbKeyF12
            KeyCode = 0
            DoCmd.OpenForm "FYedekleme", , , , , , "YedekAl"
         
        Case Else
    End Select
End Sub


Yedekleme formunun açıldığında olayına eklenecek kod:
If Me.OpenArgs = "YedekAl" Then
Call Komut66_Click
End If
Cevapla
#3
Ozan Bey çok teşekkür ederim.
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task