I try many set of different code but still failed to addnew data into the database. I&#039m using Microsoft Access and Visual InterDev in developing my application. I tried the rs.Addnew method, SQL method etc but failed. the code as below:<BR><BR> dim Conn, Rs<BR> dim strSQL<BR> <BR> set Conn = server.CreateObject("ADODB.Connection")<BR> Conn.Open "Leave"<BR> <BR> strSQL = "SELECT * FROM StaffLeaveRecord"<BR> set rs = server.CreateObject("ADODB.Recordset")<BR> <BR> rs.Open strSQL, Conn, adOpenKeyset,adLockOptimistic <BR><BR> rs.AddNew <BR> rs("StaffID") = Request.Form("StaffID")<BR> rs("From") = strFrom<BR> rs("To") = strTo<BR> <BR> rs("Duration") = Request.Form("Duration")<BR> rs.Update <BR> <BR> rs.Close <BR> Conn.Close <BR> set rs = nothing<BR> set conn = nothing<BR>