السلام عليكــم ورحمـة الله وبركاتــه ،،
تحية طيبة
عملت كود لاضافة حقل جديد الى جدول و ارغب في كود يقوم بتحويل الحقل من نوع الى نوع اخر
هل هناك كود يقوم بذلك
طريقة تحويل حقل من نوع الى نوع اخر برمجا
وجدت الحل
و هو كالتالي للاستفادة
dbToUpdate.Execute ("ALTER table " & tableName & " ALTER COLUMN " & fieldName fieldTypename
السلام عليكــم ورحمـة الله وبركاتــه ،،
بارك الله فيك أخي الكريم...
ممكن مثال مبسط :blush:
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
إن شاء الله تخي ايهاب انا انزل ملف بسيط يقوم باضافة حقل الى قاعدة بيانات او حتى انشاء جدول جديد برمجيا بعد تجميع كل مفردات هذا الموضوع
في اقرب وقت
السلام عليكــم ورحمـة الله وبركاتــه ،،
أليك أخي بعض التحويلات المفيدة وجدتها في بحثي
أرجو أن تكون ما طلبت وأسألك الدعاء لي وللمسلمين
فإن دعوة في شهر رمضان أحرى بالاجابة
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
ـــــ
هذه طريقه الاستعلام في طور SQL
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
ـــــ
1- SQLعرض Select View -> SQL View
2- اكتب السطر التالي داخل SQL
كود
create table tbl1 (field_a COUNTER,field_b text ,field_c Memo, field_d Number,field_e bit,field_f Date)
حيث ان tbl1 اسم الجدول و
field_a ترقيم تلقائي
field_b نص
field_cمذكرة
field_d رقم
field_eنعم/لا
field_fتاريخ/وقت
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
ـــــ
طريقة الكود في نموذج:
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
ـــــ
ضع زر امر في نموذج واكتب الكود التالي في حدث عند النقر للزر , سيتم انشاء حقل ترقيم تلقائي
كود
On Error Resume Next
DoCmd.RunSQL "alter table Table1 Add column NEW_ID autoincrement;"
MsgBox "تم اضافه حقل ترقيم"
وللحذف استخدم الكود التالي
كود
On Error Resume Next
DoCmd.RunSQL "alter table Table1 drop NEW_ID;"
MsgBox "تم حذف حقل الترقيم"
علما بان
Table1 اسم الجدول
NEW_ID اسم حقل الترقيم
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
ـــــ
((للأمانة تم النقل من منتدى المحيط العربي- مشاركة الأخ:startnet))
بارك الله فيك اخي pms
هذه الطريقة هي التي ذكرتها اعلاه و لكني استخدمتها على قاعدة بيانات منفصلة
اسال الله العلي القدير ان يزيدك و جميع اخواننا من علمه وفضله الواسع