名站网址导航为大家提供关于数据库教程相关的教程网站知识。
Access日期与时间函数汇总
Access日期与时间函数汇总，需要的朋友可以参考一下,今天在开发系统的时候，需要实现这样一个功能,根据选中的日期，查询相关的内容，但不是按照整个日期去过滤，而是根据，年，月，日拆分的形式去过滤，比如2013年的，2月份的,在sqlserver中，咱们可以可以直接根据datePart去完成即可,select * from pays where 1=1 and datepart(year, pdate)=2013 and datepart(month, pdate)=2 and datepar,但是在access中却通不过，因为具体相关方法有些不一样，需要这样写,select * from pays where 1=1 and datepart("yyyy", pdate)=2013 and datepart("m", pdate)=2 and datepar,关于sqlserver的函数在前面说到了，现在把access的日期函数总结一下,如何将文本型：2003.08.04 转换为日期型：2003-08-04,cdate(replace("2003.08.04",".","-")),显示当前日期在该年中所处的星期号,=Format(Now(), "ww"),ww 为 1 到 53。,显示日期字段值的四位年份值。,=DatePart("yyyy", [订购日期]),显示日期字段值前 10 天的日期值。,=DateAdd("y", -10, [应付日期]),显示日期字段值前一个月的日期值。,=DateAdd("m",-1,Date()),显示日期1和日期2之间相差的天数。,=DateDiff("d", [订购日期], [发货日期]),从今天算起到三个月后的日期之间的记录。,Betweeb date() and adddate(3,date()),根据出生日期计算年龄(周岁),=IIf(Month(Date())-Month([出生年月日])>-1,Year(Date())-Year([出生年月日]),Year(Date())-Year([出生年月日])-1),自定义日期/时间格式 (Format 函数),(:) 时间分隔符。在一些区域，可能用其他符号来当时间分隔符。格式化时间值时，时间分隔符可以分隔时、分、秒。时间分隔符的真正字符在格式输出时取决于系统的设置。,(/) 日期分隔符。在一些区域，可能用其他符号来当日期分隔符。格式化日期数值时，日期分隔符可以分隔年、月、日。日期分隔符的真正字符在格式输出时取决于系统设置。,C 以 ddddd 来显示日期并且以 ttttt 来显示时间。假如如果想显示的数值无小数部分，则只显示日期部分，假如如果想显示的数值无整数部分，则只显示时间部分。,D,以没有前导零的数字来显示日 (1 – 31)。,Dd,以有前导零的数字来显示日 (01 – 31)。,ddd,以简写来表示日 (Sun –Sat)。,dddd,以全称来表示日 (Sunday –Saturday)。,ddddd,以完整日期表示法显示(包括年、月、日)，日期的显示要依系统的短日期格式设置而定。缺省的短日期格式为 m/d/yy。,dddddd,以完整日期表示法显示日期系列数(包括年、月、日)，日期的显示要依系统识别的长日期格式而定。缺省的长日期格式为 mmmm dd, yyyy。,aaaa,与dddd 一样，它只是该字符串的本地化版本。,W,将一周中的日期以数值表示(1 表星期日~ 7表星期六)。,ww,将一年中的星期以数值表示 (1 – 54)。,M,以没有前导零的数字来显示月 (1 – 12)。假如如果 m 是直接跟在 h 或 hh 之后，那么显示的将是分而不是月。,mm,以有前导零的数字来显示月 (01 – 12)。假如如果m是直接跟在h或hh之后，那么显示的将是分而不是月。,mmm,以简写来表示月 (Jan –Dec)。,mmmm,以全称来表示月 (January –December)。,oooo,与mmmm一样，它只是该字符串的本地化版本。,Q,将一年中的季以数值表示 (1 – 4)。,Y,将一年中的日以数值表示 (1 – 366)。,Yy,以两位数来表示年 (00 – 99)。,yyyy,以四位数来表示年 (00 – 99)。,h,以没有前导零的数字来显示小时 (0 – 23)。,hh,以有前导零的数字来显示小时 (00– 23)。,N,以没有前导零的数字来显示分 (0 – 59)。,Nn,以有前导零的数字来显示分 (00 – 59)。,S,以没有前导零的数字来显示秒 (0 – 59)。,Ss,以有前导零的数字来显示秒 (00 – 59)。,t t t t t,以完整时间表示法显示(包括时、分、秒)，用系统识别的时间格式定义的时间分隔符进行格式化。假如如果选择有前导零并且时间是在 10:00 A.M. 或 P.M.之前，那么将显示有前导零的时间。缺省的时间格式为,AM/PM,在中午前以 12 小时配合大写 AM 符号来使用;在中午和 11:59 P.M.间以 12 小时配合大写 PM 来使用。,Am/pm,在中午前以 12 小时配合小写 am 符号来使用;在中午和 11:59 P.M.间以 12 小时配合小写 pm 来使用。,A/P,在中午前以 12 小时配合大写A符号来使用;在中午和 11:59 P.M.间以12 小时配合大写P来使用。,a/p,在中午前以 12 小时配合小写a符号来使用;在中午和 11:59 P.M.间以 12 小时配合小写p来使用。,AMPM,在中午前以 12 小时配合系统设置的 AM字符串文字来使用;在中午和 11:59 P.M. 间以 12 小时配合系统设置的 PM 字符串文字来使用。AMPM 可以是大写或小写，但必须和您的系统设置相配,日期函数示例,当天日期：=Date(),当日：=Day(date),当月：=Month(date()),当年：=Year(date()),当季：=DatePart("q",Date()),把日期大写,Function Date2Chinese(iDate),Dim num(10),Dim iYear,Dim iMonth,Dim iDay,num(0) = "〇",num(1) = "一",num(2) = "二",num(3) = "三",num(4) = "四",num(5) = "五",num(6) = "六",num(7) = "七",num(8) = "八",num(9) = "九",iYear = Year(iDate),iMonth = Month(iDate),iDay = Day(iDate),Date2Chinese = num(iYear \ 1000) _,num((iYear \ 100) Mod 10) num((iYear \ 10) Mod 10) num(iYear Mod 10) "年",If iMonth >= 10 Then,If iMonth = 10 Then,Date2Chinese = Date2Chinese "十" "月",Else,Date2Chinese = Date2Chinese "十" num(iMonth Mod 10) "月",End If,Else,Date2Chinese = Date2Chinese num(iMonth Mod 10) "月",End If,If iDay >= 10 Then,If iDay = 10 Then,Date2Chinese = Date2Chinese "十" "日",ElseIf iDay = 20 Or iDay = 30 Then,Date2Chinese = Date2Chinese num(iDay \ 10) "十" "日",ElseIf iDay > 20 Then,Date2Chinese = Date2Chinese num(iDay \ 10) "十" num(iDay Mod 10) "日",Else,Date2Chinese = Date2Chinese "十" num(iDay Mod 10) "日",End If,Else,Date2Chinese = Date2Chinese num(iDay Mod 10) "日",End If,End Function,算出每个月的天数,一法：,Dim a, b, c,a = Year(Now()),b = Month(Now()),c = Format((a & "/" & b 1 & "/1"), "######") - Format((a & "/" & b & "/1"), "######"),二法：,DateDiff("d", Format(Date, "yyyy-mm-01"), Format(DateAdd("m", -1, Date), "yyyy-mm-01")),DateDiff可以算出两个日期之间相差几天!,三法：,Day(DateAdd("d", -1, Format(Date, "yyyy-mm-01"))),day函数可以知道某个日期是这个月的第几天，咱们把这个月的最后一天拿出来DAY一下!应该还有更好的具体相关方法!比如说可以定义一个数组，把每个月的日子放进去，或者说写一个函数算每一个月的天数只要考虑一下闺年的,如何得到某年每个月的第一天是星期几,Private Sub Command1_Click(),Dim i As Integer, A As Integer, B As Integer, C As String,A = InputBox("请输入年份", "某年每个月的第一天是星期几"),Form1.Cls,For i = 1 To 12,C = A & "-" & i & "-1",B = Weekday(C),Select Case B,Case vbSunday,Print A & "年" & i & "月1日是 星期日",Case vbMonday,Print A & "年" & i & "月1日是 星期一",Case vbTuesday,Print A & "年" & i & "月1日是 星期二",Case vbWednesday,Print A & "年" & i & "月1日是 星期三",Case vbThursday,Print A & "年" & i & "月1日是 星期四",Case vbFriday,Print A & "年" & i & "月1日是 星期五",Case vbSaturday,Print A & "年" & i & "月1日是 星期六",End Select,Next i,End Sub,计算天数及月初月末日期,Function 本月天数(日期 As Date) As Byte,本月天数 = DateSerial(Year(日期), Month(日期) 1, Day(日期)) - 日期,End Function,Function 月末(日期 As Date) As Date,月末 = DateSerial(Year(日期), Month(日期) 1, 1) - 1,End Function,Function 月初(日期 As Date) As Date,月初 = 日期 - Day(日期) 1,End Function,本月最后一日是周几,SELECT,Weekday(DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1)-1)) AS 本月最后一日是周几,,下月最后一日是周几,SELECT,Weekday(DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1)-1)) AS 下月最后一日是周几,,本月最后一个周5到月底的天数,SELECT,(Weekday(DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1)-1)) 1) Mod 7 AS 本月最后一个周5到月底的天数;,下月最后一个周5到月底的天数,SELECT,(Weekday(DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1)-1)) 1) Mod 7 AS 下月最后一个周5到月底的天数;,本月最后一个周5的日期,SELECT,DateAdd("m",1,DateSerial(Year(Date()),Month(Date()),1))-1-(Weekday(DateAdd("m",1,DateSerial(Year(Dat,下月最后一个周5的日期,SELECT,DateAdd("m",2,DateSerial(Year(Date()),Month(Date()),1))-1-(Weekday(DateAdd("m",2,DateSerial(Year(Dat,多思考，多创新，才是正道!
使用Access当网站数据库时,这个问题郁闷了我好几天啊![OleDbException (0x80004005): 操作办法必须使用一个可更新的查询。]
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及具体相关代码中导致错误的出处的详细信息。
异常详细信息: System.Data.OleDb.OleDbException: 无法从指定的数据表中删除。
源错误:
行 37: comm.CommandText = sqlstr;
行 38: //comm.Prepare();
行 39: cout = comm.ExecuteNonQuery();
行 40:
行 41: conn.Close();
源网站网站文件: d:\SOVO验收具体相关代码\Base\App_Code\JetAccess.cs 行: 39
[OleDbException (0x80004005): 无法从指定的数据表中删除。]
System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult) 267
System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult) 192
System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult) 48
System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method) 106
System.Data.OleDb.OleDbCommand.ExecuteNonQuery() 108
JetAccess.Execute(OleDbParameter[] parameters, String sqlstr) in d:\SOVO验收具体相关代码\Base\App_Code\JetAccess.cs:39
NewsData.DeleteNews(Int32 id) in d:\SOVO验收具体相关代码\Base\App_Code\NewsData.cs:29
_Default.GridView1_RowDeleting(Object sender, GridViewDeleteEventArgs e) in d:\SOVO验收具体相关代码\Base\System\Default.aspx.cs:46
System.Web.UI.WebControls.GridView.OnRowDeleting(GridViewDeleteEventArgs e) 133
System.Web.UI.WebControls.GridView.handleDelete(GridViewRow row, Int32 rowIndex) 604
System.Web.UI.WebControls.GridView.handleEvent(EventArgs e, Boolean causesValidation, String validationGroup) 1155
System.Web.UI.WebControls.GridView.RaisePostBackEvent(String eventArgument) 199
System.Web.UI.WebControls.GridView.System.Web.UI.IPostBackEventhandler.RaisePostBackEvent(String eventArgument) 7
System.Web.UI.Page.RaisePostBackEvent(IPostBackEventhandler sourceControl, String eventArgument) 11
System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData) 174
System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) 5102
解决具体相关方法如下:
在数据网站网站文件*.mdb上右键打开属性对话框，在'安全'标签下需要添加IUSR_XXX(XXX为您的机器名),也就是添加Internet Guest Account帐户，再将此帐户的权限设为可读，可写.(原来这么简单就解决了的问题,我靠:) )
假如如果在右键属性对话框内找不到'安全'标签，需要将网站网站文件夹选项下的视图内的'使用简单网站网站文件共享(默认)'的勾去掉.
原因：
有几个主要的错误原因：
这个错误发生在当您的程序试图执行更新网站数据库或其它类似操作办法时。这是因为
ADO由于以下的几个原因而不能够写网站数据库造成的。
1。最普遍的原因是匿名用户帐号(IUSR_MAChINE)对该网站数据库网站网站文件没有写权限。
要解决这个问题，在管理器中调整网站数据库网站网站文件的属性，让匿名用户有正确的权限。
当使用ACCESS网站数据库时，不仅要给网站网站文件写的权限，还要给该目录写 的权限，因为
Jet需要在该目录建立一个.ldb网站网站文件。
2。第二个原因是网站数据库没有使用正确的模式打开。应该使用下面的具体相关方法打开。
SQL = "UPDATE Products Set UnitPrice = 2;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3 ''3 = adModeReadWrite
Conn.Open "myDSN"
Conn.Execute(SQL)
Conn.Close
注意默认的Mode是设置0(adModeUnknown),它是允许更新的。
3。还有可能是在ODBC管理器中将该DSN的只读选项选中。
4。您是在同时更新两个表中的字段，也会出现这个错误信息，解决办法是分开来更新
这两个表中各自字段。
5。当您使用了一个从低版本中(如ACCESS2.0,ACCESS7.0)载入到高版本(ACCESS 2000)
中的查询时，在执行这个查询是会出现该错误。
关于数据库教程相关的教程网站知识今天我们就说到这里了，希望可以帮到大家。
