• Domingo 17 de Noviembre de 2024, 20:45

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Temas - chuck_x25

Páginas: [1]
1
VB .NET / Problemas Con Blob
« en: Martes 19 de Junio de 2007, 16:45 »
Hola
Espero que me puedan ayudar
Estoy haciendo un programa (no soy muy bueno programando) el cual debe accesar a la base de datos (en oracle), se debe de mostrar la lista de archivos blob que tengo y al seleccionar uno mostrar el contenido de este archivo (sea musica, imagenes, pdf, etc) y si alguno de estos archivos esta encriptado debera mostrar caracteres raros. El problema que tengo es que al poner el SQL sin mencionar la columna con el blob me muestra la informacion, pero si selecciono la columna de blobs me marca un error.
Los blobs de la tabla se encuentran en una columna llamada BIN y la tabla se llama archivos, de esta forma:

Archivos:
|  co_archivo  |   nombre_archivo  |------BIN----|----fx_alta---|
| ------1-------|------ prueba1-----|  (hugeblob)|   17/jun/07  |
| -------2------| ------prueba2-----|  (hugeblob)|   18/jun/07  |

parte de mi codigo esta asi:

 Dim conexion, consulta As String
conexion = "Provider=MSDAORA.1;" & "Data Source=datasource;" & "User id=userid;" & "Password=pw;" & "Persist Security Info=False"
Dim con As New OleDbConnection(conexion)
Dim adaptador As OleDbDataReader
        consulta = "SELECT bin FROM archivos"
Dim comando As New OleDbCommand(consulta, con)
 con.Open()
  MsgBox("      Conectado")
adaptador = comando.ExecuteReader
While adaptador.Read

checkedlistbox1.Items.Add(adaptador.Item(0))   'aqui es donde se deben mostrar
                                                                       'la lista de blobs

End While

Se que asi debe de estar mal. pero tambien ya intente hacerlo usando el metodo de DataSet y y DataAdapter, y siempre muestra errores en el:
"da.Fill(ds, "archivos")      y he intentado de otras formas que tampoco me han funcionado.
Por favor si alguien me puede indicar como lograr esto lo agradeceria mucho.
Gracias

Páginas: [1]