Girilen sayı kadar onay kutularının otomatik onaylanması
Tarih
09/09/2013 12:30
Konu Sahibi
F.Ç
Yorumlar
2
Okunma
1095
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



F.Ç
Aktif Üye
Kullanici Avatari
Aktif Üye
113
05/07/2013
0
-
16/01/2016,01:38
Çözüldü 
Sponsor Reklam
Örneğimde paket sayısındaki alana girdiğim sayı kadar onay kutusunu işaretletmek istiyorum.

Örneğin "paket sayısı" alanına 1 girersem koli1;
"paket sayısı" alanına 2 girersem koli1, koli2;
"paket sayısı" alanına 3 girersem koli1, koli2, koli3 raporlarına ait onay kutuları otomatik onaylanabilir mi?

Mevcut çalışmamda barkodNo1,barkodNo2,barkodNo3 alanlarını "(01) 86812345600010102" ... şeklinde ve koli1, koli2,koli3 alanlarını da "1/2" ... biçiminde paket sayısına girilen sayı kadar otomatik doldurabiliyorum ama; onay kutularını da bunlarla birlikte doldurmak istiyorum fakat; onay kutusunu bunlara nasıl ilave edeceğimi bilemedim. Paket sayısı alanına ait kodlarla yukarıda anlatılanlar yapılabiliyor ancak onay kutularını işaretletmek ilave edilecek bu kodlara.
Yardımlarınız için şimdiden teşekkürler...


Ek Dosyalar
.rar   girilen sayı kadar onay kutularını otomatiki şaretletmek.rar (Dosya Boyutu: 154,8 KB / İndirme Sayısı: 9)
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.739
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Dün,02:35
Çözüldü 
Zaten daha önce case ile barkod olayını yapmıştık. Şimdi aynı case ile kolilerin de işaretlenmesini sağlayabiliriz. Bunun için paketsayisi metin kutusunun güncelleştirme sonrasındaki olay yordamını aşağıdaki biçime getirin.

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
43
44
45
46
47
48
Private Sub PaketSayisi_AfterUpdate()
        Me.Koli_1 = Null
        Me.Koli_2 = Null
        Me.Koli_3 = Null
        Me.BarkodNo1 = Null
        Me.BarkodNo2 = Null
        Me.BarkodNo3 = Null
    
    Select Case PaketSayisi
    
    Case 1
        Me.Koli_1 = "1/1"
        Me.BarkodNo1 = Me.BarkodNo1 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo1 = Me.BarkodNo1 & "0101"
        Me.okoli1 = -1
        Me.okoli2 = 0
        Me.okoli3 = 0
        
    Case 2
        Me.Koli_1 = "1/2"
        Me.Koli_2 = "2/2"
        Me.BarkodNo1 = Me.BarkodNo1 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo2 = Me.BarkodNo2 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo1 = Me.BarkodNo1 & "0102"
        Me.BarkodNo2 = Me.BarkodNo2 & "0202"
        Me.okoli1 = -1
        Me.okoli2 = -1
        Me.okoli3 = 0
    
    Case 3
        Me.Koli_1 = "1/3"
        Me.Koli_2 = "2/3"
        Me.Koli_3 = "3/3"
        Me.BarkodNo1 = Me.BarkodNo1 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo2 = Me.BarkodNo2 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo3 = Me.BarkodNo3 & "(01)0868078205" & Format(Me.ÜrünKodu, "0000")
        Me.BarkodNo1 = Me.BarkodNo1 & "0103"
        Me.BarkodNo2 = Me.BarkodNo2 & "0203"
        Me.BarkodNo3 = Me.BarkodNo3 & "0303"
        Me.okoli1 = -1
        Me.okoli2 = -1
        Me.okoli3 = -1

    End Select
    Me.Refresh


End Sub


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

F.Ç
Aktif Üye
Kullanici Avatari
Aktif Üye
113
05/07/2013
0
-
16/01/2016,01:38
Çözüldü 
Sponsor Reklam
Tamam Mehmet Abi,

Sorunum çözüldü. Bir adımı daha başarıyla tamamladım abi.

Çoook teşekkür ederim... Başka bir konuda görüşmek üzere.....
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Raporda boş ve veri olan alanları sayı olarak görme murat dikme 3 71 22/01/2017, 13:46 murat dikme
  metin kutusuna girilen ilk karakterin silinmesi slayerrrrr 4 94 17/01/2017, 14:27 slayerrrrr
  Raporda filtreleme onay kutusu ile nightashes 3 147 12/01/2017, 18:53 nightashes
Çözüldü satırdaki isimlerde otomatik klasör açma manyetix 19 3.917 05/01/2017, 00:20 donepezil
  Birleştirme sorgusunda sayı formatı hatası Mecnun24 8 264 15/12/2016, 16:39 atoz112


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