Red de conocimiento informático - Problemas con los teléfonos móviles - ¿Cómo convertir imágenes a números binarios en VB y almacenarlas en la base de datos?

¿Cómo convertir imágenes a números binarios en VB y almacenarlas en la base de datos?

Atenuar Mst como secuencia

Atenuar rs como ADODB.Recordset

-------------------------- -------------

Set Mst = New ADODB.Stream

Mst.Type = adTypeBinary 'Tipo binario

Mst .Open

Mst.LoadFromFile Mystr 'Carga la imagen. LoadFromFile Mystr 'Carga la imagen, Mystr es la ruta de la imagen

------------------------------- -- ---- ---

rs.fields("images")= Mst.Read 'Guardar en la base de datos

Este es el código principal para guardar imágenes