kayıt gezintisi bitince form kapansın
Tarih
12/11/2009 19:29
Konu Sahibi
zetyu
Yorumlar
2
Okunma
1101
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
zetyu
Aktif Üye
Kullanici Avatari
Aktif Üye
132
12/03/2009
0
Belirtilmemiş
Ofis XP
Bugün,07:59
Çözüldü 
kayıt gezintisi
; ileri düğmesine basarak gezinti yaparken kayıt gezintisi tamamlandığında formun kapanması olabilirmi.Yardımlarınız için şimdiden teşekkür ediyorum.


.
.rar   kayıt gezintisi.rar (Dosya Boyutu: 13,12 KB / İndirme Sayısı: 16)
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

ayhan2122
accesstr.net , gayet net ;)
Kullanici Avatari
Uzman
681
30/10/2008
451
-
Ofis 2003
23/02/2017,01:00
Çözüldü 
Sponsor Reklam
Gezinti bittikten sonra yeni kayıt gösterilip de kapansın derseniz;

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Komut6_Click()
On Error GoTo Err_Komut6_Click


    DoCmd.GoToRecord , , acNext

Exit_Komut6_Click:
    Exit Sub

Err_Komut6_Click:
    'MsgBox Err.Description
    DoCmd.Close   'Bu satır kapattırıyor.
    Resume Exit_Komut6_Click
    
End Sub


Yok hayır Yeni kayda geçmeden SonKayıttan sonra kapansın derseniz;

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Komut6_Click()
On Error GoTo Err_Komut6_Click

Dim SonKayit
    SonKayit = DLast("[no]", "Tablo1", "[no]<>0")

If [no] = SonKayit Then
    DoCmd.Close
Else
    DoCmd.GoToRecord , , acNext
End If

Exit_Komut6_Click:
    Exit Sub

Err_Komut6_Click:
    MsgBox Err.Description
    Resume Exit_Komut6_Click
    
End Sub


Saygılar, iyi çalışmalar.
*********
Kod, formül vs bilmek önemlidir ama mantığını yürütebilmek, nerede ve nasıl kullanılacağını bilmek daha önemlidir.
Cevapla

zetyu
Aktif Üye
Kullanici Avatari
Aktif Üye
132
12/03/2009
0
Belirtilmemiş
Ofis XP
Bugün,07:59
Çözüldü 
Sayın Ayhan2122
ilginize çok teşekkür ederim tam olarak istediğim buydu.
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Araç Takip kayıt sorunu IceMan7 10 588 18/05/2017, 19:12 ozanakkaya
  Tabloda Kayıt Yoksa Formu Açma barcins 3 107 16/05/2017, 11:20 barcins
  Formdan Tabloya Kayıt Butonu Ismail Kalan 7 149 14/05/2017, 12:21 atoz112
  Tekrarlanan Kayıt Ve Ortalama Sorunu ALTANs 2 101 26/04/2017, 12:06 ALTANs
  Kişisel Kayıt Paneli Oluşturma Hk. volger 9 364 22/04/2017, 19:53 atoz112


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status