Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Onay Kutusu Hakkında

jon206
jon206
Access Cevaplanmış Soruları
4
4020

Onay Kutusu Hakkında

Çözüldü #1
jon206
Üye
jon206
Bul
Üye
Adı Soyadı:
Yaşı: 49
Konum: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/05/2023,15:56
Yorumları: 17
Konuları: 2
Kayıt Tarihi: 04/11/2008
Teşekkür Puanı: 0
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
.rar Veritabanı1.rar (Dosya Boyutu: 78,4 KB | İndirme Sayısı: 37)
Cevapla
Çözüldü #2
Seruz
Uzman
Seruz
www Bul
Uzman
Adı Soyadı: Se.... UZ....
Yaşı: 53
Konum: Tekirdağ
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Bugün,00:43
Yorumları: 1.579
Konuları: 8
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 825
Mesleğiniz: BT Şefi
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
Çözüldü #3
jon206
Üye
jon206
Bul
Üye
Adı Soyadı:
Yaşı: 49
Konum: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/05/2023,15:56
Yorumları: 17
Konuları: 2
Kayıt Tarihi: 04/11/2008
Teşekkür Puanı: 0
ilgilendiğiniz için tşk. ederim 2003 formatında hemn gönderiyorum...


ektedir...
.rar Veritabanı2.rar (Dosya Boyutu: 48,79 KB | İndirme Sayısı: 22)
Cevapla
Çözüldü #4
Seruz
Uzman
Seruz
www Bul
Uzman
Adı Soyadı: Se.... UZ....
Yaşı: 53
Konum: Tekirdağ
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Bugün,00:43
Yorumları: 1.579
Konuları: 8
Kayıt Tarihi: 30/10/2008
Teşekkür Puanı: 825
Mesleğiniz: BT Şefi
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
.rar Aidat_Seruz.rar (Dosya Boyutu: 34,92 KB | İndirme Sayısı: 78)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #5
jon206
Üye
jon206
Bul
Üye
Adı Soyadı:
Yaşı: 49
Konum: Ankara
Ofis Versiyonu: Ofis 2007
Son Oturumu: 07/05/2023,15:56
Yorumları: 17
Konuları: 2
Kayıt Tarihi: 04/11/2008
Teşekkür Puanı: 0
SAYIN SERUZ TAM İSTEDİĞİM GİBİ OLMUŞ ÇOK TŞK. EDERİM SAYGILAR...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task