+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=25139)
RE: رصيد الصنف عقب كل عملية - mrnooo2000 - 02-06-18
أعتقد أن هناك أقواس ناقصة لديك
حاول تأخذالكود و تلصقه بدون تعديل و راجع نسخة الفريم ورك لديك
ان لم تنجح ارفق نموذج من المشروع للتعديل عليه
RE: رصيد الصنف عقب كل عملية - عبدالله الدوسري - 02-06-18
(28-05-18, 11:14 PM)atefkhalf2004 كتب : اطرح علي السادة الزملاء موضوع يهم كثير من الناس واولهم انا العبد الغلبان
هو
تاريخ الصنف كمية شراء كمية بيع رصيد
1/1/2018 شاي 14 0 14
2/1/2018 شاي 5 0 19
5/1/2018 شاي 0 6 13
كيف يمكن عمل الاستعلام الذي يوجد الرصيد عقب كل عملية
أخي atefkhalf2004
هل تريد عرض البيانات على شكل كشف حساب ؟
مشابة لكشف الحساب البنكي
إطلع على هذا الموضوع
http://vb4arb.com/vb/showthread.php?tid=23575&pid=113749#pid113749
إذا كنت تريد نفس الكشف الموجود في الموضوع , وأنا أعتقد أن هذا ما تطلبة
أما أنك ستقوم بنفس الطريقة بنفسك أو
أرفق لي قاعدة البيانات SQL SERVER ملف بإمتداد ( mdf ) , ويا ليت يكون فيه بيانات حتى أتمكن من إختبار جملة الإستعلام
وليس ملف أكسس
وسمي لي الأعمدة التي في الجدول حتى أفهم اسماء الحقول .
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 02-06-18
الاساتذة الافاضل
انا حاولت تعديل الكود باستبدال الاقواس او مواضعها ولم تنجح العملية
ثانيا انا ارغب فعلا يا ا عبدالله في عرض كارت الصنف مثل كشف الحساب ورجعت للموضوع اللي حضرتك اشرت اليه ولم اصل
مرفق قاعدة البيانات وهي 2008 واستخدم فيجوال 2008
شكرا
RE: رصيد الصنف عقب كل عملية - عبدالله الدوسري - 03-06-18
[attachment=18325]
المشروع الأول : هذا المشروع كما في الصورة في الأعلى : [attachment=18326]
[attachment=18327]
المشروع الثاني : هذا المشروع كما في الصورة في الأعلى : ( شرح بسيط حتى لا تتشتت في الأكواد الموجودة في المشروع الأول ) [attachment=18328]
هذة هي الوظيفة ( SQL Function ) التي ستقوم بمعالجة البيانات ولإظهارها على شكل كشف حساب أو رصيد تراكمي
[attachment=18337]
شكل الإسعلام في قاعدة البيانات :
[attachment=18336]
بعد إنشاء الوظيفة في قاعدة البيانات ستجدها كما هو موضح في الصورة
[attachment=18339]
هذا ملف نصي يحتوي هلى الوظيفة : فقط قم بفتح نافذة إستعلام جديدة في قاعدة البيانات [attachment=18332]
[attachment=18333]
داخل المشروع قم بإستخدام الكود كما هو معتاد :
[attachment=18335]
أتمنى أن تكون وصلت للمطلوب
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 03-06-18
حضرتك مستواك عالي جدا
اقسم بالله انا تهت منك
لكن سوف اعلم والاخرين
المهم
تم انشاء الدالة
وبال copy وال paste تم العرض لكن توهان يا خال
بسط لنا يبسطها الله في وجهك
عايزين اول ما الفورم يحمل
بعدها نختار الصنف من الكمبو يظهر كارت الصنف
PHP كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SELECTCommand = New SqlCommand
SELECTCommand.Connection = Connction
SELECTCommand.CommandType = CommandType.Text
Me.SELECTCommand.CommandText = "SELECT [invsun], [Sale], [Purchase], [Balance] FROM [dbo].[F_TransactionStatement]() where itcod= " & ComboBox1.SelectedValue & " "
Me.SqlDataAdapter.Fill(Me.ItemTable)
Me.DataGridView1.DataSource = Me.ItemTable
End Sub
استخد الدا ست بدلا من datatable
lمثل
PHP كود :
Sub fillcombox1()
If conn.State = ConnectionState.Open Then conn.Close()
conn.Open()
Dim dscom As New DataSet
dscom = New DataSet
Dim dpdp As New SqlDataAdapter
dpdp = New SqlDataAdapter("SELECT * FROM items order by invsun ", conn)
dpdp.Fill(dscom, "items")
conn.Close()
ComboBox1.Items.Clear()
ComboBox1.DataSource = dscom.Tables("items")
ComboBox1.DisplayMember = "invsun"
ComboBox1.ValueMember = "itcod"
End Sub
RE: رصيد الصنف عقب كل عملية - عبدالله الدوسري - 03-06-18
يا ابني . هذة هي جملة الإستعلام :
كود :
SELECT [invsun], [Sale], [Purchase], [Balance] FROM [dbo].[F_TransactionStatement]()إستخدمها كأي إستعلام عادي , وبطريقتك الخاصة , تعبي DataSet أو تعبي DataTable شي يرجع لك.
هذا الإستعلام يجلب كرت الصنف على شكل كشف حساب , وليس لتعبئة الـ Combobox بأسماء الأصناف
عبي الـCombobox بإستعلام عادي , وعندما تريد عرض كرت الصنف نفذ الإستعلام الذي عملتة لك.
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 03-06-18
والله انا وضعت تعبئة الكمبوبوكس كمثال ل داتا ست واستخدمت نفس استعلامك الهدف تبسيط الكوك وشكل انا عاؤفه. نتختار الصنف من الكمبو يعرض كارت الصنف الخاص به. وكيف يمكن وضع الدالةفي الفيجوال مش قي السكول لان تلسكول صغب وعايز حرفنه. احكي هدا المستقبل وخاصة هناك استخدامات كثيرة لنفس الكود ثم العميل والمورد وهكدا ونحن مبتدئين. وان شاء الله سوف تصل مش عارف اودي جمايلك واحسانك علي فين كثير علي ما تفعلوه معي ومع امثالي
RE: رصيد الصنف عقب كل عملية - عبدالله الدوسري - 03-06-18
أهلا بك أخي atefkhalf2004
الأمور بسيطة
لكن أنت مصعبها على تنفسك حبتين.
اشرح لي ما الذي تريد أن تقوم به. وما هو الي تحس انه صعب ,
بعض الجمل التي لم أفهمها ( الهدف تبسيط الكوك وشكل انا عاؤفه )
مذاذ تقصد ( هناك استخدامات كثيرة لنفس الكود ثم العميل والمورد وهكدا )
RE: رصيد الصنف عقب كل عملية - atefkhalf2004 - 03-06-18
اولا : حضرتك الكود المستخدم يمكن تطويعه وااستخدامه في اماكن اخري مثل ايجاد كشف حساب غميل او مورد
بالتالي لا بد من الفهم
ثانيا : برمجيا ان تضع الكود داحل القاعدة محتاج احتراف واحنا بدري علينا قوي
المهم
حضرتك ان اعرض البيانات
1-عمل الدالة function بالكود داخل كود الفيجوال بيسك
2-كيف اعرض كارت الصنف من خلال اختيار اسم الصنف من الكمبوبوكس يتم عرض الكارت
وسوف استخدم الفكرة في عرض حاسب العميل والمورد
حتي هذه اللحظة لم استطع توظيف الكود بالشكل المطلوب
اتمني حضرتك تساعدني
فكرة عرض البيانات تتكون من خلال الداتا ست بنفس فكرة تعبئة الكمبوبوكس المعروضة اعلي
RE: رصيد الصنف عقب كل عملية - mrnooo2000 - 03-06-18
أخ عاطف
الأخ عبد الله مشكورا شرح لك الأمر بشكل مفصل
و كل ما عليك هو استدعاء الدالة مباشرة لتحصل على الجدول المطلوب
و اذا اردت التطبيق على جدول اخر
ستحتاج الى التعديل على كود الfunction
عموما فى المرفق مثال لثلاثة طرق مختلفة للحصول على ما تريد ( المثال على قاعدة بيانات أكسس لعدم وجود سيكوال سيرفر لدى حاليا )
لن تستطيع تطبيق Dsum على السيكوال
و لكن الطريقتين linq و َالاستعلام ستعمل معك على السيكوال ان شاء الله