小问题，送高分--数据库中如何编程创建包含data类型字段的.mdb数据库文件？

Question

可以尝试降级 用DAO来建立。有个小软件可以一次性的将MDB转换成DAO的代码。你只要在程序中引用DAO即可了。如果愿意，给我信箱，我可以把软件发给你。

Answer 1

当然可以创建了，DATA应为DATE，插入数据时是时间的格式就行了。

Answer 2

.cn,麻烦springlover将软件传来，另想请问您有无尝试用水晶报表打开带日期字段的.mdb 数据库，我的数据库中Date 类型的字段仅含时间不含日期，如"09:12:23","12:12:14"等，结果如在crystalReport 中统统变成“1899-12-30”，太气愤了！

Answer 3

引用 Micrsoft dao 3.51 object libraryDim MyTable As TableDef, MyField As Field
   Dim PGB As Database
   Set PGB = CreateDatabase(App.Path + "\PGB.mdb", dbLangGeneral)
   Set MyTable = PGB.CreateTableDef("Subclass")
   Set MyField = MyTable.CreateField("Name", dbText, 50)
   MyTable.Fields.Append MyField
   PGB.TableDefs.Append MyTable
   
   Set MyTable = PGB.CreateTableDef("AllRecords")
   Set MyField = MyTable.CreateField("Name", dbText, 50)
   MyTable.Fields.Append MyField
   Set MyField = MyTable.CreateField("PGBandy", dbText, 50)
   MyTable.Fields.Append MyField
   Set MyField = MyTable.CreateField("PGB", dbDate)
   MyTable.Fields.Append MyField
   PGB.TableDefs.Append MyTable  是不是这样