ASP FormatDateTime - 删除"工作日"

时间:2015-04-10 14:40:23

标签: vbscript asp-classic

我确信这将是一个简单的答案,但如果我能在任何地方找到它,我会被诅咒。我有一个简单的ASP脚本,显示上次修改的asp页面日期。代码在这里:

<%

Dim strFileName
Dim dtmLastModified
Dim dtmLastModifiedDate

strFileName = Request.ServerVariables("SCRIPT_NAME")
strFileName = Replace(strFileName, "/", "\")
strFileName = Server.MapPath(strFileName)

Set objFileSystemObject = Server.CreateObject("Scripting.FileSystemObject")

Set objFile = objFileSystemObject.GetFile(strFileName)
dtmLastModified = objFile.DateLastModified
Set objFile = Nothing

Set objFileSystemObject = Nothing

dtmLastModifiedDate = FormatDateTime(dtmLastModified, 1)

Response.Write("Last Updated: " & dtmLastModifiedDate)
%>

显示如下:

Last Updated: Friday, April 10, 2015

我们需要做的就是删除Friday,,但似乎无法弄清楚如何。

1 个答案:

答案 0 :(得分:1)

根据FormatDateTime上的此链接,没有任何格式可以按您想要的格式输出月,日,年。您可以通过以下方式从日期时间返回该格式的Month Day, Year

dtmLastModifiedDate = MonthName(Month(dtmLastModified)) & " " & Day(dtmLastModified) & ", " & Year(dtmLastModified)

您必须将此FormatDateTime行替换为此行才能生效。

此信息可在this link的备忘单中找到。希望这有帮助!