Konuyu Oyla:
  • Toplam: 1 Oy - Ortalama: 5
  • 1
  • 2
  • 3
  • 4
  • 5
Onay Kutusu Hakkında
Çevrimdışı
jon206



*

Üye
14
2
04/11/2008
0
Cinsiyet: Bay
Şehir: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/06/2011, 10:20
#1
Cozuldu 
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ı: 32)
Seruz


Çevrimdışı
******

Site Yönetimi
1,536
7
30/10/2008
804
Cinsiyet: Bay
Şehir: Tekirdağ
Ofis Versiyonu: Ofis XP
Adı Soyadı: Serkan UZUNER
Son Oturumu: 25/10/2014, 02:18
#2
Cozuldu 
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
jon206


Çevrimdışı
*

Üye
14
2
04/11/2008
0
Cinsiyet: Bay
Şehir: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/06/2011, 10:20
#3
Cozuldu 
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)
Seruz


Çevrimdışı
******

Site Yönetimi
1,536
7
30/10/2008
804
Cinsiyet: Bay
Şehir: Tekirdağ
Ofis Versiyonu: Ofis XP
Adı Soyadı: Serkan UZUNER
Son Oturumu: 25/10/2014, 02:18
#4
Cozuldu 
Buyrun, örnek ektedir.

Kod:
SELECT AYLAR FROM AİDATLAR WHERE (KASAONAYI=Yes) GROUP BY AYLAR ORDER BY AYLAR;
Kod:
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ı: 68)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
jon206


Çevrimdışı
*

Üye
14
2
04/11/2008
0
Cinsiyet: Bay
Şehir: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/06/2011, 10:20
#5
Cozuldu 
SAYIN SERUZ TAM İSTEDİĞİM GİBİ OLMUŞ ÇOK TŞK. EDERİM SAYGILAR...



 Etiketler -
 Direk Link
 HTML Link
 BBCode Link
 Sosyal Paylaş

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Bir Forma Birden Fazla Tablodan metin kutusu ekleme fanibiri 9 306 19/10/2014, 20:53
Son Yorum: fanibiri
  Metin Kutusu Işin Bağcilar 2 123 17/10/2014, 17:08
Son Yorum: Işin Bağcilar
Cozuldu Güncellenecek alan içindeki tırnak işareti sorunu hakkında. direnist 5 369 15/10/2014, 21:26
Son Yorum: direnist
  Tablolardaki Not alan türü hakkında. direnist 9 335 09/08/2014, 23:16
Son Yorum: mehmetdemiral
Cozuldu access alan biçim ve özellikleri hakkında necati... 14 3,903 24/06/2014, 10:41
Son Yorum: temre



Users browsing this thread: 2 Ziyaretçi



Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2014 MyBB Group.
MyTrade theme by XSTYLED © 2014.
This forum uses Lukasz Tkacz MyBB addons.