VBscript 日期格式

Question

这是我的查询。

 strSQL = "Select task,to_char(ddat,'dd/mm/yyyy') as ddat from task where guid = '"&lvGuid&"'"
        'Response.write strSQL
        objRS.Open strSQL, objConn

            If objRS.RecordCount > 0 Then
                strTask = objRS("task")
                strDate = objRS("ddat")
            Else
                strTask = ""
                strDate = ""
            End If

如果人们在截止日期后完成他们的任务以询问原因，我想显示一个文本区域。但问题是 if else statement 不能是运行。当此人逾期时，程序不显示 textarea。

<form name="form1" method="post" action="taskconfirm.asp" >

    <h2>Ticket : <input type="text" name="txtTask" value="<%=strTask%>" style="height:35px; font-size: 18pt; border:none;" readonly> </h2>

    <p>Today's Date: <%=Date()%></p>
    <p>Due Date: <%=strDate%></p>
    <p>By reaching to this link, you have completed the ticket above. Please click the button below to confirm</p>
    <br>
    <!-- ASP IF ELSE CONDITION HERE DATE - OVERDUE -->
        <%If Date() > strDate then %>
        <%response.write("Please give a reason for ticket overdue :")%><br/>
        <textarea type="text" name="txtreas" rows="4" cols="40" id="txtareaId"></textarea>
        <%end if%>
    <input type="submit" name="txtConfirm" value="Confirm" ">
    </form>

我很感激任何努力 help.Thanks 的人。

Answer 1

如果年份在最后，VBScript 将日期文字解释为 mm/dd/yyyy。您的 SQL 语句将日期格式化为 dd/mm/yyyy，因此它会被错误地解释（月份和日期将被交换）。

例如，今天是August 12, 2015。您的 SQL 语句是 returning:

12/08/2015

但 VBScript 将此日期视为 December 8, 2015。

如果您改为 return 日期为：

2015/08/12

那么 VBScript 就不会混淆了，因为当格式化为年份在前时，月份总是在年份之后 (yyyy/mm/dd)。

VBscript 日期格式

VBscipt date format

html

oracle

vbscript

asp-classic