How to Update Every Record in a Table

[Mel]

Can anyone assist me in how I would structure this code to update
every record in a table? I need to loop through each record and
increase the cost field by a certain percentage. How do I loop
through *and* update each record? Here is my code so far:

'Start of Example Code
Dim strConStand As String = "Provider=Microsoft.JET.OLEDB.4.0;Data
Source =c:\w\standards.mdb"
Dim strFreight As String = "Select [Cost] FROM [Freight];"
Dim recFreight As System.Data.OleDb.OleDbDataReader
Dim conFreight As New
System.Data.OleDb.OleDbConnection(strConStand)
Dim comFreight As New System.Data.OleDb.OleDbCommand(strFreight,
conFreight)

conFreight.Open()
recFreight = comFreight.ExecuteReader

Do While recFreight.Read
'increase every cost by 5%
Loop
recFreight.Close()
conFreight.Close()
'End of Example Code

[sloan]

That's the last thing you want to do is LOOP and UPDATE.

Here is a one hit (bulk update) statement.

Update [Freight] Set [Cost] = ([Cost] * 1.05)

Use .ExecuteNonQuery

"Mel" <ML********@gmail.comwrote in message
news:d7**********************************@26g2000h sk.googlegroups.com...

Can anyone assist me in how I would structure this code to update
every record in a table? I need to loop through each record and
increase the cost field by a certain percentage. How do I loop
through *and* update each record? Here is my code so far:

'Start of Example Code
Dim strConStand As String = "Provider=Microsoft.JET.OLEDB.4.0;Data
Source =c:\w\standards.mdb"
Dim strFreight As String = "Select [Cost] FROM [Freight];"
Dim recFreight As System.Data.OleDb.OleDbDataReader
Dim conFreight As New
System.Data.OleDb.OleDbConnection(strConStand)
Dim comFreight As New System.Data.OleDb.OleDbCommand(strFreight,
conFreight)

conFreight.Open()
recFreight = comFreight.ExecuteReader

Do While recFreight.Read
'increase every cost by 5%
Loop
recFreight.Close()
conFreight.Close()
'End of Example Code

[Mel]

On Aug 18, 10:46 am, "sloan" <[e-mail]:

That's the last thing you want to do is LOOP and UPDATE.

Here is a one hit (bulk update) statement.

Update [Freight] Set [Cost] = ([Cost] * 1.05)

Use .ExecuteNonQuery

"Mel" <[e-mail] in message

news:d7**********************************@26g2000h sk.googlegroups.com...

Can anyone assist me in how I would structure this code to update
every record in a table? I need to loop through each record and
increase the cost field by a certain percentage. How do I loop
through *and* update each record? Here is my code so far:

'Start of Example Code
Dim strConStand As String = "Provider=Microsoft.JET.OLEDB.4.0;Data
Source =c:\w\standards.mdb"
Dim strFreight As String = "Select [Cost] FROM [Freight];"
Dim recFreight As System.Data.OleDb.OleDbDataReader
Dim conFreight As New
System.Data.OleDb.OleDbConnection(strConStand)
Dim comFreight As New System.Data.OleDb.OleDbCommand(strFreight,
conFreight)

conFreight.Open()
recFreight = comFreight.ExecuteReader

Do While recFreight.Read
'increase every cost by 5%
Loop
recFreight.Close()
conFreight.Close()
'End of Example Code

Ahh, it's all coming back to me now. Thanks for the guidance to shake
my cobwebs loose; it worked great.