คำอธิบายสั้น ๆ :
วิธีกำหนดค่าเริ่มต้นของฟิลด์
คำถาม:
จะตั้งค่าเริ่มต้นของฟิลด์ที่แน่นอนในตารางได้อย่างไร?
วิธีที่ 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 & "---- พิมพ์:" & pro.type
ต่อไป
withmytable.columns (myfieldname)
'.properties ("nullable") = true'required
'รหัสข้างต้นไม่สามารถตั้งค่าข้อความแสดงข้อผิดพลาดคือ:
'การดำเนินการ OLEDB แบบหลายขั้นตอนสร้างข้อผิดพลาด หากเป็นไปได้ให้ตรวจสอบค่าสถานะ OLEDB แต่ละตัว ไม่มีงานทำ
'ปัจจุบันสามารถตั้งค่าด้วยคำสั่งต่อไปนี้:
'currentdb.tabledefs ("ke_hu") ฟิลด์ ("dw_name") คุณสมบัติ ("จำเป็น") = false
.properties ("Jetoledb: lewlowzerolength") = true'available uspty
.Properties ("default") = "ค่าเริ่มต้นอย่างเงียบ ๆ " 'ค่าเริ่มต้น