وصف موجز:
كيفية تحديد القيم الافتراضية للحقل
سؤال:
كيفية تعيين القيمة الافتراضية لحقل معين في جدول؟
الطريقة 1:
استخدم jetsql لإكمال
AlterTableTableNameAlterColumnfieldnametext (40) القيمة الافتراضية الافتراضية
يرجى ملاحظة أنه يجب تنفيذ العبارات المذكورة أعلاه باستخدام ADODB.Connection.execute وطرق أخرى. إذا استخدمت مباشرة الرمز أعلاه لإنشاء استعلام لا يمكن حفظه أو تشغيله ، فستحصل على رسالة خطأ في الوصول.
الطريقة 2:
Adox على ما يرام.
functionChengTablefieldPro_ado ()
DimmytablenameasString
DimmyfieldnameasString
Dimgetfielddesc_ado
DimgetFieldDescription
mytablename = "ke_hu"
myFieldName = "dw_name"
dimmydbasnewadox.catalog
dimmytableasadox.table
Dimmyfieldasadox.Column
onerrorgotoerr_getfielddescription
mydb.activeConnection = currentProject.connection
setMyTable = mydb.tables (mytablename)
getfielddesc_ado = mytable.columns (myFieldName) .properties ("الوصف")
dimproasadodb.property
foreachproinmytable.columns (MyFieldName) .properties
debug.printpro.name & ":" & pro.value & "---- type:" & pro.type
التالي
withmytable.columns (MyFieldName)
'
لا يمكن تعيين الرمز أعلاه ، رسالة الخطأ هي:
تولد عملية OLEDB متعددة الخطوات خطأ. إذا أمكن ، تحقق من كل قيمة حالة OLEDB. لم ينجز أي عمل.
حاليًا ، يمكن تعيينه مع البيان التالي:
'currentdb.tabledefs ("ke_hu"). الحقول ("dw_name"). الخصائص ("مطلوب") = خطأ
.Properties("JetOLEDB:AllowZeroLength")=True'Available empty
.properties ("افتراضي") = "القيمة الافتراضية الصمت"