ora e data nel database

[kemin]

mi sapete dire ke stringa devo aggiungere a questo codice x salvare nel database insieme ai campi testo anche l'ora e data (dd/mm/yyy hh:mm)?

<%
if request("id")=1 then
on error resume next
dim strQuery
strQuery="INSERT INTO tabella("
dim strValori
strValori=" VALUES("
dim strSql
strSql=""

for each item in request.form
if item<>"Submit" then
strQuery= strQuery &amp; item &amp;","
strValori= strValori &amp; "'"&amp;server.HTMLEncode(request.form(item))&amp;"',"
end if
next

strQuery=mid(strQuery,1,len(strQuery)-1) &amp;")"
strValori=mid(strValori,1,len(strValori)-1) &amp;")"

set rs =server.createObject("ADODB.Recordset")
strConn="driver={Microsoft Access Driver (.mdb)}; "
strConn=strConn &amp; " DBQ=" &amp; Server.MapPath("database.mdb")
strSql= strQuery &amp; strValori
rs.open strSql,strConn
set rs=nothing
if err.number<>0 then
response.write err.number &amp;"
"&amp;err.description
else
response.write "inserimento avvenuto con successo"
end if

response.end
end if
%>
<form method="post" action="script.asp?id=1">
<input type="text" name="campo1">

<input type="text" name="campo2">

<input type="text" name="campo3">

<input type="submit" name="Submit" value="Invia">
</form>

Ps: nell' .mdb ho aggiunto una colonna di tipo data/ora di nome aData

grazie.

[Roby_72]

<form method="post" action="script.asp?id=1">
<input type="text" name="campo1" />

<input type="text" name="campo2" />

<input type="text" name="campo3" />

<input type="hidden" name="data" value="<%=right("00"& month(date(),2)%>/<%=right("00"& day(date(),2)%>/<%=year(date())%><%=hour(time())%>:<%=minute(time())%>" />
<input type="submit" name="Submit" value="Invia" />
</form>

Roby

[kemin]

uhm mi dice:

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/chat/script.asp, line 36

Response.Write(right("00"& month(date(),2))
-------------------------------------------^

[weppos]

="<%=right("00"& month(date()),2)%>/<%=right("00"& day(date()),2)%>/

[kemin]

ora al momento della memorizzazione mi da un altro errore

-2147217913
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

[kemin]

risolto..

se invece volessi mettere l'ip della persona che usa i form?

[weppos]

Request.ServerVariables("REMOTE_ADDR")

[kemin]

cioè così?

<input type="hidden" name="aIp" value="<%=Request.ServerVariables("REMOTE_ADDR")%>"/>

[kemin]

ok grazie mille...