I have my access2000 database set up to take short date format (mm/dd/yyyy).
I have the date values passing along great to the insert page, the url will show like month=6&day=11&year=2002 but then It wont let me combine the month/day/year into one value of mm/dd/yyyy to insert.
here is my code, any suggestions are greatly appreciated.
the MM_EPHIntra_String is part of Dreamweaver's code, and I have left the response.redirect empty on purpose to see how it's passing values.
<%
Dim RS
set rs = Server.CreateObject("ADODB.Recordset"
rs.ActiveConnection = MM_EPHIntra_STRING
rs.Source = "SELECT Top 1 * FROM tblTasks"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 3
rs.Open()
%>
<%
rs.addnew
rs("fldUser"
= Request.cookies("EPHUsername"
rs("fldSubject"
= Request.Form("txtTaskSub"
rs("fldTaskDetail"
= Request.Form("txtTaskDetail"
rs("fldDateDue"
= "#" & Request.Form("month"
& "/" & Request.Form("day"
& "/" & Request.Form("year"
& "#"
rs.update
response.redirect ""
%> "I like a man who grins when he fights."
-- Prime Minister Winston Churchill
Stuart
I have the date values passing along great to the insert page, the url will show like month=6&day=11&year=2002 but then It wont let me combine the month/day/year into one value of mm/dd/yyyy to insert.
here is my code, any suggestions are greatly appreciated.
the MM_EPHIntra_String is part of Dreamweaver's code, and I have left the response.redirect empty on purpose to see how it's passing values.
<%
Dim RS
set rs = Server.CreateObject("ADODB.Recordset"
rs.ActiveConnection = MM_EPHIntra_STRING
rs.Source = "SELECT Top 1 * FROM tblTasks"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 3
rs.Open()
%>
<%
rs.addnew
rs("fldUser"
rs("fldSubject"
rs("fldTaskDetail"
rs("fldDateDue"
rs.update
response.redirect ""
%> "I like a man who grins when he fights."
-- Prime Minister Winston Churchill
Stuart