主頁 > 知識(shí)庫 > Insert Date and Time into Access

Insert Date and Time into Access

熱門標(biāo)簽:企數(shù)外呼系統(tǒng)能用多久 為什么外呼系統(tǒng)需要預(yù)存話費(fèi)呢 蘭州智能語音電銷機(jī)器人功能 外呼回?fù)芟到y(tǒng)圖片 寧夏怎么申請(qǐng)400電話 離線電子地圖標(biāo)注軟件注冊(cè) 咸陽銷售外呼系統(tǒng) 常用地圖標(biāo)注范圍點(diǎn) 辦理400電話一年多少錢
 %
Function AccessDateTime (dateandtime)
Dim myDay
Dim myMonth
Dim myYear

myDay = Day(dateandtime)
If Len(myDay)=1 Then myDay="0"  myDay

myMonth = Month(dateandtime)
If Len(myMonth)=1 Then myMonth="0"  myMonth

myYear = Year(dateandtime)

AccessDateTime = myYear  "-"  myMonth  "-"  myDay  " "  Time()
End Function

Dim connection
Dim SQL, sConnString

SQL="Insert INTO tblDate (dDate) VALUES (#"  AccessDateTime(NOW())  "#)"

sConnString="PROVIDER=Microsoft.Jet.OLEDB.4.0;"  _
"Data Source="  Server.MapPath("datedb.mdb")
Set connection = Server.CreateObject("ADODB.Connection")
connection.Open(sConnString)
connection.execute(SQL)

Connection.Close
Set Connection = Nothing
%>

標(biāo)簽:溫州 家電維修 昆明 泰州 麗江 咸陽 鐵嶺 昌都

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《Insert Date and Time into Access》,本文關(guān)鍵詞  Insert,Date,and,Time,into,Access,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《Insert Date and Time into Access》相關(guān)的同類信息!
  • 本頁收集關(guān)于Insert Date and Time into Access的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章