⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 time.asp

📁 ASP编程实例入门与提高书中的实例源代码
💻 ASP
字号:
<html>
<head>
<title>显示时间和日期</title>
</head>
<body>
<center>
<font size="5" face="隶书" >欢迎购买实例入门与提高丛书!</font>
</center>
</body>
</html>
<%
d=time()
c=cstr(time())
Response.Write("<p>")
c00=instr(c,":")
c1=mid(c,1,c00-1)
c01=instr(c00,c,":")
c2=mid(c,c00+1,c01-1)
c3=right(c,2)
if cint(c3)<10 then
 c3=cstr(cint(c3))
end if
if cint(c1)<13 then
 c1="上午"&c1
else
 if cint(c1)>16 then
   c1=cstr(cint(c1)-12)
   c1="晚上"&c1
 else
   c1=cstr(cint(c1)-12)
   c1="下午"&c1
 end if
end if
rem将所取得的系统时间输出到浏览器端
Response.Write "时间是:"&c1&"时"&c2&"分"&c3&"秒"

%>
 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -