AccessTr.neT

Merhaba;
Giriş için ve çıkış için barkod okutması yaptığım bir projem var. Projemde aynı kodlu barkodları bir sorgu ile say yaptırıp giriş ve çıkış farlarını alarak eğer stokta ürün yoksa bakiye yetersiz uyarısı vermek istiyorum. Bu uyarıyı kaydet butonunda değilde barkodu okutma anında kontrol etmesini istiyorum çünkü kullandığım form bölünmüş form özellikli olup seri bir şekilde 100'lerce barkodu okutmak için tasarlanmış bir form. Dolayısıyla stokda 10 tane ürün var ise çıkış işlemi için barkod okuttuğumda 11 nci barkodu okuttuğum anda bana stok yetersiz uyarısını verebilmesini istiyorum. Konuyla ilgili olarak yaptığım incelemelerde sitede aradığım çözüme ulaşamadım. Belkide doğru kelime ile arama yapamadığım içindir. Bu nedenle benzer bir konu varken yeni açmışsam af ola...

örneksiz olduğundan örneksiz cevap;

öncelikle merhaba;

yapmanız gereken mantık olarak, barkod okuttuğunuzda ulaşmış olduğunuz ürünün sorgu ile ado ile vb yöntemle stok durumunu alıp ilk okutma sonrasında belirlediğiniz limit altında ise uyarı verdirmek, bu uyarıyı mesak ile verebilirsiniz. sonunda da exit sub der ve kodun işleyişinin durdurursunuz. Sınır limitini bir tabloya koyar oradan okutup her seferinde kontrol edersiniz misalen kod yapınız şu şekilde olabilir.

123 numaralı ürünü okuttuğunuzu var sayıyor ve stok durumunun 49 olduğunu düşünüp 50 alltında olduğunu bildiğim için uyarı verdirmek istiyorum.


dim rs as new adodb.recordset ile bağlantı oluşturdum.
rs.open ""alt limit tablo", currentproject.connection ad.........   tabloya bağlandık

rs.find "[urunid]=" & me.urunid       ürünümüzü bulduk.

if rs!altlimit < me.stoksayisi then 

geçerli ise yapıacak işlem 

else

geçerli değil ise yapılacak işlem

end if



bu kadar