Updating the Records

Updating Records

If you know how to insert records, then updating them is a breeze. Because

you're already come more than halfway while inserting records!

<HTML>

<HEAD>

<TITLE>Student Records</TITLE>

</HEAD>

<body>

Dim DB

Set DB = Server.CreateObject (“ADODB.Connection”)

DB.Mode = adModeReadWrite

DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" +

“C:\Databases\Students.mdb”)

Dim RS

Set RS = Server.CreateObject (“ADODB.Recordset”)

RS.Open “SELECT * FROM Students WHERE FirstName = ‘Manas'”,

DB, adOpenStatic, adLockPessimistic

RS (“Email”) = “mynewemail@manastungare.com”

RS (“DateOfBirth”) = CDate(“4 Feb, 1980”)

RS.Update

</BODY>

</HTML>

As you can see, everything else remains the same. Firstly, you need just

position the current pointer to the record that you wish to update. Use a proper

SQL statement to achieve this. (It is advisable to check if that record exists,

prior to modifying it.)

Then, as earlier, modify the records by assigning new values to them. You

need not assign values to all fields; just modify the fields you need. Then

execute the RS.Update statement to write the changes back to the database.