+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ممكن حل مشكلة فى كود الحفظ (/showthread.php?tid=37657)
ممكن حل مشكلة فى كود الحفظ - عاصم النجار - 31-01-21
PHP كود :
'(@transno nvarchar(12),@pid nvarchar(1),@price float,@pdate nvar' expects the parameter '@usser', which was not supplied
دي رسالة الخطأ
كود الحفظ
PHP كود :
If e.KeyCode = Keys.Escape Then
Me.Dispose()
ElseIf e.KeyCode = Keys.Enter Then
cn.Open()
cm = New SqlCommand("Insert into TblCart (transno,pid,price,pdate,tableno,qty,usser) Values (@transno,@pid,@price,@pdate,@tableno,@qty,@usser)", cn)
With cm
.Parameters.AddWithValue("@transno", Frm_POS.lblTransNo.Text)
.Parameters.AddWithValue("@pid", id)
.Parameters.AddWithValue("@price", price)
.Parameters.AddWithValue("@pdate", sdate)
.Parameters.AddWithValue("@tableno", Frm_POS.lblTableNo.Text)
.Parameters.AddWithValue("@qty", CDbl(txtQty.Text))
.Parameters.AddWithValue("@usser", str_user)
.ExecuteNonQuery()
End With
cn.Close()
'***********************
cn.Open()
cm = New SqlCommand("update TblCart set total = price * qty ", cn)
cm.ExecuteNonQuery()
cn.Close()
Frm_POS.LoadCart()
Me.Dispose()
End If
تم حل المشكلة بفضل الله
RE: ممكن حل مشكلة فى كود الحفظ - ابراهيم ايبو - 31-01-21
السلام عليكم ورحمة الله وبركاته
اخي الكريم اين رسالة الخطأ ؟ وما المشكلة التي تحدث معك ؟
فقط وجدت هذا الحقل تأكد من طول الحقل حيث انك كتبت 1
كود :
@pid nvarchar(1)RE: ممكن حل مشكلة فى كود الحفظ - عاصم النجار - 01-02-21
(31-01-21, 01:52 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم اين رسالة الخطأ ؟ وما المشكلة التي تحدث معك ؟
فقط وجدت هذا الحقل تأكد من طول الحقل حيث انك كتبت 1
كود :
@pid nvarchar(1)
أخي الفاضل شكرا على اهتمامك الكبير
ولكن حل المشكلة انى كنت لم ادخل عن طريق اليوزر والباسورد فلذلك طلع هذه الرسالة