Insert Date and Time into Access
更新時(shí)間:2007年04月04日 00:00:00 作者:
<%
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
%>
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
%>
相關(guān)文章
ASP基礎(chǔ)入門第六篇(ASP內(nèi)建對象Request)
從本篇開始作者從 ASP 內(nèi)建對象著手,為大家詳細(xì)剖析 ASP 的六個(gè)內(nèi)建對象和各種組件的特性和方法,需要的朋友可以參考下2015-10-10
asp javascript picasa相冊外鏈批量導(dǎo)出
自己的空間想做一個(gè)相冊,找來找去用了picasa,功能很方便,唯一不足之處是獲取外鏈太麻煩,一個(gè)一個(gè)的復(fù)制粘貼太辛苦,于是用asp+javascript的方法寫了個(gè)簡單的程序2009-05-05
JScript中調(diào)用ActiveX獲取訪客網(wǎng)卡MAC地址實(shí)現(xiàn)代碼
這篇文章主要介紹了JScript中調(diào)用ActiveX獲取訪客網(wǎng)卡MAC地址實(shí)現(xiàn)代碼,注意本文代碼只適應(yīng)運(yùn)行在IE瀏覽器上,需要的朋友可以參考下2014-08-08
ASP刪除img標(biāo)簽的style屬性只保留src的正則函數(shù)
做手機(jī)網(wǎng)站的時(shí)候圖片要做自適應(yīng),由于手機(jī)網(wǎng)站跟PC網(wǎng)站共用1個(gè)數(shù)據(jù)庫,導(dǎo)致文章內(nèi)的圖片有部分帶有:style=""等屬性,導(dǎo)致手機(jī)端圖片width:100%失效,去掉mg標(biāo)簽style屬性只保留src即可解決問題2020-09-09

