-
الإعلانات
-
تسجيل عضوية جديدة في المنتدى 01/31/2016
السلام عليكم ورحمة الله وبركاته عزيزي العضو الجديد : حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة ) فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK) وقم بتفعيل إشتراككم من هناك
-

atefkhalf2004
اعضاء-
عدد المشاركات
256 -
تاريخ الانضمام
-
تاريخ اخر زياره
السمعه بالموقع
2 عاديعن atefkhalf2004
-
الرتبة
عضو
-
عايز اقسم طلاب الي عدد مجموعات
atefkhalf2004 رد على atefkhalf2004's موضوع في قسم تكنولوجيا Microsoft .NET العام
اين الكود حضرتك لم استطيع -
عايز اقسم طلاب الي عدد مجموعات
atefkhalf2004 رد على atefkhalf2004's موضوع في قسم تكنولوجيا Microsoft .NET العام
السيد الفاضل الاسماء معروضة في جريد كالاتي م الاسم الدرجة المجموعة 1 عاطف 12 2 علي 13 3 سبد 6 4 محمود 55 5 مصطفي 8 برجاء تقسيم بحيث يظهر بالجريد كالتالي م الاسم الدرجة المجموعة 1 عاطف 12 1 2 علي 13 1 3 سبد 6 2 4 محمود 55 2 5 مصطفي 3 -
عايز اقسم طلاب الي عدد مجموعات
atefkhalf2004 رد على atefkhalf2004's موضوع في قسم تكنولوجيا Microsoft .NET العام
الاستاذ الفاضل لم افهم اي شيء برجاء عمل مثال بسيط -
atefkhalf2004 بدأ بمتابعة عايز اقسم طلاب الي عدد مجموعات
-
السادة الافاضل لو عندي داتا جريد بها اسماء م الاسم المحموعة عايز اقسمهم الي عدد مجموعات بحيث يكون النقص في اخر مجموعة مثلا لو العدد 17 وارغب في تقسيمهم الي 3 مجموعات يكونوا 6 6 5 اي يكون الرقم الظاهر في عمود المجموعة الرقم 1 يظهر امام اول 6 افراد ثم الرقم 2 امام 6 التالي ثم الرقم 3 امام اخر 5 شكرا
-
توصلت الي خذا الكود Dim connect As String = "Provider=Microsoft.Jet.OLEDB.4.0 ;Jet OLEDB:Database Password='123321';Data Source=" & Application.StartupPath & "\dbkarneh.mdb" Using conn As New OleDbConnection(connect) Using cmd As New OleDbCommand() cmd.Connection = conn cmd.CommandText = "SELECT * INTO [MS Access;Database Password='123321';Data Source=" & Application.StartupPath & "\dbkarneh1.mdb].[student] FROM [student]" conn.Open() cmd.ExecuteNonQuery() End Using End Using MsgBox("تم التسويه بنجاح", MsgBoxStyle.Information + MsgBoxStyle.MsgBoxRight, " ") لكن يعطي خطأ Invalid argument.
-
كيف يمكن نسخ جدول من قاعدة الي اخري جملة الاتصال بالقاعدة الاولي Dim objconn As OleDbConnection = New OleDbConnection("Provider=Microsoft.jet.OLEDB.4.0; data source =" & Application.StartupPath & "\salse.mdb") مسج الجدول القديم If objconn.State = ConnectionState.Open Then objconn.Close() Dim SavInto6 As New OleDb.OleDbCommand SavInto6.Connection = objconn SavInto6.CommandType = CommandType.Text SavInto6.CommandText = "drop TABLE items " objconn.Open() SavInto6.ExecuteNonQuery() objconn.Close() اظهار مربع جواري Dim openFileDialog1 As New OpenFileDialog openFileDialog1.Filter = "Access|*.mdb" openFileDialog1.FilterIndex = 1 openFileDialog1.RestoreDirectory = False If openFileDialog1.ShowDialog = Windows.Forms.DialogResult.Cancel Then Exit Sub If openFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then fileName = openFileDialog1.FileName End If جملة الاتصال بالقاعدة الثانية Dim accConnection As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0 ; Data Source= '" & fileName & "' ") SavInto6.Connection = objconn SavInto6.CommandType = CommandType.Text SavInto6.CommandText = "كيف انسخ الجدول من القاعدة الاولي الي الثانية " objconn.Open() SavInto6.ExecuteNonQuery() objconn.Close() شكرا
-
السيد الفاضل برجاء جملة ال select حتي يظهر الاعداد
-
حاولت ارفع القاعدة لم استطع
-
If Conn.State = ConnectionState.Open Then Conn.Close() 'ds.Clear() Dim ds6 As New DataSet ds6.Clear() Dim sqlstr6 As String = "select (select count (id) from student where kind='ذكر') as Males, (select count (id) from student where kind='انثي') as Females " Dim dt6 As New OleDbDataAdapter(sqlstr6, Conn) dt6.Fill(ds6, sqlstr6) Conn.Close() MsgBox(ds6.Tables("").Rows(0).Item("Males").ToString)
-
hالسادة برجاء فتح القاعدة
-
لم ينفذ معي فكرت في حل اقسم الاستعلام حتي اصل الي الحل select (select count (id) from table1 where kind='mal' ) as males, (select count(id) from talbe1 where kind='femail' ) as femals لكن لم يفي بالحل ما الحل
-
السادة الافاضل جملة select count تعد عدد السجلات كيف يتم عدد الذكور وايضا عدد الاناث وعدد الناجحين وعدد الراسبين وذلك في جملة واحدة select count (id) from table1 where kind="male select count (id) from table1 where kind="female select count (id) from table1 where kind="pass" select count (id) from table1 where kind="fale كيف يتم تجميع هذه الجمل في جملة واحدة حتي يتم طباعة التقرير او عرضهم في جريد شكرا
-
القاهدة salse (2).rar
-
atefkhalf2004 بدأ بمتابعة فجاة القاعدة لا تفتح
-
كنت استخدم القاعدة ضمن برنامج vb.net وفجاة اصبحت لا تعمل
-
جمع مجموعة اعداد كل مجموعة غلي حدة مع مجموع الاعداد
atefkhalf2004 رد على atefkhalf2004's موضوع في Microsoft Visual Basic.NET
شكرا كيف يتم عمل مصفوفة خاصة عدد العناصر يمكن ان يتعير