+1 ad access. aiuto con codice e stringa

[enrico.marconi]

ciao a tutti
io non sono praticissimo di asp
devo solo fare una pagina bianca che quando viene caricata mi fa un +1 su un database
un incremento in pratica

ecco un po di codice che ho buttato giu ma mi manca tutto l aggiornamento o il +1
qualcuno saprebbe aiutarmi?

<%

Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\Inetpub\webs\nomedominioext\mdb-database\database.mdb;"

sql = "SELECT * FROM Nomi"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3



%>

<%
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>

[enrico.marconi]

ho risolto da solo in un modo un po strano...
ora pero'0 chiedo un aiuto sulla stringa che fa il +1 che è questa:

Command1.CommandText = "UPDATE sms SET inviati = inviati + 1 WHERE ID= " + Replace(Command1__paramID, "'", "''") + " "


pero' in pratica vorrei anche aggiornare un altro campo che si chiama "inviato" che sarebbe impostato con DateNow()

in pratica vorrei che si aggiornasse la data di quando si fa il +1

mi sapete dire come devo modificare la stringa?
grazie