منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مرحبا شباب ... اللي يريد يساعدني يرفع يده ويفتح الموضوع فورًا - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : Microsoft SQL Server (http://vb4arb.com/vb/forumdisplay.php?fid=171)
+--- الموضوع : مرحبا شباب ... اللي يريد يساعدني يرفع يده ويفتح الموضوع فورًا (/showthread.php?tid=40581)

الصفحات: 1 2


RE: مرحبا شباب ... اللي يريد يساعدني يرفع يده ويفتح الموضوع فورًا - aliday03 - 11-02-22

السلام عليكم
ممكن تنزل القاعدة و سوف أنشأ لك قاعدة على السيكوال سيرفر
أما تحويل البيانات فالمسألة بسيطة إن شاء الله


RE: مرحبا شباب ... اللي يريد يساعدني يرفع يده ويفتح الموضوع فورًا - رضوان الجماعي - 20-03-22

(29-01-22, 12:24 PM)أبو خالد الشكري كتب : أهلا بك أخي رضوان

يبدو أنه لن يرد عليَّ أحد من هذا القسم

المشرفون على هذا القسم مشغولون غير فاضين لمطالب الأعضاء

أنا سأحذف هذا الموضوع في وقت لاحق من اليوم !
اسف تاخرت البرنامج كبير ممكن اضغطه لك وارسله عبر الوتس اب تمكن من الحصول على اصدار ٢٠١٧ وتأخرت بسبب القرائه في هذا المجال والحمد لله بامكاني اقول اني مبتدا الان في sql وبخلفيه ممتازه


RE: مرحبا شباب ... اللي يريد يساعدني يرفع يده ويفتح الموضوع فورًا - رضوان الجماعي - 30-03-22

(29-01-22, 06:18 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخوتي ابو خالد الشكري - رضوان الجماعي 
التعامل مع الـ SQlServer  هو 90% مثل Access
الفرق جملة الاتصال ومكتبة الاتصال 
حيث مع الاكسس نستخدم Imports System.Data.Oledb   اما السكوال فنستخدم Imports System.Data.SqlClient
واكواد الحفظ والتعديل والحذف نفسها سواء بالوضع المنفصل او المتصل والفرق استبدال Oledb  بـ Sql
لاحظ الكود التالي لجلب لبيانات  مع الاكسس 
كود :
Public Sub SelectAll_Mycode()
       Try
           Dim dt As New DataTable()
           Dim Cmd As New OleDbCommand()
           dt.Clear()
           Cmd = New OleDbCommand("Select * from Mycode", Con)
           If Con.State = ConnectionState.Open Then Con.Close()
           Con.Open()
           dt.Load(Cmd.ExecuteReader())
           Con.Close()
           Dgv_Table.DataSource = (dt)
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub
مع الـ SqlServer
كود :
Public Sub SelectAll_Mycode()
       Try
           Dim dt As New DataTable()
           Dim Cmd As New SqlCommand()
           dt.Clear()
           Cmd = New SqlCommand("Select * from Mycode", Con)
           If Con.State = ConnectionState.Open Then Con.Close()
           Con.Open()
           dt.Load(Cmd.ExecuteReader())
           Con.Close()
           Dgv_Table.DataSource = (dt)
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub
 لايوجد اي اختلاف الا 
OleDbCommand
SqlCommand
وبقية الاكواد كذلك 
هناك بعض الاختلافات البسيطة بين الاثنين
تشجعوا وادخلوا عالم السيكوال سيرفر والمنتدى واعضاء المنتدى بخدمتكم في اي سؤال
جزيت خيرا استاذ ابراهيم الحمد لله تمكنت من sql كم ممتع جدا وكل هذا بفضل الله ثم توجيهاتك. خالص احترامي