codice:
<%response.write "&coll="%><%= Application("ActiveUsers") %>
<% 
response.CacheControl = "no-cache"
Dim Conn,Rs 

Set Conn = Server.CreateObject("ADODB.Connection") 

Conn.open ("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Inetpub\wwwroot\utenti.mdb") 

Set Rs = Server.CreateObject("ADODB.Recordset") 

sql="SELECT * FROM lista" 

Rs.Open sql,Conn,3,3 




rs.AddNew

rs("ID") = "6"
rs("user") = "userf"
rs("pass") = "passf"

rs.Update

rs.Close 
set rs = Nothing 
conn.Close 
set conn = Nothing
%>
funziona, aggiunge un record con ID 6 come user "userf" e come pass "passf" tutto ok