我的系统下now()函数取得时间格式为"2005-10-3 下午 02:46:24",怎么办???100分在线

2005-10-03 02:59:18 434 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

uhoo 墨衍会员 · AI 创作全网分发关注 + 加入社区

【MATLAB】绘制泽尼克多项式上次只给了公式没有给代码，很多小伙伴表示不是很认可。今天直接把代码发上来了。阅读详情

如题

...全文

SolidWorks+ADAMS双验证：你的机械臂力矩计算真的靠谱吗？本文探讨了机械臂力矩计算中手工计算的局限性，并介绍了SolidWorks和ADAMS双验证方法的重要性。通过实际案例展示了动态工况下传统计算方法的误差，详细解析了SolidWorks精准质心捕捉和ADAMS动力学仿真的关键技术，帮助工程师构建计算-仿真-实测闭环验证流程，确保机械臂设计的可靠性和安全性。阅读详情

uhoo

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

lsjack 2006-04-22

打赏
举报

此问题似乎修改时间区域没有用，在win2000系统下，修改了时间区域后，VB返回的结果是没问题了，但是在ASP返回的结果还是一样。是否要设置其他地方？

hreoghost 2006-04-21

打赏
举报

学习

laihongbo524 2005-10-06

打赏
举报

Public Function Format_Time(s_Time, n_Flag)
'******************************************************
'　作用：格式化时间(显示)。
'　参数：二个，一个是时间，另外一个是格式化的参数，也就是要用那种形式参数：n_Flag
' 1:"yyyy-mm-dd hh:mm:ss"
' 2:"yyyy-mm-dd"
' 3:"hh:mm:ss"
' 4:"yyyy年mm月dd日"
' 5:"yyyymmdd"
' 6:"yyyymmddhhmmss"
' 6:"yyyymmddhhmm"
'　返回：相应的日期格式
'　注意：调用时要注意，使用本函数的相关返回值.
'******************************************************
Dim y, m, d, h, mi, s
Format_Time = ""
If IsDate(s_Time) = False Then Exit Function
y = cstr(year(s_Time))
m = cstr(month(s_Time))
If len(m) = 1 Then m = "0" & m
d = cstr(day(s_Time))
If len(d) = 1 Then d = "0" & d
h = cstr(hour(s_Time))
If len(h) = 1 Then h = "0" & h
mi = cstr(minute(s_Time))
If len(mi) = 1 Then mi = "0" & mi
s = cstr(second(s_Time))
If len(s) = 1 Then s = "0" & s
Select Case n_Flag
Case 1
' yyyy-mm-dd hh:mm:ss
Format_Time = y & "-" & m & "-" & d & " " & h & ":" & mi & ":" & s
Case 2
' yyyy-mm-dd
Format_Time = y & "-" & m & "-" & d
Case 3
' hh:mm:ss
Format_Time = h & ":" & mi & ":" & s
Case 4
' yyyy年mm月dd日
Format_Time = y & "年" & m & "月" & d & "日"
case 5
'yyyymmdd
Format_time= y&m&d
case 6
'yyyymmddhhmmss
Format_time=y&m&d&h&mi&s
case 7
'yyyymmddhhmm
Format_time=y&m&d&h&mi
End Select
End Function

response.write Format_Time(now,1)

laogou 2005-10-06

打赏
举报

更控制面板时间区域就可以
不过最好是自己写个类似FormatDate的函数，这样对任何时间格式都可以应付自如了

beiouwolf 2005-10-06

打赏
举报

怎么越说越麻烦了
很简单的问题,NOW取得是完整的时间
需要部分只要用year,day,month不就可以了
取得当前年:year(now())
取得当前月:month(now())
取得当前日:day(now())

2880241 2005-10-06

打赏
举报

year()day()month()
三个取值函数可以解决你的问题

Scarroot 2005-10-06

打赏
举报

老问题啦.
重编译内核就OK了

-神仙- 2005-10-06

打赏
举报

楼上真幽默

bigluckyfox 2005-10-06

打赏
举报

老问题了
重装系统吧

holoon 2005-10-06

打赏
举报

有两个地方解释错了，不好意思。

holoon 2005-10-06

打赏
举报

<%
function times(fname,ftype)
dim years,months,days,hours,minutes,seconds
years = year(now())
months = month(now())
days = day(now())
hours = hour(now())
minutes = minute(now())
seconds = second(now())
if len(months) < 2 then
months="0" & months
end if
if len(days) < 2 then
days = "0" & days
end if
if len(hours) < 2 then
hours = "0" & hours
end if
if len(minutes) < 2 then
minutes = "0" & minutes
end if
if len(seconds) < 2 then
seconds = "0" & seconds
end if
ftype = ftype
if ftype = "f" then '类型为 f 时,格式为：20050912135503-5132
fname = years & months & days & hours & minutes & seconds & "-" & Make4numeric
fname = replace(fname," ","")
fname = replace(fname,":","")
fname = replace(fname,"年","")
fname = replace(fname,"月","")
fname = replace(fname,"日","")
fname = replace(fname,"PM","")
fname = replace(fname,"AM","")
fname = replace(fname,"上午","")
fname = replace(fname,"下午","")
fname = replace(fname,"上午","")
fname = replace(fname,"下午","")
elseif ftype = "t" then '类型为 f 时,格式为：2005-09-12 13:55:03
fname = years & "-" & months & "-" & days & " " & hours & ":" & minutes & ":" & seconds
fname = replace(fname,"年","")
fname = replace(fname,"月","")
fname = replace(fname,"日","")
fname = replace(fname,"PM","")
fname = replace(fname,"AM","")
fname = replace(fname,"上午","")
fname = replace(fname,"下午","")
fname = replace(fname,"上午","")
fname = replace(fname,"下午","")
elseif ftype="d" then '类型为 f 时,格式为：2005-09-12
fname = years & "-" & months & "-" & days
end if
times = fname
end function

response.write times(now(),"f")
response.write "<br>"
response.write times(now(),"t")
response.write "<br>"
response.write times(now(),"d")
%>

这是我自已写的，你试试看。

dreampeter 2005-10-04

打赏
举报

更改机器时间区域就可以了
不过最好是自己写个类似FormatDate的函数，这样对任何的时区都可以应付自如了

oldmht 2005-10-04

打赏
举报

公开什么，楼上的，你那代码还是会出来早上下午的！

yb2008 2005-10-04

打赏
举报

更改你的电脑时间格式

lion9910 2005-10-04

打赏
举报

这个是自己机器设置的问题，要是自己做服务器改一下就好了，租的服务器的话一般来说都是普通的格式，实在不放心就自己写一个函数规范一下好了

Camelot 2005-10-03

打赏
举报

晕死，Tab键-_-，把上面的代码放在公共页，以后调用Now()就不会了，本来这代码留着自己用的，公开吧。

Camelot 2005-10-03

打赏
举报

Function Now()
Now = Date() & " " & Time()
End Function

Camelot 2005-10-03

打赏
举报

Function Now()

End Function

Mapleleaf123 2005-10-03

打赏
举报

设置一下你机子时间的格式

fluxayxxx 2005-10-03

打赏
举报

你希望取得什么格式？？
replace转换一下不就可以了

加载更多回复（1）

我的系统下now()函数取得时间格式为"2005-10-3 下午 02:46:24",怎么办???100分在线

相关推荐