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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة (/showthread.php?tid=28004)

الصفحات: 1 2


محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - Mohamed Magdy - 23-12-18

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


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - اللورد محمود - 23-12-18

اخي العزيز اطرح احد محاولاتك وفين وقفت علشان الاخوه يساعدوك 
على العموم في موقع ممكن يفيدك في ربط قاعدة البيانات بالفيجوال 
https://www.connectionstrings.com/
ودي ربط mysql 
https://www.connectionstrings.com/mysql/
انا استفدت منه كثييييييييييييييييييييييييير


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - حريف برمجة - 23-12-18

(23-12-18, 02:54 PM)Mohamed Magdy كتب : انا يجماعة عايز شرح انى اقدر اعمل قاعدة بينات على اسطضافة واقدر اربطها بي البرنامج فيجوال بيسك مع الاكواد تبعا لانى جربت اكثر من طريقة على النت وكلها تفشل فى الاخر فلو حد يتكرم ويسعدنى يكون جزاة الله خير وشكرا لكم ويكون الشرح على الاسطضافة  Heart Heart

أولا تأكد ان السيرفر يدعم ريموت كونيكشن (Remote Connection)

ثانياً : ابحث عن تصميم داتابيز ماي اسكيوال واعملها على الاستضافة .

ثالثاً : من الفيجوال ستوديو نفس الكود وكأنك تتعامل مع قواعد اكسيس او اسكيوال سيرفر فقط يتم تغيير :


كود :
Dim Cmd As New SqlCommand to Dim Cmd As New MySqlCommand

or


كود :
Dim Cmd As New OleDbCommand to Dim Cmd As New MySqlCommand


كود :
SqlDataAdapter to MySqlDataAdapter

….etc

بالنسبة لكود الاتصال بالداتا بيز كالتالي :

كود :
Dim conn As New MySqlConnection("Server=aaa.net;User Id=username;Password=password;Database=databasename")


مع استيراد مكتبة ماي اسكيوال للدوت نت :

كود :
Imports MySql.Data.MySqlClient


المكتبة في المرفقات اذا احتجتها .


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - Mohamed Magdy - 23-12-18

[attachment=20436 كتب :حريف برمجة pid='134429' dateline='1545587429']
(23-12-18, 02:54 PM)Mohamed Magdy كتب : انا يجماعة عايز شرح انى اقدر اعمل قاعدة بينات على اسطضافة واقدر اربطها بي البرنامج فيجوال بيسك مع الاكواد تبعا لانى جربت اكثر من طريقة على النت وكلها تفشل فى الاخر فلو حد يتكرم ويسعدنى يكون جزاة الله خير وشكرا لكم ويكون الشرح على الاسطضافة  Heart Heart

أولا تأكد ان السيرفر يدعم ريموت كونيكشن (Remote Connection)

ثانياً : ابحث عن تصميم داتابيز ماي اسكيوال واعملها على الاستضافة .

ثالثاً : من الفيجوال ستوديو نفس الكود وكأنك تتعامل مع قواعد اكسيس او اسكيوال سيرفر فقط يتم تغيير :


كود :
Dim Cmd As New SqlCommand to Dim Cmd As New MySqlCommand

or


كود :
Dim Cmd As New OleDbCommand to Dim Cmd As New MySqlCommand


كود :
SqlDataAdapter to MySqlDataAdapter

….etc

بالنسبة لكود الاتصال بالداتا بيز كالتالي :

كود :
Dim conn As New MySqlConnection("Server=aaa.net;User Id=username;Password=password;Database=databasename")


مع استيراد مكتبة ماي اسكيوال للدوت نت :

كود :
Imports MySql.Data.MySqlClient


المكتبة في المرفقات اذا احتجتها .

شكرا يا حبي انا اعمل بى اسطضافة دى 
smarterasp.net
وانا بدى اربطها بى الفييجوال بيسك ومساعدة كمان انا بدى اعدل على هاذا المرفق من حيث انوة هو قاعدة بينات اساس لا اخليها mysql كان الاخ الجوكر عملهولى من قبل وشكراا جزيلا


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - حريف برمجة - 23-12-18

يا أخي لتجد الإجابة بشكل اسرع ،،

ضع مثال واشرح المطلوب بشكل كافي وواضح .


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - Mohamed Magdy - 24-12-18

(23-12-18, 11:55 PM)حريف برمجة كتب : يا أخي لتجد الإجابة بشكل اسرع ،،

ضع مثال واشرح المطلوب بشكل كافي وواضح .

انا كنت طالب فى موضوع انوة اقدر اخلى 4 مستخدمين على البرنامج ولو حد 5 جية يخش البرنامج يرفض دا ويجيلوة مسج بوكس يقولة انوة البرنامج مذدحم والاخ الجوكر اعطانى المرفقات الملف المسمة pro يوجد بية قاعدة البينات اساس والتانى يوجد بية سورس كود البرنامج انا بدى بقا اخلى الاتصال بدل ما هو من قاعدة اساس اخلية من قاعدة mysql من الاسطضافة 
ودا لينك الموضوع 
http://vb4arb.com/vb/showthread.php?tid=27148


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - Mohamed Magdy - 24-12-18

يعتى 86 واحد مش عرفين يحول اتصال قاعدة بينات من اساس لى mysql يعنى Sad


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - حريف برمجة - 25-12-18

(24-12-18, 11:07 PM)Mohamed Magdy كتب : يعتى 86 واحد مش عرفين يحول اتصال قاعدة بينات من اساس لى mysql يعنى Sad

ممكن تشرح ايش تريد بالصور ...

وضع المثال الذي تريد تعديله ... وان شاء الله تجد الحل بشكل عاجل .


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - Mohamed Magdy - 25-12-18

(25-12-18, 01:00 AM)حريف برمجة كتب :
(24-12-18, 11:07 PM)Mohamed Magdy كتب : يعتى 86 واحد مش عرفين يحول اتصال قاعدة بينات من اساس لى mysql يعنى Sad

ممكن تشرح ايش تريد بالصور ...

وضع المثال الذي تريد تعديله ... وان شاء الله تجد الحل بشكل عاجل .
اريد يا اخى برمجة نافذة دخول تستحمل 4 اشخاص فقط واذا دخل شخص 5 يرفض ذالك ويئتية مسج بوكس يقول ان البرنامج مذدحم واذا خرج احد المستخدمين ال4 يستطيع مستخدم اخر الدخول مكانوة انا اريد مرفق لى البرنامج على زالك مع ربط قاعدة mysql لانى لا اعرف كيف اعملها 
واما بى النسبة لى الصور لا اعرف عمل اى مثال لها


RE: محتاج شرح عمل قاعدة بينات mysql وربطها بى البرنامج من الاسطضافة - حريف برمجة - 25-12-18

هذا اللي فهمته من طلبك ،، وهي فكرة تحديد عدد مستخدمين البرنامج وتكون كالتالي :

في جدول المستخدمين تعمل حقل إضافي وليكن اسمه (userstate) نوعه رقمي يحمل القيم التالية (1 ، 0)

0 = غير متصل بالبرنامج (بمعنى لم يدخل بياناته في شاشة دخول البرنامج أو ان المستخدم خرج من البرنامج)
1 = المستخدم مازال داخل البرنامج .

وعند عملية دخول المستخدم تعمل استعلام .


كود :
Dim cmd As New SqlCommand("Select SUM(userstate) From usertable", conn)
       conn.Open()
       If cmd.ExecuteScalar > 4 Then
         
msgbox("المتصلين بالبرنامج عدد خمسة مستخدمين لا يمكنك استخدام التطبيق حالياً")
Application.Exit()

       End If
       conn.Close()