Create function FormatDateTime(@Date datetime,@formatStr varchar(20))
returns varchar(16)
as
begin
declare @tempstr varchar(20),@index int,@retStr varchar(20),@formatLen int,@str1 varchar(6),@str2 varchar(6),@str3 varchar(6),@j int
declare @tempformat varchar(20)
select @tempformat=@formatStr,@formatStr = Upper(@formatStr),@index=-1,@retstr=''
if @formatStr='MM/DD/YYYY'
set @retstr= convert(varchar(10),@date,101)
else if @formatstr='YYYY-MM-DD'
set @retstr = Convert(char(10),@Date,20)
else if @formatStr='YYYY.MM.DD'
set @retstr= Convert(varchar(10),@Date,102)
else if @formatStr='YYYY/MM/DD'
set @retstr= Convert(varchar(10),@Date,111)
else if @formatStr='DD/MM/YYYY'
set @retstr= Convert(varchar(10),@Date,103)
else if @formatStr='DD.MM.YYYY'
set @retstr= Convert(varchar(10),@Date,104)
else if @formatStr='DD-MM-YYYY'
set @retstr= Convert(varchar(10),@Date,105)
else if @formatStr='YYYYMMDD'
set @retstr= Convert(varchar(10),@Date,112)
else
begin
select @tempformat=@formatStr,@formatLen = len(@formatStr)
if @formatLen>8
begin
set @index=charindex('M',@tempformat)
select @str1=right(left(@tempformat,@index-1),@index-5),@str2=right(@tempformat,@formatLen-@index-1)
select @index=charindex('D',@str2),@str3=@str2
set @str2=left(@str2,@index-1)
set @str3=right(@str3,len(@str3)-@index-1)
end
select @tempstr = Convert(char(10),@Date,20),@str1=isnull(@str1,''),@str2=isnull(@str2,''),@str3=isnull(@str3,''),@j=0
while @index 0
begin
set @index = charindex('-',@tempstr)
if @j=0
select @retstr=left(@tempstr,@index-1)+@str1,@j=@j+1
else set @retstr=@retstr+left(@tempstr,@index-1)+@str2
select @tempstr=right(@tempstr,len(@tempstr)-@index)
set @index= charindex('-',@tempstr)
end
set @retstr=@retstr+@tempstr+@str3
end
return @retstr
end
select dbo. FormatDatetime(GetDate(),'YYYY元年MM月份DD日')
分享到：
相关推荐
《FormatDateTime函数深入解析与应用》 在编程领域，时间日期的处理是常见的需求之一，尤其是在数据记录、日志管理、报表生成等场景下尤为重要。Delphi语言中的`FormatDateTime`函数提供了一种灵活且强大的方式来...
在Delphi编程环境中，`Format`与`FormatDateTime`函数是处理字符串格式化与日期时间格式化的重要工具。本文将深入解析这两个函数的功能、参数及其使用场景，旨在为Delphi开发者提供全面的理解与实践指导。 ### 一、...
类似delphi中formatdatetime()的函数，可以像delphi中一样使用 formatdatetime('yyyy-mm-dd hh:nn:ss.zzz',getdate())来返回当天的字符串型日期时间：'2012-09-12 18:42:20.210'
- `FormatDateTime`函数用于将日期时间转换为指定格式的字符串。 - `IntToHex`和`HexToInt`分别用于整数与十六进制字符串之间的转换。 4. **数学运算函数** - `Abs`返回一个数值的绝对值。 - `Sqrt`计算平方根...
Count_Time := StrToInt(Copy(FormatDateTime('YYYYMMDD',now()),Week_Count+1,7)+Copy(FormatDateTime('YYYYMMDD',now()),1,Week_Count)) else If Cob_lx.ItemIndex = 1 then //显示车辆包缴 Count_Time := ...
`FormatDateTime`函数在ASP中用于将日期/时间数据转换为指定格式的字符串。其语法如下： ```vb FormatDateTime(Date, [Format]) ``` - `Date`：必填参数，表示要格式化的日期/时间值。 - `Format`：可选参数，用于...
FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比（乘以 100）的表达式，以 % 符号结尾。 Function 语句 声明形成 ...
FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比（乘以 100）的表达式，以 % 符号结尾。 Function 语句 声明形成 ...
FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比（乘以 100）的表达式，以 % 符号结尾。 Function 语句 声明形成 ...
FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比（乘以 100）的表达式，以 % 符号结尾。 Function 语句 声明形成 ...
FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比（乘以 100）的表达式，以 % 符号结尾。 Function 语句 声明形成 ...
Response.Write FormatDateTime(Now(), vbShortDate) & " " & FormatDateTime(Now(), vbShortTime) ``` 3. **24小时制与12小时制切换** 在VBScript中，vbShortTime会根据服务器设置决定是24小时制还是12小时制。...
例如，`this.clock = this.formatDateTime(new Date())`将设置`clock`变量为当前日期和时间的格式化字符串。 接下来，我们将讨论如何在微信小程序中实现倒计时功能。倒计时通常用于显示某个特定时间点到来前剩余的...
ASP提供了强大的功能来处理日期，其中`FormatDateTime`函数是最常用的工具之一。 ##### 1. `FormatDateTime`函数详解 `FormatDateTime`函数用于将日期对象转换为指定格式的字符串。它可以接受两个参数： - 第一个...
在VB6（Visual Basic 6）编程环境中，`FormatDateTime`函数是一个常用的功能，用于将日期和时间数据格式化为可读性强的字符串。标题"format_date_time_format_date_Time_vb6_"暗示了我们讨论的核心内容是关于VB6中...
GridtoExcel.FileName := FormatDateTime('yyyy-mm-dd',DateTimePicker1.DateTime)+ '--------'+FormatDateTime('yyyy-mm-dd',DateTimePicker2.DateTime) +'退款订单导出'; GridtoExcel.ShowProgress := True; ...
然而，我们可以利用Delphi的`System.SysUtils`单元中的`Now`和`FormatDateTime`函数来实现这一功能。本文将详细讲解如何在Delphi中获取和显示当前日期及时间，并提供相关实例源码。 首先，`Now`函数是Delphi提供的...
FormatDateTime('yyyy-mm-dd HH:nn:ss', FileTimes.LastAccessTime), FormatDateTime('yyyy-mm-dd HH:nn:ss', FileTimes.LastWriteTime)]); end; ``` 这段代码将显示一个消息框，其中包含文件的创建、访问和修改...
本文将深入探讨`FormatNumber`、`FormatCurrency`、`FormatDateTime`和`FormatPercent`函数的使用方法，以及它们如何帮助我们以更易读、更标准的格式展示数据。 ### `FormatNumber` `FormatNumber`函数是用于格式...
FormatDateTime Hour IsDate Minute Month MonthName Now Second Time Timer TimeSerial TimeValue Weekday WeekdayName Year Asc CBool CByte CCur CDate CDbl Chr CInt CLng CSng CStr Hex Oct FormatCurrency ...