0
任何人都可以幫我解決我目前的問題嗎?如何動態創建具有自定義日期格式的日期字段的訪問數據庫?
我正在做一個動態創建訪問數據庫(.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
謝謝!