如何动态创建具有自定义日期格式的日期字段的访问数据库?
问题描述:
任何人都可以帮我解决我目前的问题吗?如何动态创建具有自定义日期格式的日期字段的访问数据库?
我正在做一个动态创建访问数据库(.mdb文件)的项目。该数据库有一个日期字段,但我希望它具有自定义日期格式。
这是我到目前为止。
Dim con As New OleDb.OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source =" & databaseName)
con.Open()
Dim dbSchema As DataTable = con.GetOleDbSchemaTable(OleDb.OleDbSchemaGuid.Tables, _
New Object() {Nothing, Nothing, tableName, "TABLE"})
con.Close()
If dbSchema.Rows.Count > 0 Then
'I have some code here
Else
'This is where I create the table
Dim cmd As New OleDb.OleDbCommand("CREATE TABLE [" + tableName + "] ([Meter] TEXT(2), [Name] TEXT(20), " _
& "[Element1] TEXT(20), [Element2] TEXT(20), [Element3] TEXT(20), [W] TEXT(20), " _
& "[pf] TEXT(20), [kWh_Delivered] TEXT(20), [kWh_Received] TEXT(20), " _
& "[Date_Time] Date(mm/dd/yyyy hh:nn:ss))", con)
cmd.ExecuteNonQuery()
con.Close()
MessageBox.Show("Table Created Successfully")
End If
谢谢!
答
我有解决我的问题。我没有得到解决我的问题,而是我的工作围绕需要该值的代码,并在那里我取代了格式。 无论如何,谢谢。