<%@ Language=VBScript %> <% dim con, rs set con=server.CreateObject("adodb.Connection") con.Open "Provider=microsoft.jet.oledb.4.0;Data Source=" & server.MapPath("borosil.mdb") set rs=server.CreateObject("adodb.recordset") rs.ActiveConnection=con rs.Source="client_login" rs.CursorType=2 rs.LockType=2 rs.Open rs.AddNew rs.Fields(0)="borosil" rs.Fields(1)="samiksha" rs.Fields(2)="borosil" rs.Update rs.Close con.Close %>