Ver Mensaje Individual
  #3 (permalink)  
Antiguo 22/09/2008, 22:28
TioAquiles
 
Fecha de Ingreso: septiembre-2008
Mensajes: 3
Antigüedad: 16 años, 7 meses
Puntos: 0
Respuesta: Campos binarios en VB

Cita:
Iniciado por Kruzado Ver Mensaje
seria interesante ver el codigo que utilizas para actualizar el registro.....
El codigo que utilizo es :

Dim str As ADODB.Stream

Set str = New ADODB.Stream
str.Type = adTypeBinary
str.Open

CommonDialog1.ShowOpen

Text1 = CommonDialog1.FileName

Adodc1.Recordset.Bookmark = DataCombo1.SelectedItem

str.LoadFromFile CommonDialog1.FileName

Adodc1.Recordset.Fields("CampoDocumento").Value = str.Read
Adodc1.Recordset.Update

str.Close
Set str = Nothing