Breve descripción:
Cómo definir los valores predeterminados del campo
pregunta:
¿Cómo establecer el valor predeterminado de un cierto campo en una tabla?
Método 1:
Use JETSQL para completar
AltertableTableNameLterColumnFieldNamEtextExtExt (40) Valor predeterminado predeterminado
Tenga en cuenta que las declaraciones anteriores deben ejecutarse utilizando ADODB.Connection.ExCute y otros métodos. Si usa directamente el código anterior para crear una consulta que no se puede guardar o ejecutar, recibirá un mensaje de error de acceso.
Método 2:
Adox está bien.
FunctionchengtableFieldPro_ado ()
DimmytablenameString
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 ("descripción")
Dimproasadodb.Property
Foreachproinmytable.columns (myfieldname) .properties
Debug.printpro.name & ":" & pro.value & "---- Tipo:" & Pro.Type
Próximo
WithMytable.Columns (MyFieldName)
'.Properties ("anulable") = true' requirido
'El código anterior no se puede establecer, el mensaje de error es:
'La operación OLEDB de múltiples pasos genera un error. Si es posible, verifique cada valor de estado de OLEDB. No se realizó ningún trabajo.
'Actualmente, se puede configurar con la siguiente declaración:
'CurrentDb.tableFs ("ke_hu"). Fields ("dw_name"). Properties ("requerido") = falso
.Properties ("jetoledb: nowerolength") = true'avelable vacío
.Properties ("predeterminado") = "reconocimiento predeterminado en silencio" 'Valor predeterminado