改变下载列表日期显示格式“****年月日*时分秒”为“****..”

2020-04-15 12:26:58

字体：大中小

来源：转载

供稿：网友

解决方法:
在文件Admin/Refresh/Function.asp中
(1)把
TempletContent = Replace(TempletContent,"{DownLoad_AddTime}",DownLoadRecordObj("AddTime"))
替换成
DateStr=DownLoadRecordObj("AddTime")
DateString = Year(DateStr)&"年"&Month(DateStr)&"月"&Day(DateStr)&"日"
TempletContent = Replace(TempletContent,"{DownLoad_AddTime}",DateString)
(2)把

TempletContent = Replace(TempletContent,"{DownLoad_EditTime}",DownLoadRecordObj("EditTime"))
替换成
dim DateStr,DateString
DateStr=DownLoadRecordObj("AddTime")
DateString = Year(DateStr)&"年"&Month(DateStr)&"月"&Day(DateStr)&"日"
TempletContent = Replace(TempletContent,"{DownLoad_EditTime}",DateString)

上一篇：添加下载列表内容简介字数控制