Skip to main content

AccessTr.neT

Kayıt Ol

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

Alt Formda İstenilen Sayıda Onay İşaretlenmesi

karaayhan
karaayhan
Access Cevaplanmış Soruları
5
319

Alt Formda İstenilen Sayıda Onay İşaretlenmesi

Çözüldü #1
karaayhan
Aktif Üye
karaayhan
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 37
Konum: Muğla
Ofis Versiyonu: Ofis 2003
Son Oturumu: Dün,00:20
Yorumları: 527
Konuları: 93
Kayıt Tarihi: 02/11/2008
Teşekkür Puanı: 12
örnekte
alt formdaki onay kutularının istenilen sayıda işaretlenmesi
.zip onay.zip (Dosya Boyutu: 65,78 KB | İndirme Sayısı: 21)
Dünya düşünenler için bir komedi, Hissedenler için bir trajedidir ***
Hugh WALPOLE
Cevapla
#2
onur_can
Uzman
onur_can
www Bul
Uzman
Adı Soyadı: -....
Konum: -
Ofis Versiyonu: Ofis 2021 64 Bit
Son Oturumu: Bugün,20:07
Yorumları: 103
Konuları: 13
Kayıt Tarihi: 08/11/2008
Teşekkür Puanı: 15
Mesleğiniz: Elektronik, Otomasyon Sistem,
Öncelikle Tbl1 tablonuzda yon alanını arama sihirbazı seçip sol ve sağ değerlerini ekleyin. kaydedip kapatın, Daha sonra satış_onay formunuzu tasarım modunda açıp Yön açılır kutunun Güncelleştirme Sonrasında olayına aşağıdaki kodu ekleyin.

Kod:
Dim strSQL As String
strSQL = "UPDATE tbl1 SET tbl1.onay = True " & _
         "WHERE (((tbl1.Yön)=[Formlar]![SATIŞ_ONAYLA]![Açılan Kutu115]))"
    DoCmd.SetWarnings False
    DoCmd.RunSQL (strSQL)
    DoCmd.SetWarnings True
Me.alistansatisa.Requery
MsgBox "Belirtilen Yöndeki Tüm Kayıtlar Onaylanmıştır.", vbInformation + vbOKOnly, "SATIŞLAR"
 İyi olan tek şey bilgi ve kötü olan tek şey de cehalettir. (Sokrates)
Cevapla
#3
karaayhan
Aktif Üye
karaayhan
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 37
Konum: Muğla
Ofis Versiyonu: Ofis 2003
Son Oturumu: Dün,00:20
Yorumları: 527
Konuları: 93
Kayıt Tarihi: 02/11/2008
Teşekkür Puanı: 12
hocam seçilen yöne ait tüm kayıtları işaretliyor(onaylıyor)
miktar yazan kutuya girilen miktar kadar işaretleme yapılması
talebim imkan varsa
Dünya düşünenler için bir komedi, Hissedenler için bir trajedidir ***
Hugh WALPOLE
Cevapla
#4
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,22:49
Yorumları: 8.417
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.037
aşağıdaki kodu dener misiniz?
Me.alistansatisa.Requery satırının hemen üstüne eklenecek.
çalıştırmak istediğiniz diğer sorgunu amacını bilmediğimden ona dokunmadım gereksizse o kısım silinebilir
xSQL = " update tbl1 set onay=-1 " & _

       " where alisNo in (select top " & Me.Metin149 & " alisNo from tbl1 where yön like ""*" & Me.Açılan_Kutu115.Value & "" & "*"") "

CurrentDb.Execute xSQL
Cevapla
#5
karaayhan
Aktif Üye
karaayhan
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 37
Konum: Muğla
Ofis Versiyonu: Ofis 2003
Son Oturumu: Dün,00:20
Yorumları: 527
Konuları: 93
Kayıt Tarihi: 02/11/2008
Teşekkür Puanı: 12
(03/06/2024, 12:38)berduş yazdı: xSQL = " update tbl1 set onay=-1 " & _ " where alisNo in (select top " & Me.Metin149 & " alisNo from tbl1 where yön like ""*" & Me.Açılan_Kutu115.Value & "" & "*"") "CurrentDb.Execute xSQL


mükemmel sayın berduş tam istediğim gibi bir çözüm olmuş ellerinize sağlık
Dünya düşünenler için bir komedi, Hissedenler için bir trajedidir ***
Hugh WALPOLE
Cevapla
#6
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,22:49
Yorumları: 8.417
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.037
rica ederim
iyi çalışmalar
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da