Visual Basic - Me da un Error en ADODB

Cuando quiero modificar un datos de un Campo:
rst.fields("estado")= "B"
Me da el Error de:
"Current recordset does not support updating. This may be a limitation
of the privider or of the selected locktype"

He abierto la Base de Datos de esta forma:

sbase = App.Path & "\base de datos\soporte.mdb"
Set cnn = New adodb.Connection
Set rst_hard = New adodb.Recordset
cnn.Open "provider=Microsoft.Jet.OLEDB.4.0; data source=" & sbase
rst_hard.Open "select * from hardware", cnn, adOpenDynamic, _ adLockOptimistic

Esto en el Form Load, y cuando quiero buscar el registro y luego que lo modifique:

sBuscar = "SELECT * FROM hardware WHERE num_pc LIKE '" & sBuscar & "'"
Set rst_hard = cnn.Execute(sBuscar)

ya cuando hago esto:

rst_hard("Estado")= "b"

Me da el Anterior Error....

POR FAVOR, me prodian ayudar, estoy comenzando con esto de las Bases de Datos.

Hola.

El objeto Connection tiene una propiedad Mode. Fijate que no esté en modo de sólo lectura.

Y también, en vez de hacer

Set rst_hard = cnn.Execute(sBuscar)

poné

rst_hard.Close
rst_hard.Open sBuscar, cnn, adOpenDynamic, _ adLockOptimistic

Espero que te sirva de algo.
Saludos.