[FORM] Formda iki Text Kutusu ile arama yapma
#1
Arkadaşlar merhaba,
Ben formumda bir Tex box ile arama yapabiliyorum kullandığım kod budur...

Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[AlanAdi] = '" & Me.MetinKutusuAdi & "' "
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

Sorunum: farklı stok numaralı ürünlerde seri numaraları aynı olabiliyor
Dolayısıyla Sadece seri no den arama karışıklık yaratıyor.

Yapmak istediğim şey;

İki tex box ile arama yapmak istiyorum örneğin
Formda SeriNo ve StokNo gibi iki alanım olsun. İki tanede arama için kullanacağın test box olsun ve Arama isiminde birde düğme olsun.
Ben arama için kullanacağım text box ın birini seri no için diğerinide stok no için dorduracağım ve Arama düğmesine basınca Hem seri no hemde Stok no için girilmiş veriler aynı anda mevcutsa bulmasını sağlamaya çalışıyorum
böylece ürünlerin Seri numaraları aynı olsa bile stokları farklı olacağından ürünler arasından istediğimi bulabileceğim

İlginiz ve yardımlarınız için peşinen teşekkür ederim



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. Dim rs As Object
  2. Dim strAranacak As String
  3. strAranacak= "[AlanAdı1]=" & Me.MetinKutusuAdi1 & " AND " & "[AlanAdı2]=""" & Me.MetinKutusuAdi2 & """"
  4. rs.FindFirst strAranacak
  5. Set rs = Me.Recordset.Clone
  6. rs.FindFirst strAranacak
  7. If Not rs.EOF Then Me.Bookmark = rs.Bookmark





  Alıntı
Bu mesajı beğenenler:
#3
İlginiz icin teşekkür ederim ,
rs.FindFirst strAranacak (ilkinde) satırında hata alıyorum
Nasil giderebiliriz?



  Alıntı
Bu mesajı beğenenler:
#4
Merhaba arkadaşlar
üzerinde çalıştığım örnek var
Yapmaya çalıştığım örnekteki formdada göreceğiniz gibi seri ve stok için textbox oluşturdum. Arama düğmesine bastığımda iki arama metin kutusunu da sağlayan sonuç formda görünsün istiyorum. Eklediğim örnekte seri numarası için uyguladım, seri no yu doldurulup enter a basınca ilgili seri no ile birlikte veriler(Tarihler) geliyor. Fakat aynı seri nolu ancak farklı stok numaralı ürünlerde var dolayısıyla arama alanını ikiye çıkartmam gerekti.
Arama düğmesine bastığımda girdiğim seri no lu ve stok numaralı ürünü buldurmak istiyorum. Umarım anlatabilmişimdir.


İlginiz için peşinen teşekkür ederim...


Eklenti Dosyaları
.rar   deneme.rar (Boyut: 189,37 KB / İndirilme: 73)



  Alıntı
Bu mesajı beğenenler:
#5
Selam,

basit bir ornek ekledim


Eklenti Dosyaları
.rar   deneme.rar (Boyut: 36,01 KB / İndirilme: 80)



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
access-sql-2 [FORM] Liste kutusu biçimlendirme... rafetgulmez 7 4.110 28-11-2025, 13:18
Son Mesaj: osman06
  Access Kayıt Yapma kertiller_55 1 215 29-09-2025, 21:15
Son Mesaj: dsezgin
  [VBA] Metin Içerisindeki Kelimeler Ile Arama Yapma ekremer1969 6 1.329 22-06-2024, 16:15
Son Mesaj: dsezgin
  [FORM] Arama Sorunu Pasham 0 374 08-04-2024, 14:32
Son Mesaj: Pasham
  [FORM] metin kutusu kaydırma onkay 5 2.358 27-12-2023, 13:24
Son Mesaj: dsezgin
  [SORGU] Iki Tablo Arasında Sorgu Ile Güncelleme Yapma yahyamacit 2 465 10-11-2023, 13:22
Son Mesaj: yahyamacit
  Metin Kutusu Adı Değiştirme Hk. snapper 9 786 08-11-2023, 01:12
Son Mesaj: dsezgin
  [TABLO] çoklu Birleşik Giriş Kutusu RASİMPEH 2 483 19-09-2023, 04:53
Son Mesaj: RASİMPEH

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi