Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Bir Form açıldığında Diğer Tüm Formların Kapanması

qhuan
qhuan
Access Cevaplanmış Soruları
10
4717

Bir Form açıldığında Diğer Tüm Formların Kapanması

Çözüldü #1
qhuan
Aktif Üye
qhuan
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 42
Konum: Belirtilmemiş
Ofis Versiyonu: Ofis 2003
Son Oturumu: 26/02/2011,12:58
Yorumları: 48
Konuları: 18
Kayıt Tarihi: 11/08/2009
Teşekkür Puanı: 0
arkadaşlar merhaba,

bir form açıldığında diğer tüm formların kapanmasını nasıl sağlayabilrim,

Yardımlarınız için şimdiden teşekkür ederim.
Saygılarımla,
qhuan, 11-08-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
mehmetdemiral
.
mehmetdemiral
Bul
Uzman
Adı Soyadı: Me.... De....
Yaşı: 59
Konum: Samsun
Ofis Versiyonu: Ofis 2013 32 Bit
Son Oturumu: 10/07/2024,19:24
Yorumları: 5.123
Konuları: 224
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 1.947
Mesleğiniz: Öğretmen
Konu başlıklarını lütfen küçük harfle yazınız. Ben mesajınızı düzelttim. Lütfen dikkat ediniz.

Sorunuza gelince, accesste komut ile form kapatmak için

Kod:
DoCmd.Close acForm, FORMADI, acSaveNo
komutu kullanılır. Ayrıca docmd.close komutuyla da o anda aktif olan tüm formları kapatır. (Hepsi aktif olamayacağı için, "all" demenin bir yolunu bulmak lazım)

Şu an için araştırıyorum, bulunca buraya yazarım.
İnadına, ille de Accesstr.net...
Cevapla
Çözüldü #3
qhuan
Aktif Üye
qhuan
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 42
Konum: Belirtilmemiş
Ofis Versiyonu: Ofis 2003
Son Oturumu: 26/02/2011,12:58
Yorumları: 48
Konuları: 18
Kayıt Tarihi: 11/08/2009
Teşekkür Puanı: 0
Uyarılarınızı dikkate alacağım,
Yardımlarınızı bekliyorum, Teşekkürler
qhuan, 11-08-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #4
Seruz
Uzman
Seruz
www Bul
Uzman
Adı Soyadı: Se.... UZ....
Yaşı: 53
Konum: Tekirdağ
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 09/01/2025,14:45
Yorumları: 1.579
Konuları: 8
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 825
Mesleğiniz: BT Şefi
Açık olan bütün formları kapatan kod
Kod:
While Forms.Count > 0
        DoCmd.Close acForm, Forms(0).name, acSaveNo
Wend
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #5
mehmetdemiral
.
mehmetdemiral
Bul
Uzman
Adı Soyadı: Me.... De....
Yaşı: 59
Konum: Samsun
Ofis Versiyonu: Ofis 2013 32 Bit
Son Oturumu: 10/07/2024,19:24
Yorumları: 5.123
Konuları: 224
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 1.947
Mesleğiniz: Öğretmen
Onun da kolayı var. O zaman bu komutun yer alacağı bir form mutlaka vardır. Onun üzerine bir komut düğmesi koyacak ve ona basınca tüm formların kapanmasını sağlayacaksınız. O halde bu formun adı diyelim "anaform" olsun Kodları şu şekilde yaparak anaformun tekrara açılmasını sağlarız.

Kod:
While Forms.Count > 0
        DoCmd.Close acForm, Forms(0).Name, acSaveNo
    Wend
DoCmd.OpenForm "anaform"
Eğer açık olan formda bulunulan bir kayıt varsa, yani o anda açık olan kayda gitmk gerekirse o zaman da yine seruz'un daha önce yazdığı kodlar
Kod:
BM = Me.Bookmark
    Me.Requery
    Me.Bookmark = BM
İnadına, ille de Accesstr.net...
Cevapla
Çözüldü #6
Seruz
Uzman
Seruz
www Bul
Uzman
Adı Soyadı: Se.... UZ....
Yaşı: 53
Konum: Tekirdağ
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 09/01/2025,14:45
Yorumları: 1.579
Konuları: 8
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 825
Mesleğiniz: BT Şefi
O an açık olan form haricinde kapatılmasını istiyorsak bunu kullanabilirsiniz.

Kod:
Dim TumFormlar As Object
    For Each TumFormlar In Application.CurrentProject.AllForms
        If Me.Form.Name <> TumFormlar.Name Then 'Aktif olan formu kapatmasın.
            DoCmd.Close acForm, TumFormlar.Name, acSaveNo
        End If
    Next
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da