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




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

Kullanici Avatari

Çevrimdışı

Üye
14
2
04/11/2008
0
Ankara
Ofis 2007
06/11/2015,15:33
#1
Çö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

Veritabanı1.rar
Dosya Türü: .rar
Dosya Boyutu: 78,4 KB
İndirme Sayısı: 37
Eklenme Tarihi: 05/11/2009, 17:48

Cevapla


Seruz
Uzman
Kullanici Avatari

Çevrimdışı

Uzman
S.... U....
1.540
7
30/10/2008
804
Tekirdağ
Ofis XP
24/06/2016,17:14
#2
Çö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

Çevrimdışı

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


ektedir...

Ek Dosyalar

Veritabanı2.rar
Dosya Türü: .rar
Dosya Boyutu: 48,79 KB
İndirme Sayısı: 22
Eklenme Tarihi: 06/11/2009, 14:06

Cevapla


Seruz
Uzman
Kullanici Avatari

Çevrimdışı

Uzman
S.... U....
1.540
7
30/10/2008
804
Tekirdağ
Ofis XP
24/06/2016,17:14
#4
Çö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

Aidat_Seruz.rar
Dosya Türü: .rar
Dosya Boyutu: 34,92 KB
İndirme Sayısı: 76
Eklenme Tarihi: 06/11/2009, 16:24

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

Çevrimdışı

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






"Onay Kutusu Hakkında" Konusuna Ait Konu Araçları
 Etiketler
 Direk Link
 HTML Link
 BBCode Link
 Sosyal Paylaş

Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  ESC Butonu Hakkında notrino 9 150 14/06/2016, 19:38 notrino
  liste kutusu öğelerini mail olarak gönderme mehmetb84 8 175 06/06/2016, 19:34 mehmetb84
  Metin Alanı Hakkında notrino 5 93 01/06/2016, 11:36 notrino
  Kayıt İşlemi Hakkında notrino 4 157 30/05/2016, 15:26 notrino
  Access dosya uzantıları hakkında uguruygar 2 141 30/05/2016, 15:12 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