تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اضافة حقل نعم لا بالكود في قاعدة اكسس
#1
عند اضافة الحقل
يظهر علي انه نص وليس نعم لا
alter table edary  ADD  column aaaa yesno
بحثت  ولقيت
لكن هناك خطا في الجملة

alter table edary  ADD  column aaaa yesno  DisplayControl CheckBox
برجاء حل مشكلتي
الرد
تم الشكر بواسطة:
#2
up
up
please
الرد
تم الشكر بواسطة:
#3
لو تضع الكود الذي فيه الخطأ
اعني كود الاضافة
الرد
تم الشكر بواسطة:
#4
الكود في الموضوع مشاركة رقم 1 وبه الخطا.  شكرا
الرد
تم الشكر بواسطة:
#5
القي نظره هنا :

https://stackoverflow.com/questions/5177...able-query

https://stackoverflow.com/questions/2755...ble-in-vba

https://stackoverflow.com/questions/3881...-sql-query
الرد
تم الشكر بواسطة: asemshahen5
#6
شكرا
لكن
هو يضيف الحقل ولكن يظهر علي انه نص
بعد ذلك
يدويا
تفتح القاعدة وتغير الشكل من نص الي checkbox

كيف ذلك برمجيا
الرد
تم الشكر بواسطة:
#7
من فضلكم
اين عباقرة المدرسة
الرد
تم الشكر بواسطة:
#8
مرحباً اخى atefkhalf2004

بخصوص بتحويل عمود aaa من من رقم 0/1 الى خيار yes/no
وعو عن طريق Combo Box كل ما عليك فعله هو 

فتح تصميم الجدول وتقوم بالوقوف على العمود المطلوب aaa
وبالاسفل ستجد قائمة Lookup قم بتنشيطها وطبق كما فى الصورة


لتقوم بتغيير TextBox الى Combo Box

بخصوص YesNo
اى كانت القيمة التى تنتج عن نص او رقم او ما كان الامر
فهو بالاول والاخر عبارة عن 0/1 

فلا يهم طريقة ظهور القيمة بالجدول اذا كان رقم او نص
لان بالنهاية انت من تتعامل معها فى البرمجة فى الفورم من خلال التحقق واستبدال الجمل

وبخصوص الـ lookup ما هو الا اداء يتم التعامل معها يدوياً وليس من خلال الكود
ووظيفتها للتعامل مع قاعدة البيانات قا داتا و مشروع متكامل

حتى يختصر الامر معط فى انشاء الفورم من خلال قاعدة البيانات نفسها او عند اتمام عمل التقارير داخل قاعدة البيانات
وليس للتعامل مع الجدول خارج نطاق قاعدة البيانات مثل Vb.Net

لذلك عندما قلت لا تشغل بالك بطريقة تسجيلا لقيمة اذا كانت 0/1  أو Yes/No أو حتى True/False
لان بالنهاية قاعدة البيانات تقوم بقراءتها فعلياً عبارة عن 0/1 مهما كانت القيمة التى تظهر لك

جرب بنفسك التعديل على اى قيمة خاصة بـ Yes/No لو كانت القيمة No عند الوقوف عليها ستجد تلقائي يتحول الى 0
والعكس اذا كانت القيمة Yes ستجد بمجرد الوقوف عليها ستجد تحول القيمة الى -1 واى انه 1 فكلاهما واحد
لان اى قيمة غير 0 تعنى الموافقة

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


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

الامل طالما هناك منتي وعباقرة
الرد
تم الشكر بواسطة:
#10
بكل تاكيد لكل شئ ولها حل
وكما تقول انه يوجد طريقة من خلال الكود

ولكن قبل ما اوضح الفكرة المقصودة بالكود اريد ان اسالك سؤال...!

هل ما تريده هو مظهر قاعدة البيانات من حيث المظهر ، ام انك تريد مضمون الفعلى للمطلوب فى البرنامج ؟

قاعدة البيانات ما هى الا مظر فقط
ولا يلزم كل ما يكتب بها هو الزامى بمعنى
انا اريد عمل شاشة تسجل مستخدم فلاتمام ذلك
يجب عليا ان اقوم بعمل جدول تحت اسم users أو ما شبه
فبامكانى ان اجعله باسم ty18577 كمثال
وليس لان محتوى الجدول يعتمد على اسم المستخدم وكلمة المرور 
فيصبح عمود الاسم username و الباسور Password
فمن الممكن ان اجعله ty-p15776 وما شبه من مسمى كمثال

ولا يعنى ان اسم المستخدم كا اسم فاننى مجبر ان اجعل النوع نص
فمن الممكن ان استخدمه كا نوع رقم او غيره حيث اقوم بتشفيل الحروف لارقام وما غيره من انواع التشفير

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

انما المضمون الحقيقى والرؤية النهائية هو ما يعرض فى البرنامج الذى قمت بتصميمه
ليقوم بتنفيذ المطلوب وليقوم بتخذين البيانات بانهاية بقاعدة البيانات
اى كانت طريقة ارسالة القيمة ومحتواها لقاعدة البيانات

وبخصوص الكود الذى تريده
فلاتمام تغيير Display Control اضافة DAO فى References
ومن ثم عمل كود
كود :
Imports dao
Imports dao.DataTypeEnum

وتتعامل مع الاضافة لتغيير Display Control

ليكون الكود على هذا النحو
كود :
   Dim dbe As New dao.DBEngine
   Dim dbs As dao.Database
   Dim fld As dao.Field
   Dim prp As dao.Property

   dbs = dbe.OpenDatabase("YourMDB.mdb")
   fld = dbs.TableDefs("YourTable").Fields("YourField")
   prp = fld.CreateProperty("DisplayControl", dbInteger, 106)
   Try
     fld.Properties.Append(prp)
   Catch ex As Exception
     MsgBox(ex.Message, MsgBoxStyle.Information)
   End Try

اذا كنت تلاحظ فى الكود ستجد انه يقوم بعمل فتح قاعدة البيانات ليقوم بتنفيذ
ما قمت بشرحه مسبقاً عن الطريقة اليدوية لان كما شرحت بالاعلى
ان المضمون النهائي للفكرة ما هو الا مظهر ولا يفيد المظهر داخل VB.NET

تذكر ان الامر لهذا العمود انك بامكانك جعله من نوع رقمي ويكود الحد الاقصة للقيم الترقيم هو احادى
اى الاعداد لا تتجاوز 9 كي يكون الاعداد من 0:9 وكل ما ستقوم به عند ارسال قيمة ان ترسم Yes  بقيمة 1 للعمود الرقمي
وما يخص No ان ترسل قيمتها بـ 0 وان تجعل العمود قيمة اجبارية والقيمة الافتراضية هى 0

اتمنى ان يكون مضمون الشرح وصل لك واستوعبت ما اريد ان يصل لك

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية اضافة اسم وصورة المنتج في الفورم نور الهدى الهدى 2 85 18-07-19, 10:29 PM
آخر رد: asemshahen5
  مشكلة عند الاتصال مع قاعدة بيانات sqlserver nooralcown 2 104 13-07-19, 10:01 AM
آخر رد: nooralcown
  [VB.NET] عندما يكون حقل فارغ في داتا جريد فيو منع اضافة حقل جديد khairallah 0 55 12-07-19, 10:13 PM
آخر رد: khairallah
  [VB.NET] سؤال حول إعادة تسمية رؤوس الأعمدة ونوع خانات النص في تقرير بالكود Al Wilaya 5 109 12-07-19, 01:27 AM
آخر رد: asemshahen5
Question [VB.NET] كيفية عرض الصور من قاعدة البيانات على picturebox الرائد 9 292 07-07-19, 02:30 AM
آخر رد: ابراهيم ايبو
  هل هناك امكانية لتشفير نص اتصال قاعدة البيانات سامي محمد 7 199 06-07-19, 01:11 AM
آخر رد: سامي محمد
  محتاج كود ضغط وإصلاح قاعدة بيانات Access 2010 princelovelorn 12 778 05-07-19, 06:13 PM
آخر رد: elgokr
  التحول من اكسس الي سيكول سيرفر makky 10 219 05-07-19, 01:48 PM
آخر رد: حريف برمجة
  [VB.NET] مشكل مفتاح قاعدة البيانات Autonumber sniperjawadino 4 259 30-06-19, 06:38 PM
آخر رد: sniperjawadino
Exclamation [سؤال] مشكلة عدم قبول النصوص الطويل في قاعدة البيانات على برنامج فيجوال بيسك 2010 الرائد 13 472 26-06-19, 02:16 AM
آخر رد: الرائد

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


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