منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : سبب عدم رغبتي في تعلم الفيجوال دون نت قد تجدون الأمر مضحك
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام على كل الأعضاء



والله إخواني لو أخبرتكم سبب عدم رغبتي في تعلم الفيجوال دون نت قد تجدون الأمر مضحك
وقد يوافقني البعض الرأي

بكل بساطة
سببي في عدم اهتمامي بالدوت نت هي طريقة تعامله مع قاعدة البيانات بطريقة معقدة وغير سلسة
فلقد ألفت التعامل في الفيجوال 6 الطريقة الجميلة والبسيطة والواضحة في ربط قواعد البيانات

فمثلا كود الحفض في الفيجوال 6

Rs.Fields!Datee = Text10.Text
Rs.Fields!Nom = Text11.Text
Rs.Fields!Prénom = Text14.Text

Rs.Update


في حين أجد في الدوت نت كثير من الأكواد المعقدة 


لقد تتبعت الكثيير الكثيير من الكتب دون النت التي تشرح ذلك بالتفصيل سواء الوضع المتصل أو المنفصل

لكن لم أجد طريقة واضحة للتعامل مع قواعد البيانات مثل  الفيجوال 6 

أرجوا أن أكون خاطء في بحثي لأني أريد الانتقال الى الدوت نت

شكرا كثيرا
هل تصدق اني اعتبر vb6.0 هو الاكثر تعقيدا؟؟؟
من جد هذا مااحس به.
الدوت نت سهل وبسيط جدا والدليل كثرة الامثلة والشروح سواء شروح فيديو او كتب جرب وابحث في يوتيوب عن .net databindings
لا اخي بالعكس الدوت نيت اسهل بكثير و لغة سلسة و سهلة التعلم .................. و اليك بعض الدورات لعلها تفيدك

دورة الاستاذ محمد البحراوي
http://www.youtube.com/channel/UCjmZcOZ0Q9rQ6IA7zyB-79w

و دورة الاستاذ حمد النجار .....
https://www.youtube.com/playlist?list=PL...LMpBJ10rSF
(08-12-14, 10:12 PM)sniperjawadino كتب : [ -> ]السلام على كل الأعضاء



والله إخواني لو أخبرتكم سبب عدم رغبتي في تعلم الفيجوال دون نت قد تجدون الأمر مضحك
وقد يوافقني البعض الرأي

بكل بساطة
سببي في عدم اهتمامي بالدوت نت هي طريقة تعامله مع قاعدة البيانات بطريقة معقدة وغير سلسة
فلقد ألفت التعامل في الفيجوال 6 الطريقة الجميلة والبسيطة والواضحة في ربط قواعد البيانات

فمثلا كود الحفض في الفيجوال 6

Rs.Fields!Datee = Text10.Text
Rs.Fields!Nom = Text11.Text
Rs.Fields!Prénom = Text14.Text

Rs.Update


في حين أجد في الدوت نت كثير من الأكواد المعقدة 


لقد تتبعت الكثيير الكثيير من الكتب دون النت التي تشرح ذلك بالتفصيل سواء الوضع المتصل أو المنفصل

لكن لم أجد طريقة واضحة للتعامل مع قواعد البيانات مثل  الفيجوال 6 

أرجوا أن أكون خاطء في بحثي لأني أريد الانتقال الى الدوت نت

شكرا كثيرا

بلعكس اخي لغة vb.net كثرة الكواد يدل على كثرة التعامل معه يعني في vb6 اشياء لو تقعد سنه ماتحصله اما vb.net لغة يمكن تكون معقدة شوي عندك طبعنا بس فيه اشياء عمرك ما تتخيله وهم ما طورو هذاي اللغة الى ان احسن من vb6

هذا مثال قد يؤنسك لانه باستخدام المكون BindingSource
وهذا كلاس الفورم
كود :
Public Class Form1
   Dim str As String = "provider=microsoft.ace.oledb.12.0;data source=|datadirectory|\db.accdb"
   Dim con As New OleDb.OleDbConnection(str)
   Dim sql As String = "select * from tb"
   Dim dt As DataTable
   Dim bs As BindingSource
   Dim da As OleDb.OleDbDataAdapter
   Dim cm As OleDb.OleDbCommandBuilder

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       dt = New DataTable
       bs = New BindingSource
       da = New OleDb.OleDbDataAdapter(sql, con)
       cm = New OleDb.OleDbCommandBuilder(da)
       da.Fill(dt)
       bs.DataSource = dt

       tid.DataBindings.Add("text", bs, "tid")
       tn.DataBindings.Add("text", bs, "tn")
       age.DataBindings.Add("text", bs, "age")
       mo.DataBindings.Add("text", bs, "mo")

       d.DataSource = bs


   End Sub

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       bs.MoveNext()
   End Sub

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       bs.MovePrevious()
   End Sub

   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
       bs.MoveFirst()
   End Sub

   Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
       bs.MoveLast()
   End Sub

   Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
       If MsgBox("هل انت متاكد من رغبتك باضافة صف جديد؟", MsgBoxStyle.YesNo) = MsgBoxResult.No Then Exit Sub
       bs.AddNew()
   End Sub

   

   Private Sub btnupd_Click(sender As Object, e As EventArgs) Handles btnupd.Click
       If MsgBox("هل انت متاكد من رغبتك بحفظ ", MsgBoxStyle.YesNo) = MsgBoxResult.No Then Exit Sub
       bs.EndEdit()
       da.Update(bs.DataSource)
   End Sub

   Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
       If MsgBox("هل انت متاكد من رغبتك بحفظ الصف الحالي كمعدل؟", MsgBoxStyle.YesNo) = MsgBoxResult.No Then Exit Sub
       Dim drv As DataRowView = bs.Current
       drv(1) = tn.Text
       drv(2) = age.Text
       drv(3) = mo.Text
     
   End Sub
End Class
أشكركم إخواني
شكرا raoe-041 على تلك الدورات وأعدك بمشاهدتها
شكرا hassan

وشكرا سعود على المثال الجميل الذي سأحاول العمل عليه
وتغيير نضرتي على دوت نت
شكرا لك أخي
وعليكم السلام أخوي.


من وجهة نظري إن قواعد البيانات في vb.net هي أسهل بكثير جداً ربما أنت قمت بتجربة الوضع المنفصل ولكن الوضع المتصل أسهل بكثير جداً .




المثال التالي لأخونا العزيز Ramilove ومن الممكن ان تستخدمها مع SQL Server مع تعديل طفيف بالأكواد .


[attachment=6205]
معك حق أخي Omar Mekkawy لقد جربت الوضع المنصل
وسأحاول الاستفادة من المثال

شكرا لك
غلطان ياخوي

يكفي وجود تقنيات مثل Linq2SQL و EF6 هذي لوحدها تسوى الVB6 وطوايفها

وايضا توجد تقنية حديثة في الدوت نت تسمى Lightswitch ، من خلالها تستطيع بناء تطبيقات كاااااملة تتعامل مع قواعد البيانات بدون كود (اي اكواد الحذف والاضافة والتعديل كلها مدمجة في التطبيق)

لاتقارن الدوت نت بالvb6 بصراحة وخاصة من هذه الناحية
الصفحات : 1 2