Foros del Web » Programación para mayores de 30 ;) » .NET »

sacar foto a archivo y ponerla en un PictureBox1????

Estas en el tema de sacar foto a archivo y ponerla en un PictureBox1???? en el foro de .NET en Foros del Web. Saludos amigos del foro, tengo un problema que me tiene con dolor de cabeza. La situación es la siguiente; La aplicación (vb.net) que estoy haciendo ...
  #1 (permalink)  
Antiguo 24/08/2006, 09:29
 
Fecha de Ingreso: noviembre-2004
Mensajes: 42
Antigüedad: 20 años, 3 meses
Puntos: 0
sacar foto a archivo y ponerla en un PictureBox1????

Saludos amigos del foro, tengo un problema que me tiene con dolor de cabeza. La situación es la siguiente;

La aplicación (vb.net) que estoy haciendo consiste en guardar archivos tales como (.doc,.xls,.pdf,.txt) dentro de una base de datos en un campo “documento” con tipo de dato “image”. Lo que quiero hacer es sacar una foto a la primero hoja del documento y mostrarla en un PictureBox1(como puedo hacer lo) el documento lo obtengo en la base como byte()

La forma de cómo muestro el documento, es la de abrir un archivo con su respectiva aplicación, pero eso no me sirve de mucho a lo que deseo hacer. El codigo con que hago esto es:

Cita:
Public Function AbreDocumento(ByVal fname As String, ByVal DocBits() As Byte, ByVal Extension As String) As Boolean
Dim binWrt As BinaryWriter
Directory.CreateDirectory(TempWorkDir)

Try

Dim FlsStrm As FileStream = New FileStream(TempWorkDir + "\" + fname + Extension, _
FileMode.OpenOrCreate, FileAccess.Write)

binWrt = New BinaryWriter(FlsStrm)
binWrt.Write(DocBits)
binWrt.Flush()
binWrt.Close()
FlsStrm.Close()
'abro el documento
System.Diagnostics.Process.Start(TempWorkDir + "\" + fname + Extension)
NomArchivo = TempWorkDir + "\" + fname + Extension

Return True

Catch ex As Exception
MsgBox(ex.Message)
Return False
End Try

End Function

La función la llamo de la siguiente forma

Cita:
Dim Fila() As DataRow = DbImagesDataSet.GImagenes.Select("id_cliente=" + _
Me.DataGridView1.Item(0, e.RowIndex).Value)

AbreDocumento(Fila(0).Item("nombre"), Fila(0).Item("documento"), _
Fila(0).Item("extension"))
Se podra hacer lo que intento, si esposible porfavor ayudenme. Espero haberme esplicado bien, de ante mano gracias

salu2
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:42.