تقييم الموضوع :
  • 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

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

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

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكله في الوصول الى قاعدة بيانات 2007 عند تغيرها 2016 alshandodi 7 115 29-05-20, 11:34 AM
آخر رد: معاند الحظ
  تنفيذ استعلام حذف البيانات في جدول قاعدة بيانات سيكوال سيرفر باستخدام الكود في فجوال momani33 4 93 28-05-20, 12:46 AM
آخر رد: اسامه الهرماوي
  مشكلة في الترقيم التلقائي في قاعدة بيانات سيكوال سيرفر momani33 3 76 27-05-20, 11:49 PM
آخر رد: momani33
  اضافة عمود كمبوبوكس atefkhalf2004 18 326 26-05-20, 10:32 AM
آخر رد: atefkhalf2004
  [VB.NET] اريد اضافة امر الغاء الامر او العملية اي عملية داخل الفروم بشكل كامل Ahmed TEAM YEMEN 8 220 25-05-20, 08:51 PM
آخر رد: Ahmed TEAM YEMEN
  [سؤال] مشكلة في اتصال قاعدة البيانات اكسس mazentq 9 200 24-05-20, 08:45 AM
آخر رد: mazentq
  [VB.NET] التعديل على كود لقرائة باقي المعلومات من قاعدة البيانات khairallah 1 62 24-05-20, 03:19 AM
آخر رد: اسامه الهرماوي
  [سؤال] مشكل اتصال قاعدة بينات في الفيجول 2017 ahmedbezia 2 73 20-05-20, 05:51 PM
آخر رد: rochdi191
  طلب و أتمنى لو موجود: قاعدة بيانات أدوية DR.YASER 2 119 16-05-20, 05:47 AM
آخر رد: عبد العزيز البسكري
  سؤال في طريقة التعامل مع قاعدة البيانات عند تحزيم المشروع adnan gharbi 4 282 15-05-20, 01:03 PM
آخر رد: adnan gharbi

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


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