SoloCodigo

Prueba con las propiedades SelBookMark y BookMark para agregar una fila al BookMark, o sea, marcarla es..:

Me.DataGrid1.SelBookmarks.Add Me.DataGrid1.RowBookmark(DataGrid1.Row)
Con esto se agrega la fila sobre la que se encuentre el cursor...

Me.DataGrid1.SelBookmarks.Remove (0)
Con esto quitas una fila, lo que si no se el cual, supongo ha de ser la primera.

Para recorrer cada fila marcada..:
For Each VarBmk In DataGrid1.SelBookmarks
Rs.Bookmark = VarBmk
...
Se supone que aqui puedes modificar o alterar el RecordSet
pero a mi me presentó fallas
...
Next

Espero esto te sea de algo de ayuda, Saludos

Yo hago algo similar... tengo un catalogo de productos donde guardo las fotos del producto, busqué como guardar el archivo JPG o BMP directamente en el archivo de Access pero no me salía bien, además dicen .... y lo comprobé ... genera mucho espacio en disco.

Lo que yo hago es algo similar a lo que tu pretendes, en un campo de mi tabla, guardo la ruta de donde se encuentra la imagen, al momento de mostrarla al usuario uso el control IMAGE y para ponerle la imagen uso esto..:

Image1.Picture = LoadPicture(Imagen)

en "Imagen" debe de estar la ruta y nombre completo de la imagen que quieres mostrar.

Para eliminar la imagen del control IMAGE...:

Image1.Picture = LoadPicture()


Espero esto te sea de utilidad. Saludos

Necesito saber cómo abrir una tabla de Access en Modo Exclusivo, o sea, que un usuario la abra y que mientras la tenga abierta, ningún otro usuario pueda acceder a ella.

Por ejemplo, estoy capturando pagos, los cuales tienen esta estructura..:

Clave Otros Datos....
00001 .......
00002 ......

Cuando agrego un pago, la clave es generada automáticamente, a como se vayan agregando se va generando, mi forma de generar esa clave es así.... antes de grabar el nuevo registro, abro la tabla con un "SELECT MAX(clave) AS maximo FROM Tabla....." le sumo uno y ya tengo la clave, mi pregunta es....

Quiero que al momento de grabar el pago, se abra la tabla "TABLA" en modo exclusivo, o sea, bloquearla al resto de los usuarios para que no puedan abrirla mientras busco el MAXIMO y le agrego el nuevo registro....

¿CÓMO HAGO ESO..........?

La operación de agregar lo hago asi...:

Set Rs = New ADODB.RecordSet
Rs.Open "select max(Clave) as mayor from Pagos", Rc, adOpenKeyset, adLockOptimistic
If Not IsNull(Rs("mayor")) Then
Nva_Cve = Val(Rs("mayor")) + 1
Else
Nva_Cve = 1
End If
Rs.Close
Rs.Open "select * from Pagos", Rc, adOpenKeyset, adLockOptimistic
Rs.AddNew
Rs("clave") = Nva_Cve
Rs......
Rs.Update
Rs.Close

Lo que pretendo es que la tabla PAGOS quede bloqueada al resto de los usuarios mientras hago la operación de sacar el Máximo y grabar el registro..

Uso Access 2000, y ADODB para manejar los archivos