Onay Kutusu Hakkında
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5

Derecelendirme: 5/5 - 1 oy

jon206

Kullanici Avatari
Üye
14
2
04/11/2008
0
Ankara
Ofis 2007
06/11/2015,15:33
Çözüldü 
Selamlar
Ekte Ki Örnekte 1 Adet Sürekli Form Var

Kasa onayı Diye Bir Adet Checkbox Var İşaretli Olanları
Aşağıda Metin Kutusuna Aylar Aktarılacak Yan Yana

Örnek
Metin Kutusu=Eylül-Ocak Gibi

Not: Eğer 2 Adet Ocak Seçilmiş İse Tek Yazılmasını İstiyorum
Metin Kutusu=Ocak-Ocak Olmayacak Tek Yazılsın

Şimdiden Teşekkür Ederim


Ek Dosyalar
.rar   Veritabanı1.rar (Dosya Boyutu: 78,4 KB / İndirme Sayısı: 37)
Cevapla


Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.540
7
30/10/2008
804
Tekirdağ
Ofis XP
27/07/2016,16:28
Çözüldü 
Dosyanızı Access 2007 dosyası olarak göndermişsiniz.
Access 2002-2003 formatında gönderirseniz,
daha çabuk ve daha çok yardım alabilirsiniz.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla


jon206

Kullanici Avatari
Üye
14
2
04/11/2008
0
Ankara
Ofis 2007
06/11/2015,15:33
Çözüldü 
ilgilendiğiniz için tşk. ederim 2003 formatında hemn gönderiyorum...


ektedir...


Ek Dosyalar
.rar   Veritabanı2.rar (Dosya Boyutu: 48,79 KB / İndirme Sayısı: 22)
Cevapla


Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.540
7
30/10/2008
804
Tekirdağ
Ofis XP
27/07/2016,16:28
Çözüldü 
Buyrun, örnek ektedir.

Kod:
SELECT AYLAR FROM AİDATLAR WHERE (KASAONAYI=Yes) GROUP BY AYLAR ORDER BY AYLAR;

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub btn_METIN_Click()
On Error GoTo Hata
Dim RS As New ADODB.Recordset

    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    
    RS.Open "Aidatlar_Kasa_Onayli", CurrentProject.Connection, adOpenKeyset, adLockReadOnly

    Me.metin = ""
    Do While Not RS.EOF
        If Me.metin <> "" Then Me.metin = Me.metin & "-"
        Me.metin = Me.metin & RS("AYLAR")
        RS.MoveNext
    Loop

    RS.Close
    Set RS = Nothing

Exit Sub
Hata:
    MsgBox Err.Description
    Exit Sub
End Sub



Ek Dosyalar
.rar   Aidat_Seruz.rar (Dosya Boyutu: 34,92 KB / İndirme Sayısı: 77)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla


jon206

Kullanici Avatari
Üye
14
2
04/11/2008
0
Ankara
Ofis 2007
06/11/2015,15:33
Çözüldü 
SAYIN SERUZ TAM İSTEDİĞİM GİBİ OLMUŞ ÇOK TŞK. EDERİM SAYGILAR...
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Tabloya ve forma yeni alanlar ekledikten sonra metin kutusu sonucu almıyor hasanak2 5 67 22/09/2016, 09:28 hasanak2
  Mail gönderimindeki mail yazısı biçimlendirme ve sorgu ekleme sorunu hakkında. direnist 2 79 19/09/2016, 23:46 direnist
  Form üzerinde Metin Kutusu ile Arama yapma ozkovlu29 6 252 12/09/2016, 10:51 atoz112
  Access Liste Kutusu Sırayla Tek Harfe Bastıkça Kayıtlarda Sırayla Gezinme hasanak2 17 665 03/09/2016, 11:31 atoz112
  Formda Arama Hakkında perisanoglu 3 248 28/07/2016, 13:03 atoz112



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