Fields set as required in created database

DaveP

Member
Joined
Jan 24, 2008
Messages
12
Programming Experience
1-3
'If I create a new Jet database using ADOX,

Dim cat As New ADOX.Catalog()
Dim tbl As New ADOX.Table
Dim idx As New ADOX.Index
Dim CreateString As String

CreateString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
DatabaseFullPath
cat.Create(CreateString)
tbl.Name = "Results"

'I can append Columns (fields)
tbl.Columns.Append("AirTemp", ADOX.DataTypeEnum.adSingle)
cat.Tables.Append(tbl)

'and set indexes,
idx.Name = "MyIndex"
idx.Columns.Append("AirTemp")
tbl.Indexes.Append(idx)
tbl.Indexes.Refresh()

'but when I go and view the database in Access I find that all the fields
'are set as Required=Yes.
'How can I create the database with Required=No
 
Back
Top