[AwsEsam]

في فاتورة بيع , عند اضافة صنف جديد باستخدام الباركود او مربع نص txtbarcode  و كان الصنف موجود من قبل فقط يحدث +1 من الكمية الى الصنف الاول فقط ثم الباقي لا يجري عليه اي تعديل 

الكود المستخدم : 

For i as integer = 0 To guna2datagridview1.rowcount -2 

if txtbarcode.text = guna2datadridview1.rows(i).cells(3).value then

guna2datagridview1.rows(i).cells(3).value = guna2datagridview1.rows(i).cells(3).value + 1

else 

' كود الاضافة

كيف احل المشكلة الموضوحة بالصورة :

[aljzazy]

ما هو رقم العامود الموجود به باركود المنتج

[AwsEsam]

(30-04-20, 01:45 AM)aljzazy كتب : ما هو رقم العامود الموجود به باركود المنتج

cell(1)           رقم

[aljzazy]

وكذلك رقم العامود الموجود فيه الكمية

---

كود :

For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

[AwsEsam]

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

---

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

---

كود :

For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

---

(30-04-20, 01:52 AM)AwsEsam كتب :

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

---

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

---

كود :

For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

ما زبط 
بس بزبط على اول row  صف اما الباقي لا 
زي ما بالصورة

---

(30-04-20, 01:52 AM)AwsEsam كتب :

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

---

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

---

كود :

For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

---

(30-04-20, 01:52 AM)AwsEsam كتب :

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

---

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

---

كود :

For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

ما زبط 
بس بزبط على اول row  صف اما الباقي لا 
زي ما بالصورة

[aljzazy]

اذا عندك برنامج anydesk ممكن اشوف الاكواد كاملة

[AwsEsam]

عندي team viewer
بزبط؟

[aljzazy]

لا اخي ما بستخدمه

[AwsEsam]

(30-04-20, 02:12 AM)aljzazy كتب : لا اخي ما بستخدمه

طيب دقيقة ببقى نازل

---

(30-04-20, 02:14 AM)AwsEsam كتب :

(30-04-20, 02:12 AM)aljzazy كتب : لا اخي ما بستخدمه

طيب دقيقة ببقى نازل

هي نزلته

---

شو اساوي هسا ؟؟

[aljzazy]

ارسلي الرقم خاص

---

امنيات التوفيق ما شاء الله عليك استمر وسيكون باذن الله لك مستقبل برمجي مذهل