Kayıt butonunda progress bar hatası
Tarih
12/05/2009 14:23
Konu Sahibi
yoguz
Yorumlar
4
Okunma
1282
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy



yoguz
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
15
4
02/05/2009
İstanbul
Ofis 2003
05/06/2015,10:41
Çözüldü 
Sponsor Reklam
Merhaba arkadaşlar,
Animasyonlu menü ekleyerek yapmaya çalıştığım çalışmamda, calışanlar formuna eklediğim kayıt butonuna status bar ekledim. Fakat kayıt butonuna basıldığında status bar çalışıyor ama bitiminde hata veriyor. Konu hakkında yardımcı olabilirmisiniz.
Örnek olarak kullandığım status bar örneğinide ekedim.

teşekkür ederim.
Cevapla

Bilgisayarcı
Atçalı
Kullanici Avatari
Onursal
657
29/01/2008
410
Antalya
Ofis 2003
01/11/2011,15:17
Çözüldü 
Merhaba
1. Hocam bu status bar değil progress bardır.
2. if x false dediğinde çıksın sorun yok. Ama for içinde o alan gereksiz.
3. EXIT_SUB demişsin ama altında exit yok. Ayrıca orası sub değil function. Case içine sadece init ve for next içinde setstatus dediin alanlar kalsın gerisini sil..
Bana işe yarayan bir müdür göster,sana dünyayı yerinden oynatayım.
                                                                                        Descartes


Cevapla

yoguz
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
15
4
02/05/2009
İstanbul
Ofis 2003
05/06/2015,10:41
Çözüldü 
Sponsor Reklam
Merhaba sn.Bilgisayarcı,

Evet haklısınız progress bar. Bi yandan denetçilerle uğraşırken bu konuyu açmak zor oldu .Ozur

Yazdıklarınızı denedim hata vermedi ama bu sefer progress bar kayıt esnasında çıkmadı. Örnek üzerinde denemeniz mümkünmü.?

Teşekkür ederim..
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.739
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Bugün,02:35
Çözüldü 
Sayın yoguz

Private Function MouseClick(ctl As Label) altındaki tüm kodları silin ve şunları yapıştırınImg-craynot ilk satırı silmeyin. Ama son satırı silin.)

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
Dim s As String
Select Case ctl.Name
Case "lbl1"
  
Dim X, I
'not: buraya hangi işlemleri yaptıracaksanız o kodu giriniz

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_kaydet_Click:

X = InitStatus("Lütfen Bekleyiniz... " & Me![Oran], "Geçen Süre: 0", Int(Me![Oran]))
    
For I = 0 To Me![Oran]
X = SetStatus("Geçen Süre: " & I, I)
        
If X = False Then GoTo EXIT_SUB
        
Next I
EXIT_SUB:
    X = ResetStatus()
Exit_Yenile_Click:
  
Case "lbl2"
DoCmd.GoToRecord , , acNewRec

Exit_yenikayıt_Click:
Case "lbl3"

Case "lbl4"

Case "lbl5"

Case "lbl6"
stDocName = "menu"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Case "lbl7"
    DoCmd.Close
   'Application.Quit
End Select
End Function


Ben denedim. Bu şekilde sorunsuz çalışıyor.

Kolay gelsin.

İnadına, ille de Accesstr.net...
Cevapla

yoguz
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
15
4
02/05/2009
İstanbul
Ofis 2003
05/06/2015,10:41
Çözüldü 
Sponsor Reklam
Sn. mehmetdemiral çok teşekkürederim..

iyi çalışmalar.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Accessten excel bağlantısı ile veri alırken parola hatası. Mecnun24 8 258 02/01/2017, 20:11 Mecnun24
  mükerrer Kayıt taha1234 7 223 25/12/2016, 03:17 taha1234
  İki Tarih Arası Rapor Hatası m_demir 14 298 24/12/2016, 23:03 m_demir
  Progress Bar ile yükleniyor ifadesi oluşturmak oosmaner 4 149 19/12/2016, 19:54 atoz112
  Tabloya eklerken aynı kayıt varsa eklenmemesi. nightashes 4 132 18/12/2016, 18:09 nightashes


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