تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تعديل على المشروع فى قاعدة بيانات mysql
#1
انا عملت فروم login.vb     وعملت قاعدة بيانات للاتصال بها وبعد الاتصال يظهر فروم loadin.vb وبعدها مباشرة يظهر بعد التحميل فروم prog.vb

- دا كلة قمت الانتهاء به الحمدلله

وتم بالفعل الاتصال بقاعدة البيانات بنجاح   ولكن انا عملت فروم register لاضافة الاعضاء الى قاعدة البيانات

- الجداول التى تم انشأوها 


user_id
user_name
user_email
user_pass


  فروم register    يتكون من ( الاسم - الايميل - الباسورد )

- وهل من الممكن ظهور الـ user  فى فروم prog.vb     بمعنى welcome  user


   التعديل الاخير
الرد
تم الشكر بواسطة:
#2
اريد ادخال بيانات عن طريق فروم التسجيل لتغذية هذة الجداول بالقاعدة
user_id
user_name
user_email
user_pass
الرد
تم الشكر بواسطة:
#3
أخي الكريم وجدت هذا الموضوع ان شاء الله يفيدك
http://vb4arb.com/vb/thread-12865.html
الرد
تم الشكر بواسطة:
#4
فعلت ذلك لم تظبط معى
الرد
تم الشكر بواسطة:
#5
استعملت الجمل Insert INto ,ولكن لم اعرف استخدامها بشكل صحيح على المشروع

كل ال محتاجة تعديل فروم register
الرد
تم الشكر بواسطة:
#6
شكرا اخى هل سيتم التعديل على المشروع ؟
الرد
تم الشكر بواسطة:
#7
هل سيتم الاتصال بقاعدة البيانات لم ارى جملة الاتصال بسيرفر mysql
الرد
تم الشكر بواسطة:
#8
ممكن جملة الاتصال بالهوست ويوزر نيم وكلمة المرور واسم قاعدة البيانات لكى يتم الاتصال بقاعدة البيانات مثل فروم login.vb عندى
الرد
تم الشكر بواسطة:
#9
(12-03-16, 04:20 PM)khodor1985 كتب : في النموذج عندك لاسمه : register
قم باستدعاء المكتبة التالية :
PHP كود :
Imports System.Data.SqlClient
Imports Sysytem
.Data.MySqlClient 

قم بالإعلان عن المتغيرات التالية في أعلى النموذج :
PHP كود :
Dim con As New MySqlConnection("ضع هنا جملة الإتصال")
 
   Dim cmd As MySqlCommand
    Dim da 
As MySqlDataAdapter
    Dim ds 
As DataSet
    Dim sqlstr 
As String 

ثم ضع الكود التالي في زر الأمر :
PHP كود :
Try
 
           con.Open()

 
           sqlstr "Select * From tblUser Where UsrName=@UsrName"
 
           cmd = New MySqlCommand(sqlstrcon)
 
           cmd.Parameters.Add("@UsrName"MySqlDBType.VarWChar).Value txtUser.Text

            If cmd
.ExecuteScalar 0 Then
                MsgBox
("User exists in tblUser")
 
               con.Close()
 
               Return

            End 
If


 
           sqlstr "Insert Into tblUser(UsrName,UsrPassword) Values (@UsrName,@UsrPassword)"
 
           cmd = New MySqlCommand(sqlstrcon)
 
           cmd.Parameters.Add("@UsrName"MysqlDBType.VarWChar).Value txtUser.Text
            cmd
.Parameters.Add("@UsrPassword"MySqlDBType.VarWChar).Value txtPass.Text

            cmd
.ExecuteNonQuery()
 
           MsgBox("User added successfully")
 
           con.Close()
 
       Catch ex As Exception
            If con
.State ConnectionState.Open Then con.Close()
 
           MsgBox(ex.Message)
 
       End Try 

استبدل أسماء مربعات النصوص الموجودة في الكود أعلاه بأسماء مربعات النصوص الموجودة عندك في المشروع.


الملفات المرفقة
.rar   dbtest.rar (الحجم : 700 بايت / التحميلات : 46)
الرد
تم الشكر بواسطة:
#10
تحياتى لك اخى على المساعدة وتم الحمدلله عمل المشروع بنجاح وشكرا على الخبرة الكبيرة والتعلم من حضرتك المزيد

اتمنى لك المزيد من النجاح والتفوق
الرد
تم الشكر بواسطة: khodor1985 , khodor1985 , الماجيك مسعد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكله غير منطقيه لا اعرف لها سبب المشروع مرفق اليوم السابع 11 95 منذ 18 دقيقة مضت
آخر رد: اليوم السابع
  سوال عن قاعدة بيانات sql ? nazarakrawi 3 38 منذ 1 ساعه مضت
آخر رد: boudyonline
  [سؤال] مشكلة في الاتصال بقاعدة بيانات اكسس 2003 ناجح احمد 10 186 17-01-20, 10:57 PM
آخر رد: ناجح احمد
  انشاء قاعدة بيانات المتألق9 1 57 13-01-20, 12:28 AM
آخر رد: asemshahen5
  كيفية حذف صف من قاعدة البيانات باستخدام الكومبوبكس الرائد 3 104 12-01-20, 09:27 PM
آخر رد: عبد العزيز البسكري
  مشكلة في تعديل البيانات باستخدام جملة update جيولوجي مبتدئ 4 122 12-01-20, 01:53 AM
آخر رد: عبد العزيز البسكري
  ممكن المساعده في هذا المشروع اليوم السابع 2 106 10-01-20, 05:41 PM
آخر رد: ابو ليلى
  الترقيم التلقائى للخانة id فى المشروع المرفق المبرمج العتيق 5 386 09-01-20, 04:55 PM
آخر رد: asemshahen5
  سؤل في قاعده بيانات sql اليوم السابع 1 85 08-01-20, 09:51 AM
آخر رد: محمود بكرى
  [VB.NET] جملة الاتصال بقاعدة بيانات MDF mne3000 2 96 08-01-20, 05:04 AM
آخر رد: اسامه الهرماوي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم