asp 向access數據庫插入當前日期時發生錯誤

Category:吉林領域網絡公司     Time:2012-12-20 10:16     點擊:

Microsoft JET Database Engine (0x80040E07) 日期的語法錯誤 在查詢表達式 #2012-12-20 上午 10:11:56# 中。 今天在建站的時候出現了上述的錯誤,錯誤原因是數據庫日期數據中不能包含中文。解決方法是將從服務器獲取的時間格式化。通過下面的函數格式化now()

Microsoft JET Database Engine (0x80040E07)
日期的語法錯誤 在查詢表達式 '#2012-12-20 上午 10:11:56#' 中。
今天在建站的時候出現了上述的錯誤,錯誤原因是數據庫日期數據中不能包含中文。解決方法是將從服務器獲取的時間格式化。通過下面的函數格式化now(),然后再寫入數據庫。

' ============================================
' 格式化時間(顯示)
' 參數:n_Flag
' 1:"yyyy-mm-dd hh:mm:ss"
' 2:"yyyy-mm-dd"
' 3:"hh:mm:ss"
' 4:"yyyy年mm月dd日"
' 5:"yyyymmdd"
'   6:"yyyymmddhhmmss"
' ============================================
Function Format_Time(s_Time, n_Flag)
 Dim y, m, d, h, mi, s
 Format_Time = ""
 If IsDate(s_Time) = False Then Exit Function
 y = cstr(year(s_Time))
 m = cstr(month(s_Time))
 If len(m) = 1 Then m = "0" & m
 d = cstr(day(s_Time))
 If len(d) = 1 Then d = "0" & d
 h = cstr(hour(s_Time))
 If len(h) = 1 Then h = "0" & h
 mi = cstr(minute(s_Time))
 If len(mi) = 1 Then mi = "0" & mi
 s = cstr(second(s_Time))
 If len(s) = 1 Then s = "0" & s
 Select Case n_Flag
 Case 1
  ' yyyy-mm-dd hh:mm:ss
  Format_Time = y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s
 Case 2
  ' yyyy-mm-dd
  Format_Time = y & "-" & m & "-" & d
 Case 3
  ' hh:mm:ss
  Format_Time = h & ":" & mi & ":" & s
 Case 4
  ' yyyy年mm月dd日
  Format_Time = y & "年" & m & "月" & d & "日"
 Case 5
  ' yyyymmdd
  Format_Time = y & m & d
 case 6
  'yyyymmddhhmmss
  format_time= y & m & d & h & mi & s
 End Select
End Function
time_now= format_time(now,1)   ‘將需要調用時間的的地方使用time_now變量

這樣,問題就解決了。
(責任編輯:吉林領域網絡公司)



領域網絡公司是吉林市網站建設專家,致力提供吉林市網站建設SEO網站優化,網站推廣,網站策劃以及政府網站建設與網絡營銷免費咨詢等服務;我們能讓企業品牌更有活力,咨詢熱線:0432-62555849

更多

友情鏈接

吉林市網站建設 | 精英網絡 | 吉林市博物館 | 廣州網站建設 |

收縮
  • 電話咨詢

  • 0432-62555849
黑龙江p62开奖号码