请教delphi中用FormatdateTime得到的时间怎样求时间差？FormatdateTime这个函数的后面的参数直接可以是时间差，Edit1.text:=FormatdateTime('yyyy年mm月dd日hh时nn分', Now()-TimeFromDatabase)；
TimeFromDatabase为数据库中取得的时间，也是TDatetime类型的变量，就可以了
delphi中如何给FormatdateTime赋初值,让后显示在label 。caption中？formatdatetime （时间,格式），这个函数就会返回时间的字符串 。1 ， 参数 ：“时间” 是一个 Tdatetime类型，你可以用date 取当前日期试一下 。2，参数：“格式”的写法 你可以百度 一下，别太懒哦
delphi7.0如何使用时间函数date 函数 返回当前的日期
datetimetofiledate 函数 将delphi的日期格式转换为dos的日期格式
datetimetostr 函数 将日期时间格式转换为字符串
datetimetostring 函数 将日期时间格式转换为字符串
datetostr 函数 将日期格式转换为字符串
dayofweek 函数 返回星期的数值
dec 函数 递减变量值
decodedate 函数 将日期格式分解为年月日
decodetime 函数 将时间格式分解为时、分、秒、毫秒
delphi中使用formatdatetime()时,总是提示 There is no overloaded version of 'FormatDateTime' 。now被你定义成string了吧
那（）里的Now就成了一个字符串变量而不是获取时间
delphi 如何获得相应的日期格式我就借花献佛吧,这是转载别人的,使用formatdatetime函数格式化日期数据
function FormatDateTime(const Format: string; DateTime: TDateTime): string;
Format参数是一个格式化字符串 。DateTime是时间类型 。返回值是一种格式化后的字符串，重点来看Format参数中的指令字符：
c以短时间格式显示时间，即全部是数字的表示
FormatdateTime('c',now);
输出为：2004-8-7 9:55:40
d 对应于时间中的日期，日期是一位则显示一位，两位则显示两位
FormatdateTime('d',now);
输出可能为1～31
dd 和d的意义一样，但它始终是以两位来显示的
FormatdateTime('dd',now);
输出可能为01～31
ddd 显示的是星期几
FormatdateTime('ddd',now);
输出为: 星期六
dddd 和ddd显示的是一样的 。
但上面两个如果在其他国家可能不一样 。
ddddd 以短时间格式显示年月日
FormatdateTime('ddddd',now);
输出为：2004-8-7
dddddd 以长时间格式显示年月日
FormatdateTime('dddddd',now);
输出为：2004年8月7日
e/ee/eee/eeee 以相应的位数显示年
FormatdateTime('ee',now);
输出为：04 （表示04年）
m/mm/mmm/mmmm 表示月
FormatdateTime('m',now);
输出为：8
FormatdateTime('mm',now);
输出为 08
FormatdateTime('mmm',now);
输出为 八月
FormatdateTime('mmmm',now);
输出为 八月
和ddd/dddd 一样，在其他国家可能不同
yy/yyyy 表示年
FormatdateTime('yy',now);
输出为 04
FormatdateTime('yyyy',now);
输出为 2004
h/hh,n/nn,s/ss,z/zzz 分别表示小时，分 ， 秒,毫秒
t 以短时间格式显示时间
FormatdateTime('t',now);
输出为 10:17
tt 以长时间格式显示时间
FormatdateTime('tt',now);
输出为10:18:46
ampm 以长时间格式显示上午还是下午
FormatdateTime('ttampm',now);
输出为：10:22:57上午
如果要在Format中加普通的字符串，可以用双引号隔开那些特定义的字符，这样普通字符串中如果含特殊的字符就不会被显示为时间格式啦：
FormatdateTime('"today is" c',now);
输出为：today is 2004-8-7 10:26:58
时间中也可以加"-"或"\"来分开日期：
FormatdateTime('"today is" yy-mm-dd',now);
FormatdateTime('"today is" yy\mm\dd',now);
输出为： today is 04-08-07
也可以用":"来分开时间
FormatdateTime('"today is" hh:nn:ss',now);
输出为：today is 10:32:23
FormatDateTime
var
s: string;
begin
//FormatDateTime 的参数1是 String 格式指令, 参数2是 TDateTime 类型的时间
s := FormatDateTime('c', Now); {返回: 2007-12-18 23:56:05}
{指令 c 表示用短格式显示日期与时间}
s := FormatDateTime('d', Now); {返回: 19}
s := FormatDateTime('d', StrToDateTime('2008-1-1')); {返回: 1}
{d 表示日期}
s := FormatDateTime('dd', Now); {返回: 19}
s := FormatDateTime('dd', StrToDateTime('2008-1-1')); {返回: 01}
{dd 表示双位日期}
s := FormatDateTime('ddd', Now); {返回: 星期三}
s := FormatDateTime('dddd', Now); {返回: 星期三}
{ddd 与 dddd 表示星期; 可能对不同的语种会有区别}
s := FormatDateTime('ddddd', Now); {返回: 2007-12-19}
{ddddd 五个 d 表示短格式日期}
s := FormatDateTime('dddddd', Now); {返回: 2007年12月19日}
{dddddd 六个 d 表示长格式日期}
s := FormatDateTime('e', Now); {返回: 7}
{e 表示年, 1位}
s := FormatDateTime('ee', Now); {返回: 07}
{ee 表示年, 2位}
s := FormatDateTime('eee', Now); {返回: 2007}
s := FormatDateTime('eeee', Now); {返回: 2007}
{eee 与 eeee 返回4位数年}
s := FormatDateTime('m', Now); {返回: 12}
{m 表示月, 1位}
s := FormatDateTime('mm', StrToDateTime('2008-1-1')); {返回: 01}
{mm 表示月, 2位}
s := FormatDateTime('mmm', Now); {返回: 十二月}
s := FormatDateTime('mmmm', Now); {返回: 十二月}
{mmm 与 mmmm 表示长格式月}
s := FormatDateTime('y', Now); {返回: 07}
s := FormatDateTime('yy', Now); {返回: 07}
s := FormatDateTime('yyy', Now); {返回: 2007}
s := FormatDateTime('yyyy', Now); {返回: 2007}
{y yy yyy yyyy 表示年; 和 e 略有不同}
s := FormatDateTime('t', Now); {返回: 0:21}
s := FormatDateTime('tt', Now); {返回: 0:22:13}
{t tt 表示时间}
s := FormatDateTime('ampm', Now); {返回: 上午}
s := FormatDateTime('tampm', Now); {返回: 0:24 上午}
{ampm 表示上午、下午}
s := FormatDateTime('h', StrToDateTime('2007-12-30 9:58:06')); {返回: 9}
s := FormatDateTime('hh', StrToDateTime('2007-12-30 9:58:06')); {返回: 09}
{h hh 表示时}
s := FormatDateTime('n', StrToDateTime('2007-12-30 9:58:06')); {返回: 58}
s := FormatDateTime('nn', StrToDateTime('2007-12-30 9:58:06')); {返回: 58}
{n nn 表示分}
s := FormatDateTime('s', StrToDateTime('2007-12-30 9:58:06')); {返回: 6}
s := FormatDateTime('ss', StrToDateTime('2007-12-30 9:58:06')); {返回: 06}
{s ss 表示秒}
s := FormatDateTime('z', Now); {返回: 24}
s := FormatDateTime('zz', Now); {返回: 524}
s := FormatDateTime('zzz', Now); {返回: 524}
{z zz zzz 表示毫秒}
s := FormatDateTime('yy\mm\dd', Now); {返回: 07\12\19}
s := FormatDateTime('yy/mm/dd', Now); {返回: 07-12-19}
s := FormatDateTime('yy-mm-dd', Now); {返回: 07-12-19}
s := FormatDateTime('yy*mm*dd', Now); {返回: 07*12*19}
{使用分隔符, - 是默认的, / 是与 - 等效的, 假如我非要用 / 显示呢?}
s := FormatDateTime('yy"/"mm"/"dd', Now); {返回: 07/12/19}
s := FormatDateTime('"当前时间是: "yyyy-m-d h:n:s:zz', Now);
{返回: 当前时间是: 2007-12-19 0:47:16:576}
{混入的字符串要包含在双引号中}
ShowMessage(s);
end;
<%=FormatDateTime(rs("date"),2)%> 这段asp代码是什么意思vbGeneralDate
0
Display a date in format mm/dd/yy. If the date parameter is Now(), it will also return the time, after the date
显示日期和/或时间 。如果有日期部分，则将该部分显示为短日期格式 。如果有时间部分，则将该部分显示为长时间格式 。如果都存在 ， 则显示所有部分 。
vbLongDate
1
Display a date using the long date format: weekday, month day, year
使用计算机区域设置中指定的长日期格式显示日期
vbShortDate
2
Display a date using the short date format: like the default (mm/dd/yy)
使用计算机区域设置中指定的短日期格式显示日期 。如默认的(月/日/年)
vbLongTime
3
Display a time using the time format: hh:mm:ss PM/AM
使用计算机区域设置中指定的时间格式显示时间
vbShortTime
4
Display a time using the 24-hour format: hh:mm
使用 24 小时格式 (hh:mm) 显示时间
delphi的formatdatetime函数怎么用?。?/h3>delphi中formatdatetime是格式化日期时间的函数，返回值是格式化后的字符串 。
function FormatDateTime(const Format string; DateTime TDateTime) string;
第一个参数是格式化字符串，第二个参数是要格式化的日期时间 。
你的语句formatdatetime('yyyymmdd', datetimepicker1.Date+10/24)中，格式化
字符串是'yyyymmdd' ， 就是将datetimepicker1.Date+10/24格式化成'yyyymmdd'
的格式，其中yyyy代表4位年，mm代表2位月，dd代表2为日，所以是不可能将10/24
的时间加上去的 。如果要加上时间的话 ， 格式化字符串可以写成'yyyymmdd hh:nn:ss' 。
怎样在sql语句内加上formatdatetime函数formatdateTime()函数返回表达式，此表达式已被格式化为日期或时间表达式 formatdateTime(Date, [, Namedformat])允许数据类型: Namedformat 指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate.
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 @index0
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日')
@formatStr格式串支持：
MM/DD/YYYY
YYYY-MM-DD
YYYY.MM.DD
YYYY/MM/DD
DD/MM/YYYY
DD.MM.YYYY
DD-MM-YYYY
YYYYMMDD或者
类似YYYY年MM月DD日
YYYYMM之间最多支持两个汉字，MMDD之间也最多支持两个个汉字
select dbo. FormatDatetime(GetDate(),'YYYY元年MM月份DD日')
不知道你什么数据库
自己创建存储过程总不会错^_^分给我吧
超级高手进FormatDateTimeFormatDateTime(Date, vbShortDate)
这样就好了··
或者你的(yyyy/mm/dd , now)尝试下....
formatdatetime(now(),2)怎么用？在asp是什么位置？显示日期你直接使用
date()
在HTML标签里面应用
就可以了
用FormatDateTime比较两个时间需要用CDate函数来将他们转成日期/时间类型，再进行比较
将
f FormatDateTime(a)<FormatDateTime(b) then
改为：
if CDate(FormatDateTime(a))<CDate(FormatDateTime(b)) then
即可 。
FormatDateTime 显示问题和你系统时间格式有关
vb formatdatetime你的自定义时间格式只能存成一个字符串，肯定不能存成系统或者VB自带的Date格式的 。因为它不支持毫秒 。解决方法有二：1.用子符串 。2.自定义数据类型 ， 例如
Private Type MyTime
Time As Date
MilliSecond As Integer
End Type
在ASP中 FormatDateTime 日期？改动一下
<%Dat=FormatDateTime(rs("AddDate"),2)
Mat=Month(Dat)
Ddat=Day(Dat)
IF Mat<10 Then
Mat="0"&Mat
End IF
IF Ddat<10 Then
Ddat="0"&Ddat
End IF
Response.Write Year(Ddat)&"-"&Mat&"-"&Ddat%>
怎么在SQL语句中加入datetime类型字段将字符转换成日期to_data(‘2012-02-09’,'YYYY-MM-DD')
如何在sql语句中格式化时间select convert(char(19),date,120) 你可以根据你的需要 改变120什么的，需要了解可以去查百度 date 是时间 char 是类型
sql语句中能加date()函数吗Date(addtimes)
改成
convert(datetime,cast(addtimes) as nvarchar(11),112)
如何在SQL查询中设置时间格式SQL的时间格式是：YYYY-MM-DD HH:NN:SS.sss其sss是毫秒，由于计算机内部时钟晶振的问题，SQL时间最小单位为3毫秒 。一般SQL时间格式处理：大都采取转换格式至datetime格式例如显示时常用到的：1、将2015转换为当年的第一天：select cast('2015'+'-1-1' as datetime)输出结果为：2015-01-01 00:00:00.0002、将2015-02转换为当年的第一天：select cast('2015-02'+'-1' as datetime)输出结果为：2015-02-01 00:00:00.000其实以上可以总结为将具有一定格式的字符串转换为日期类型，只要将年月日补全，后面的时间会默认为0时0分0秒0毫秒
如何在把SQL语句中把STRING型转为datetime型描述
返回表达式，此表达式已被格式化为日期或时间 。
语法
FormatDateTime(Date[,NamedFormat])
FormatDateTime 函数的语法有以下参数：
参数 描述
Date 必选 。要被格式化的日期表达式 。
NamedFormat 可选 。指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate 。
设置
NamedFormat 参数可以有以下值：
常数 值 描述
vbGeneralDate 0 显示日期和/或时间 。如果有日期部分，则将该部分显示为短日期格式 。如果有时间部分，则将该部分显示为长时间格式 。如果都存在，则显示所有部分 。
vbLongDate 1 使用计算机区域设置中指定的长日期格式显示日期 。
vbShortDate 2 使用计算机区域设置中指定的短日期格式显示日期 。
vbLongTime 3 使用计算机区域设置中指定的时间格式显示时间 。
vbShortTime 4 使用 24 小时格式 (hh:mm) 显示时间 。
ASP如何格式化日期的显示模式?ASP使用的是VBA，其中的使用的函数是VB中的子集，不能使用format函数进行快速格式化日期的显示模式 。如果想要的格式是YYYY-MM-DD, 获取今天的日期可以用以下代码实现：
fulldate=cstr(year(date))
fulldate=fulldate & "-" & right("0" & cstr(month(date)),2)
fulldate=fulldate & "-" right("0" & cstr(day(date)),2)
fulldate就是所需要的格式字串 。
ASP中，如何在完整日期时间中取得年月日？asp取得完整时间的年月日 可以使用FormatDateTime具体示例 比如现在有一个时间为 now()可以写成这样就是当前的年月日了 。如果是数据库里的时间 比如数据库时间字段为date 可以写成这里延伸一下：0 根据系统设置显示日期或时间1 以长日期格式显示日期2 以短日期格式显示日期3 以长时间格式显示时间4 以短时间格式显示时间
在ASP中 FormatDateTime 只能format 日期型变量么？FormatDateTime 函数
返回表达式，此表达式已被格式化为日期或时间 。
FormatDateTime(Date[, NamedFormat])
参数
Date
必选项 。要被格式化的日期表达式 。
NamedFormat
可选项 。指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate 。
设置
NamedFormat 参数可以有以下值：
常数 值 描述
vbGeneralDate 0 显示日期和/或时间 。如果有日期部分，则将该部分显示为短日期格式 。如果有时间部分，则将该部分显示为长时间格式 。如果都存在，则显示所有部分 。
vbLongDate 1 使用计算机区域设置中指定的长日期格式显示日期 。
vbShortDate 2 使用计算机区域设置中指定的短日期格式显示日期 。
vbLongTime 3 使用计算机区域设置中指定的时间格式显示时间 。
vbShortTime 4 使用 24 小时格式 (hh:mm) 显示时间 。
说明
下面例子利用 FormatDateTime 函数把表达式格式化为长日期型并且把它赋给 MyDateTime:
Function GetCurrentDate
'FormatDateTime 把日期型格式化为长日期型 。
GetCurrentDate = FormatDateTime(Date, 1)
End Function
从以上说明看只能格式化Date类型的日期
asp中formatdatetime的问题在控制面版里改电脑的时间显示方式,要改成H:mm:nn格式
ASP 自带的的函数是无法解决的?。?br>偶给你写了两个 。。你看哈合不合用 。。
方法一
<%
udate=Now()
udate=year(udate)&"-"&month(udate)&"-"&day(udate)&" "&hour(udate)&":"&minute(udate)&":"&Second(udate)
response.Write udate
%>
方法二
<%
Function datafromat()
datastr=replace(now,"上午","")
datastr=replace(now,"下午","")
datafromat=datastr
End Function
%>
关于formatdatetime()函数 asp是你系统的默认时间格式问题，，改改就行了
ちゅう 和 じゅう的用法先看看ちゅう和じゅう各自的用法
じゅう：
1．ある范囲の全体 。全てにわたって 。
2．その期间のうちずっと 。
3．その期间内に 。それを期限として 。
ちゅう：
1．ある范囲のうちであること 。
2．それが行われている时・状态であること
很明显,じゅう表示一个范围,一个全体,而ちゅう要麼表示范围内的一个点,要麼表示某个动作正在进行.所以冬休み中,念ちゅう则表示"正在放寒假",而じゅう则表示"整个寒假".勉强中只能念ちゅう,表示正在学习.
ようにも的用法谁知道表转折 的连词而、却、也（不）
可口可乐的妙用1.如果你染完发发现颜色太深了，没气的可乐能帮你把它变淡 。
2.将旧硬币浸入可乐里能让它们变得闪闪发光、更加适合收藏和装饰 。
3.把可口可乐倒入壶里静置一天可以去除污垢，让壶内胆一尘不染 。
4.倒一罐可乐到马桶里可以当清洁剂用，可乐里的酸会马上起作用 。
5.把一个倒满可乐的盘子放在花园里可以驱除植物上的虫子 。这些虫子喜欢甜甜的味道，一旦他们接触到可乐 ， 他们就插翅难飞了 。
6.如果碰到一个生锈的螺栓很难捻开，我们可以用一个浸过可乐的布包住螺栓，等几个小时之后，螺丝自然而然就会方便转开了 。
7.没气的可口可乐能治疗胃部不适 ， 但不能喝新鲜有气的可乐，因为这样的话病情反而会加重 。（如果需要的话，可以加一点糖让可乐里的气跑出来）
能说明用处就行 。。精油 。通过皮肤渗透进入血液循环 ， 能有效的调理身体 ， 达到舒缓、净化等作用 。
asp 如何把当前时间格式化成yyyy-mm-dd 然后再存到数据库输出日期格式：
<%
Dim NowDate
NowDate = FormatDateTime(Now(),1)
%>
formatdateTime(Date, [, Namedformat])
formatdateTime()函数返回表达式 ， 此表达式已被格式化为日期或时间
表达式 formatdateTime(Date, [, Namedformat])
允许数据类型: Namedformat 指示所使用的日期/时间格式的数值，如果省略，则使用 vbGeneralDate.
NamedFormat参数的设置值如下：
常数 值 描述
vbGeneralDate 0 显示日期和/或时间 。如果有日期部分，则用短日期格式显示 。如果有时间部分 ， 则用长时间格式显示 。如果都有，两部分都显示 。
vbLongDate 1 用计算机区域设置值中指定的长日期格式显示日期 。
vbShortDate 2 用计算机区域设置值中指定的短日期格式显示日期 。
vbLongTime 3 用计算机区域设置值中指定的时间格式显示时间 。
vbShortTime 4 用24小时格式（hh：mm）显示时间 。
asp如何转换日期格式日期以什么格式显示,默认是受服务器系统的区域选项中设置的格式控制的
但VB提供了一个formatdatetime函数来实现对时间格式的转换,可是其依然受服务器设置的限制,你可以尝试一下:
start_date=formatdatetime(Date,0)
并把参数0改成0,1,2,3,4依次尝试一下,看有没有一个参数能转换成你需要的格式,实在不行的话那就:要么改服务器设置(如果有权限的话),要么用字符串拼接的方式,祝你好运啦~~~
ASP程序 NOW函数 DATE函数 中间带了星期几，如何去除asp内置函数formatdatetime使用示例代码
formatdatetime(now(),0) ’则返回2004-10-18 11:45:53
formatdatetime(now(),1) ’则返回2004年10月18日
formatdatetime(now(),2) ’则返回2004-10-18
formatdatetime(now(),3) ’则返回11:47:12
formatdatetime(now(),4) ’则返回11:47
weekDayName(weekDay(date()))则返回 星期一、星期二等汉字显示 。
=========================
用下面这些代码测试一下，看效果吧
asp中怎样输出YYYY-MM-DD时间格式
文章插图
1、首先用于连接数据库，cont.asp是库文件名，如下图所示 。2、cookies的读取和判断是否为空 ， 如下图所示 。3、查询sql语句和判设置cookies的时间，如下图所示 。4、以上是新用户的处理办法，找到老用户后更新操作语句，如下图所示 。5、接下来就是把记录显示出来 ， 如下图所示就完成了 。
asp中FormatDatetime()函数问题如果time1是分别由year,month,day,表单post过来
则你要对它的格式重组一下
如:time1=CDate(Trim(request.form("year"))&"-"&Trim(request.form("month"))&"-"&Trim(request.form("day")))
再试试!
ASP里的FormatDateTime是用户自己定义的函数么？不是!
他是系统系函数!
描述
返回表达式，此表达式已被格式化为日期或时间 。
语法
FormatDateTime(Date[, NamedFormat])
FormatDateTime 函数的语法有以下参数：
参数 描述
Date 必选项 。要被格式化的日期表达式 。
NamedFormat 可选项 。指示所使用的日期/时间格式的数值 ， 如果省略，则使用 vbGeneralDate 。
设置
NamedFormat 参数可以有以下值：
常数 值 描述
vbGeneralDate 0 显示日期和/或时间 。如果有日期部分，则将该部分显示为短日期格式 。如果有时间部分，则将该部分显示为长时间格式 。如果都存在 ， 则显示所有部分 。
vbLongDate 1 使用计算机区域设置中指定的长日期格式显示日期 。
vbShortDate 2 使用计算机区域设置中指定的短日期格式显示日期 。
vbLongTime 3 使用计算机区域设置中指定的时间格式显示时间 。
vbShortTime 4 使用 24 小时格式 (hh:mm) 显示时间 。
说明
下面例子利用 FormatDateTime 函数把表达式格式化为长日期型并且把它赋给 MyDateTime:
Function GetCurrentDate
"FormatDateTime 把日期型格式化为长日期型 。
GetCurrentDate = FormatDateTime(Date, 1)
End Function
ASP FormatDateTime问题【formatdatetime】已在此问题中回答你 。
http://zhidao.baidu.com/question/12787315.html