HI,i convert current date format in SQL database as YYYY-MM-DD, after i key in the date as (e.g 2012-11-20), it unavailable to update.

kindly advise, thank you.





<!--#INCLUDE VIRTUAL="/MMS-Test/includes/connection.asp"-->




<%


Dim SystemTime,objRSTime

SystemTime = "SELECT CONVERT (DATE, SYSDATETIME())AS DATE"
Set objRSTime = Server.CreateObject("ADODB.Recordset")
objRSTime.Open SystemTime, oConnection


DIM CurrentTime,EmpID,EmpName,PINVDATE,STRANSID,PVENDO R,PREFNO,PTQTY,PREMARK,EmpLevel
CurrentTime = Request.Form("SystemTime")
EmpID = Request.Form("HEmpID")
EmpName = Request.Form("HEmpName")
EmpLevel = Request.Form("HEmpLevel")
PINVDATE = Request.Form("PINVDATE")
STRANSID = Request.Form("STRANSID")
PVENDOR = Request.Form("PVENDOR")
PREFNO = Request.Form("PREFNO")
PTQTY = Request.Form("PTQTY")
'SREASONID = Request.Form("SREASONID")
PREMARK = Request.Form("PREMARK")


'*************** Check Mandatory Field Start ***************


If TRIM(PINVDATE) = "" and TRIM(PTQTY) = "" Then

Msg = "** Mandatory Field not filled, please check !!!"

Response.Redirect "plan.asp?empid="& EmpID & "&Name=" & EmpName & "&EmpLevel=" & EmpLevel & "&ref=" & Msg



else



If TRIM(PINVDATE) = "CurrentTime" = false THEN

Msg = "** Date not filled, Please Check !!!"


Response.Redirect "plan.asp?empid="& EmpID & "&Name=" & EmpName & "&EmpLevel=" & EmpLevel & "&ref=" & Msg

else


if TRIM(PTQTY) = "" then

Msg = "** Quantity not filled, Please Check !!!"

Response.Redirect "plan.asp?empid="& EmpID & "&Name=" & EmpName & "&EmpLevel=" & EmpLevel & "&ref=" & Msg




'*************** Update Transaction Data Start ***************

'*************** Check Value Stat Start ***************




End if

End if

end if

'*************** Get Latest Transaction ID End ***************



'*************** Update Transaction Qty Data Start ***************



DIM mySQL1

mySQL1 = "INSERT INTO OTH_INV_PLAN (INV_DATE,INV_ID,INV_PLANQTY,INV_VENDORS,INV_PLAN_ REFNO,INV_PLAN_REMARK,INV_PCREATE_DATE,INV_PCREATE _USER) values ('"&PINVDATE&"','"&STRANSID&"','"&PTQTY&"','"&PVEN DOR&"','"&PREFNO&"','"&PREMARK&"',GETDATE(),'"&Emp ID&"')"


DIM objRS1
Set objRS1 = Server.CreateObject("ADODB.Recordset")
objRS1.Open mySQL1, oConnection

Msg = "Plan Quantity Transaction Done !!!"

Response.Redirect "plan.asp?empid="& EmpID & "&Name=" & EmpName & "&EmpLevel=" & EmpLevel & "&ref2=" & Msg



%>


<%
oConnection.Close
Set oConnection = Nothing
%>