Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
17/09/2009 11:18
Konu Sahibi
Soul
Yorumlar
3
Okunma
1444
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

Soul

Üye
 48
 5
 11
 30/10/2008
0
 İzmir
 
 
 05/12/2017,20:30
Çözüldü 
üstadlar ekte hazırlamaya çalıştığım veri tabanında uygulama hataları mevcut fakat birtürlü çözemedim neden bukadar çok açılır menü var? sebebi açılır listeye seçim için daha çok veri girilecek veritabanını bölüp yapayım dedim oda hatalardan dolayı olmadı inceleyip düşüncelerinizi bildirebilirseniz memnun olurum buarada gövde malzemeleri tablosu ana tablo biliyorum çok karışık bu tabloya haliyle daha fazla açılır menü ekliyemiyorumSadd



Kullanici Avatari

Nurullah_Serdar

Aktif Üye
 37
 21
 568
 22/11/2008
189
 Giresun
 
 Ofis 2007
 09/10/2018,12:51
Çözüldü 
örneğinize baktım. tuhaf bir durum görünmüyor aslında. açılan kutuyu tabloda oluşturmak yerine formda oluşturup değerleri istediğiniz tablodan çekebilirsiniz.


İyiki Varsın Access Img-grin

Kullanici Avatari

Soul

Üye
 48
 5
 11
 30/10/2008
0
 İzmir
 
 
 05/12/2017,20:30
Çözüldü 
araçlar çözümleden veri tabanını böldürerek sorunumu çözümledim ilglenen arkadaşlara teşekkür ederim ama açılır menülerin yoğunluğu ile ilgili tavsiyeleriniz varsa onlarıda beklerim fazlaca açılan açılır menü nedeni le yeni menü ekleyemiyordumImg-grin tabloları fazlaca oluşmamın sebebide açılır menüde yok ise eklekomutunu kullanmamdır aşağıdaki gibi

Private Sub Parça_Adı_NotInList(NewData As String, Response As Integer)
Dim strSQL As String
Dim i As Integer
Dim Msg As String
'Exit this sub if the combo box is cleared
If NewData = "" Then Exit Sub
Msg = "'" & NewData & "' Henüz Listede Bulunmamaktadır." & vbCr & vbCr
Msg = Msg & "Ürün Ağacına Eklemek İstermisiniz?"
i = MsgBox(Msg, vbQuestion + vbYesNo, "Anlaşılmayan Katagori...")
If i = vbYes Then
strSQL = "INSERT INTO parcalar ( [Parça Adı] ) values ('" & NewData & "')"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "parcalar"
DoCmd.OpenForm stDocName, , , stLinkCriteria


Else
Response = acDataErrContinue
End If
End Sub



Kullanici Avatari

Nurullah_Serdar

Aktif Üye
 37
 21
 568
 22/11/2008
189
 Giresun
 
 Ofis 2007
 09/10/2018,12:51
Çözüldü 
açılır menü dediğiniz açılan kutu mu? açılan kutunuzu tabloda oluşturmayınız. formun üzerinde oluşturunuz. bu sefer bir aksaklık olmayacaktır.
tablonuzdakı alan özelliklerinden arama bölümünü metin kutusu seçin. form üzerinde açılan kutuya dönüştürüp metinleri listeden alabilirsiniz.


İyiki Varsın Access Img-grin


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Kaydet Butonuna Basıldığında Progressbar Hatası Veriyor Deniz DEMİRCİOĞLU 2 101 05/03/2019, 11:16
Son Yorum: Deniz DEMİRCİOĞLU
Çözüldü Log Hatası Alıyorum aliyuzen 10 388 04/03/2019, 17:00
Son Yorum: aliyuzen
Çözüldü Veritabanı Üzerinden Mail Göndermek sercann 1 137 21/02/2019, 23:33
Son Yorum: ozanakkaya
Çözüldü Vakıf Üye Takip Veritabanı ShanksTaicho 1 124 30/01/2019, 17:07
Son Yorum: simendifer
Çözüldü Veritabanı Penceresi Bilal Demirci 2 177 26/01/2019, 11:52
Son Yorum: Bilal Demirci

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.