SQL은 특별한 목적을 가진 프로그래밍 언어입니다. 아래는 편집자가 귀하와 공유 한 SQL 액세스의 기본값을 설정하는 것에 대한 자세한 자습서입니다. 관심있는 친구, 편집자와 함께 배우자!
간단한 설명 :
필드 기본값을 정의하는 방법
질문:
테이블에서 특정 필드의 기본값을 설정하는 방법은 무엇입니까?
방법 1 : 방법 1
jetsql을 사용하여 완료하십시오
AltertableTableAmeAmealterColumnfieldNameText (40) 기본 기본값
위의 진술은 adodb.connection.execute 및 기타 방법을 사용하여 실행해야합니다. 위의 코드를 직접 사용하여 저장하거나 실행할 수없는 쿼리를 작성하면 액세스 오류 메시지가 나타납니다.
방법 2 : 방법 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 ( "description")
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 : allowzerolength") = true'available 비어 있습니다
.properties ( "default") = "Silitally Default 인식" '기본값
끝
setmydb = 아무것도
bye_getfielddescription :
종료 기능
err_getFieldDescription :
삑 하는 소리
debug.printerr.description
msgboxerr.description, vbexclamation
getfielddescription = null
ResumeBye_getFieldDescription
최종 기능 장애
"다중 단계 오류"에 대한 일부 참조 :
SubChangeUnicode ()
Dimtdfastabledef
Dimfldasfield
Dimdbasdatabase
Dimproasproperty
setdb = currentdb
foreachtdfindb.tabledefs
foreachfldintdf.fields
ifffld.type = dbtextthen
ifdbengine.errors (0) .number = 3270then
setPro = fld.CreateProperty ( "unicodecompression", 1,0)
fld.properties.appendp
endif
fld.properties ( "unicodecompression") = true
endif
Nextfld
NEXTTDF
Endsub
위는 SQL의 기본 액세스 값을 설정하는 데 대한 자세한 자습서입니다. 나는 당신이 그것을 배웠다고 믿습니다. 더 많은 관련 컨텐츠를 보려면 잘못된 신기술 채널에 계속주의를 기울이십시오.