[نهى علي]

(29-08-22, 12:25 PM)Mohammed Nafa كتب : السلام عليكم ورحمة الله وبركاته....
أرجو ان يساعدكم هذا الحل ....
Dim TxbBarcode As String = TxbBarcode.Text
Dim cmdPos As New SqlCommand("select top 1 ItemNo,Name,Unit,PerUnit,Qty,ExpDate,Price_1,Batch,qty from PosItem where qty <> '0' and BarCode = '" & TxbBarcode & "' ORDER BY ExpDate ", ConPOSSham)

لم ينجح الامر معي هل تستطيع ان تعمل مثال
واكون شاكرة لك