السلام عليكم ايها الاخوة الكرام حياكم الله و اهلا و يهلا بكم في الدرس الاول من هاته السلسلة الجميلة الهادفة للرقي الى الاحتراف عن طريق التحكم في sql server من داخل الفيجوال بيسك.
هاته السلسلة سيكون فيها اشياء كثيرة و مفيدة و لن تكون فيها ملفات مرفقة لان في الاصل هو التعلم لا النسخ و اللصق الدي لن تتعلم منه اي شيء.
فهدفي اخي اختي في الله هو ان تفهم الكود و تطبقه على مثال عندك و تستفيد و تفهم و لا أريد منك شيئا إلى الدعاء لي و للوالدي هدا رجائي فلا تخيب رجائي.
هاته السلسلة ستتصمن الاتي
1-تعبئة الكومبوبوكس بأكماء السيرفر
2-اختيار طريقة الولوج اما windows authentication او sql server authentication
3-اسم المستخدم و كلمة المرور ادا كان الدخول ب sqlserver authentication
4-تعبئة الكومبوبوكس باسماء قواعد البيانات الموجودة داخل السيرفر المختار في الكومبوبوكس الاول
5-إظهار الجداول الموجودة داخل قاعدة البيانات المختارة
6-إظهار المشاهد views الموجودة داخل قاعدة البيانات المختارة
7-إظهار الاجراءات المخزنة الموجودة داخل قاعدة البيانات المختارة
8-انشاء و حدف قاعدة بيانات جديدة من الفيجوال بيسك
9-انشاء و حدف جدول جديدة من الفيجوال بيسك
10-انشاء و حدف اجراءات مخزنة من الفيجوال بيسك
11-انشاء عمليات الاضافة و التعديل و الحدف اوتوماتيكيا
و اشياء اخرى سأضيفها عندما اتدكرها .
و اليوم ان شاء الله سنبدأ بالدرس الاول (تعبئة الكوبوبوكس باسماء السيرفر)
هناك عدة طرق
1- عن طريق ملف dll و هو تابع sql server و دوره يدهب الى الريجيستري و يبحث عن اسماء السيرفرات و عيب هاته الطريقة هو التاخر بحيث تأخد تقريبا 15 الى 20 ثانية لجلب الاسماء
2-عن طريق الريجيستري بمعنى نعطيه مسار الموجود فيه اسماء السيرفر فقط و هاته الطريقة جميلة جدا و خفيفة و سريعة
الفرق بين الطريقتين هو الطريقة الاولى انه يبحث في الريجيستري كله مما يؤدي الى التاخير و الطريقة الثانية نعطيه المسار المناسب فيدهب اليه مباشرة
حتى لا اطيل عليكم افتحوا مشروع جديد اي نسخة من الفيجوال بيسك لا تهم
داخل الفورم اضف كومبوبوكس و اعطه في name التابع له اسم comboserver
الان افتح module جديد و سمه ما تشاء
نبدأ بالطريقة الثانية السهلة المتلخصة في اعطاء المسار المناسب الموجود فيه اسماء السيرفرات
في مكان التصريحات العامة
Imports Microsoft.Win32
بعد دالك عمل اجراء sub
بعد دالك تستدعي الاجراء داخل form_laod
تكتب الاتي
loadNameserver(comboserver)
هاته هي الطريقة الاحسن في جلب اسماء السيرفرات من الريجيستري اما الطريقة الاولى فهي معقدة نوعا ما و ادا اردتم معرفتها ليس لي مانع في شرحها
و في الاخير اتمنى من الله العلي القدير ان اكون قد وفقت لشرح هدا الدرس
و لا تنسوني من صالح دعائكم و اللهم تقبل من الجميع الصيام و القيام و اجعل هدا العمل خالصا لوجهك الكريم امين امين انك ولي دالك و القادر عليه و آخر دعوانا ان الحمد لله رب العالمين و صلي اللهم و سلم على اشرف المخلوقين و على آله و صحبه اجمعين
و السلام عليكم و رحمة الله تعالى و بركاته
ملحوظة : من اعجبه الدرس فليقم بعمل دالك في الاستفتاء كنوع من التشجيع
هاته السلسلة سيكون فيها اشياء كثيرة و مفيدة و لن تكون فيها ملفات مرفقة لان في الاصل هو التعلم لا النسخ و اللصق الدي لن تتعلم منه اي شيء.
فهدفي اخي اختي في الله هو ان تفهم الكود و تطبقه على مثال عندك و تستفيد و تفهم و لا أريد منك شيئا إلى الدعاء لي و للوالدي هدا رجائي فلا تخيب رجائي.
هاته السلسلة ستتصمن الاتي
1-تعبئة الكومبوبوكس بأكماء السيرفر
2-اختيار طريقة الولوج اما windows authentication او sql server authentication
3-اسم المستخدم و كلمة المرور ادا كان الدخول ب sqlserver authentication
4-تعبئة الكومبوبوكس باسماء قواعد البيانات الموجودة داخل السيرفر المختار في الكومبوبوكس الاول
5-إظهار الجداول الموجودة داخل قاعدة البيانات المختارة
6-إظهار المشاهد views الموجودة داخل قاعدة البيانات المختارة
7-إظهار الاجراءات المخزنة الموجودة داخل قاعدة البيانات المختارة
8-انشاء و حدف قاعدة بيانات جديدة من الفيجوال بيسك
9-انشاء و حدف جدول جديدة من الفيجوال بيسك
10-انشاء و حدف اجراءات مخزنة من الفيجوال بيسك
11-انشاء عمليات الاضافة و التعديل و الحدف اوتوماتيكيا
و اشياء اخرى سأضيفها عندما اتدكرها .
و اليوم ان شاء الله سنبدأ بالدرس الاول (تعبئة الكوبوبوكس باسماء السيرفر)
هناك عدة طرق
1- عن طريق ملف dll و هو تابع sql server و دوره يدهب الى الريجيستري و يبحث عن اسماء السيرفرات و عيب هاته الطريقة هو التاخر بحيث تأخد تقريبا 15 الى 20 ثانية لجلب الاسماء
2-عن طريق الريجيستري بمعنى نعطيه مسار الموجود فيه اسماء السيرفر فقط و هاته الطريقة جميلة جدا و خفيفة و سريعة
الفرق بين الطريقتين هو الطريقة الاولى انه يبحث في الريجيستري كله مما يؤدي الى التاخير و الطريقة الثانية نعطيه المسار المناسب فيدهب اليه مباشرة
حتى لا اطيل عليكم افتحوا مشروع جديد اي نسخة من الفيجوال بيسك لا تهم
داخل الفورم اضف كومبوبوكس و اعطه في name التابع له اسم comboserver
الان افتح module جديد و سمه ما تشاء
نبدأ بالطريقة الثانية السهلة المتلخصة في اعطاء المسار المناسب الموجود فيه اسماء السيرفرات
في مكان التصريحات العامة
Imports Microsoft.Win32
بعد دالك عمل اجراء sub
كود :
Public Sub loadNameserver(ByVal combo As ComboBox)
Try
Dim localMachine = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, RegistryView.Registry64)
Dim rk = localMachine.OpenSubKey("SOFTWARE\Microsoft\Microsoft SQL Server")
Dim instances = CType(rk.GetValue("InstalledInstances"), String())
If instances.Length > 0 Then
For Each element As String In instances
If element = "MSSQLSERVER" Then
combo.Items.Add(System.Environment.MachineName)
Else
combo.Items.Add(System.Environment.MachineName + "\" + element)
End If
Next element
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
بعد دالك تستدعي الاجراء داخل form_laod
تكتب الاتي
loadNameserver(comboserver)
هاته هي الطريقة الاحسن في جلب اسماء السيرفرات من الريجيستري اما الطريقة الاولى فهي معقدة نوعا ما و ادا اردتم معرفتها ليس لي مانع في شرحها
و في الاخير اتمنى من الله العلي القدير ان اكون قد وفقت لشرح هدا الدرس
و لا تنسوني من صالح دعائكم و اللهم تقبل من الجميع الصيام و القيام و اجعل هدا العمل خالصا لوجهك الكريم امين امين انك ولي دالك و القادر عليه و آخر دعوانا ان الحمد لله رب العالمين و صلي اللهم و سلم على اشرف المخلوقين و على آله و صحبه اجمعين
و السلام عليكم و رحمة الله تعالى و بركاته
ملحوظة : من اعجبه الدرس فليقم بعمل دالك في الاستفتاء كنوع من التشجيع
التميز و الابداع شعاري