السلام عليكم شباب ان شاء الله اقدم ليكم الاصدار التانى من مكتبة (alysbisydata)
الجديد فى الاصدار ده هو اول حاجة المكتبة تقدر تعمل مع الاوات الاتى
TextBox
DateTimePicker
RichTextBox
MaskedTextBox
NumericUpDown
Label
LinkLabel
DomainUpDown
CheckBox
RadioButton
PictureBox
ComboBox
ListBox
DateTimePicker
RichTextBox
MaskedTextBox
NumericUpDown
Label
LinkLabel
DomainUpDown
CheckBox
RadioButton
PictureBox
ComboBox
ListBox
و تاجى حاجة الجديده فى المكتبة ان ايه اده من لى فوق موجود دخل الاداء GroupBox
برضو المكتبة هتقدر تخد البيانات
طيب ممكن واحد يقولى كل ده عادى ان المكتبة المفروض ان هى تتعمل مع اكتر من اده فى وقت واحد؟
الاجابة هقولك كلامك صح بس تعال شوف ايه الجديد!!
فى الاصدر الاول كاذا فى مشكلة و هى؟
بتخد كل البيانات فى التكست و تحطها فى قاعدة البيانات و لكن فى حالو وجود اكتر من تكست فى الفروم كان بيظهر خطاء فى الاضافة و المشروع يقف ؟ صح
الحل هو الاصدر التانية من المكتبة احط كل الادوات لى عايزها برحتك و المكتبة الجديد هتقدر تتعامل لوحده و هقولك مثلا
عمل مشروع جديد و حط فى المشروع كل الاودات لى كتبتها فوق دى و عمل قاعدة بيانات و اكتب اسماء الحقول كده
(names,datatimes,mony)
بعد كده غير اسم TextBoxالى الاسم names و الاداه DateTimePicker الى datatimes و الاداه NumericUpDown الى mony
و كتب اكود المكتبة ده فى حالة استخدم قاعدة بيانات اكسس
برضو المكتبة هتقدر تخد البيانات
طيب ممكن واحد يقولى كل ده عادى ان المكتبة المفروض ان هى تتعمل مع اكتر من اده فى وقت واحد؟
الاجابة هقولك كلامك صح بس تعال شوف ايه الجديد!!
فى الاصدر الاول كاذا فى مشكلة و هى؟
بتخد كل البيانات فى التكست و تحطها فى قاعدة البيانات و لكن فى حالو وجود اكتر من تكست فى الفروم كان بيظهر خطاء فى الاضافة و المشروع يقف ؟ صح
الحل هو الاصدر التانية من المكتبة احط كل الادوات لى عايزها برحتك و المكتبة الجديد هتقدر تتعامل لوحده و هقولك مثلا
عمل مشروع جديد و حط فى المشروع كل الاودات لى كتبتها فوق دى و عمل قاعدة بيانات و اكتب اسماء الحقول كده
(names,datatimes,mony)
بعد كده غير اسم TextBoxالى الاسم names و الاداه DateTimePicker الى datatimes و الاداه NumericUpDown الى mony
و كتب اكود المكتبة ده فى حالة استخدم قاعدة بيانات اكسس
كود :
[align=left][b][SIZE=3] Dim aly As New alysbisy.Class1
aly.adddatasql(Me,"اسم الجدول", "نص الاتصال")[/SIZE][/b][/align]
و شغل المشروع هتلقى ان تم الاضافة لقاعدة البيانات بدون ايه مشكلة ان فى ادوت تانية غير ادوت قاعدة البيانات
وو كده اكون شرح المكتبة الجديد (alysbisydata)
نجى فى طريقة الاستخدم للاصدرا التانى و هو
من قائمة Project اختر Add Reference
اختر Browse ثم اختر مكان المكتبة
ثم Ok
و ده كود لقاعدة بيانات سيكوال
وو كده اكون شرح المكتبة الجديد (alysbisydata)
نجى فى طريقة الاستخدم للاصدرا التانى و هو
من قائمة Project اختر Add Reference
اختر Browse ثم اختر مكان المكتبة
ثم Ok
و ده كود لقاعدة بيانات سيكوال
Dim aly As New alysbisy.Class1
aly.adddatasql(Me, "اسم الجدول", "نص الاتصال")
aly.adddatasql(Me, "اسم الجدول", "نص الاتصال")
و ده لقاعدة بيانات اكسس
كود :
[b]Dim aly As New alysbisy.Class1
aly.adddataAccess(Me, "اسم الجدول", "نص الاتصال")[/b]
[video=youtube;eWtOtElZWxA]http://www.youtube.com/watch?v=eWtOtElZWxA&feature=youtu.be[/video]