منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال بخصوص القريد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=50249)



سؤال بخصوص القريد - DOX.1 - 29-08-24

السلام عليكم روحمة الله وبركاته 

عندي جولين 

الأول /للأجهزه 
الثاني/ لعمليات الأستلام والتسليم

سؤالي/

كيف يمكنني عند عرض جميع الأجهزه في DataGridView بحيث أضيف لها عمود جديد يحسب لي كم مره تم تسليم الجهاز مره من جدول الأستلام والتسليم وماهو الحدث المناسب لوضع الكود فيه 

وشكراَ


RE: سؤال بخصوص القريد - DOX.1 - 30-08-24

لازال السؤال بدون إجابة


RE: سؤال بخصوص القريد - justforit - 30-08-24

(30-08-24, 01:51 AM)DOX.1 كتب : لازال السؤال بدون إجابة


شوف صورة مثال :



PHP كود :
Public Class Form1
    Dim str 
As String "provider=microsoft.ace.oledb.12.0;data source=db1.accdb"
 
   Dim dt As New DataTable
    Dim con 
As New OleDb.OleDbConnection(str)
 
   Dim da As OleDb.OleDbDataAdapter
    Sub gd
()
 
       da = New OleDb.OleDbDataAdapter("SELECT tb1.tname, count(tb2.tb1id) AS [count]
FROM tb1, tb2
WHERE tb2.tb1id=tb1.tid
GROUP BY tb1.tname;
"
con)
 
       da.Fill(dt)
 
       Me.DataGridView1.DataSource dt
    End Sub
    Private Sub Button1_Click
(sender As ObjectAs EventArgsHandles Button1.Click
        gd
()
 
   End Sub
End 
Class 



RE: سؤال بخصوص القريد - DOX.1 - 30-08-24

(30-08-24, 02:20 AM)justforit كتب :
(30-08-24, 01:51 AM)DOX.1 كتب : لازال السؤال بدون إجابة


شوف صورة مثال :



PHP كود :
Public Class Form1
    Dim str 
As String "provider=microsoft.ace.oledb.12.0;data source=db1.accdb"
 
   Dim dt As New DataTable
    Dim con 
As New OleDb.OleDbConnection(str)
 
   Dim da As OleDb.OleDbDataAdapter
    Sub gd
()
 
       da = New OleDb.OleDbDataAdapter("SELECT tb1.tname, count(tb2.tb1id) AS [count]
FROM tb1, tb2
WHERE tb2.tb1id=tb1.tid
GROUP BY tb1.tname;
"
con)
 
       da.Fill(dt)
 
       Me.DataGridView1.DataSource dt
    End Sub
    Private Sub Button1_Click
(sender As ObjectAs EventArgsHandles Button1.Click
        gd
()
 
   End Sub
End 
Class 




group by  لا تظهر الأجهزه المستلمه بصفر تظهر النتيجة للأجهزه فقط


RE: سؤال بخصوص القريد - justforit - 30-08-24

(30-08-24, 02:39 AM)DOX.1 كتب : group by  لا تظهر الأجهزه المستلمه بصفر تظهر النتيجة للأجهزه فقط

ياليت تساعدني عشان اساعدك لو ترفع مشروعك او تعمل واحد بسيط افضل لمعرفة الخطا لاني اطبق على مثال جديد و قد ( او بالتاكيد) تحتلف بنية الجدول عندك عن اللتي عندي واللتي صممتها للتو .


RE: سؤال بخصوص القريد - DOX.1 - 31-08-24

شكرا لك على وقتك وجهدك 

[attachment=29724]

الفكرة تقريباً كذا 

السؤال كيف أسند القيمه مقابل كل جهاز في القريد


RE: سؤال بخصوص القريد - justforit - 31-08-24

(31-08-24, 11:14 AM)DOX.1 كتب : شكرا لك على وقتك وجهدك 



الفكرة تقريباً كذا 

السؤال كيف أسند القيمه مقابل كل جهاز في القريد

بعد اذنك اعدت رفع الصورة لتكون مرئية للجميع فلعلها تساعد في تقديم المساعدة لانه لابد من تسجيل الدخول لتظهر (قبل هذه الخطوة اقصد)

هل انت تخزن بياناتك في اكسل؟
لاني قدمت مشاركتي على ان التخزين في اكسس.