Visual Basic - urgente, es mi tesis

Life is soft - evento anual de software empresarial
 
Vista:

urgente, es mi tesis

Publicado por carolina ivette (4 intervenciones) el 13/10/2001 01:21:12
deseo guardar un grafico desde visual en un campo OLE de access, capturo la reuta con un drilist y un drivelist pero simplemente no me lo guarda.
Alguien sabe como ????
Se los agradecere...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:urgente, es mi tesis

Publicado por Cha Men (92 intervenciones) el 13/10/2001 05:15:44
si lo quieres de una manera sencilla, prueba este método:
enlaza un control picturebox a un datacontrol y en picturebox lo enlaza con el campo ole. Automáticamente cada vez q cargue una imagen en el picturebox y le das un update al datacontrol te guarda la imagen en el campo.

espero q t sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:urgente, es mi tesis

Publicado por principiante (55 intervenciones) el 13/10/2001 19:22:51
Hola Carolina:
preocupado por tu tesis, me he dado en la tarea de ayudarte a buscar algun código que pueda ayudarte, y he encontrado el siguiente (pruebalo y me cuentas):

v Insertar Imágenes en Bases de Datos Access
Colocar un campo en la base de datos y definirlo como 'objeto OLE'
Luego incluir un cuadro de imagen (como puede ser Image1) y en él colocar el siguiente código en la sección del control que dice DblClick, o donde más te guste.

If Clipboard.GetFormat(vbCFText) Then
MsgBox ("Solo hay texto en el portapapeles")
ElseIf Clipboard.GetFormat(vbCFBitmap) Then
Screen.ActiveForm.Image1.Picture = Clipboard.GetData(vbCFBitmap)
ElseIf Clipboard.GetFormat(vbCFMetafile) Then
Screen.ActiveForm.Image1.Picture = Clipboard.GetData(vbCFMetafile)
ElseIf Clipboard.GetFormat(vbCFDIB) Then
Screen.ActiveForm.Image1.Picture = Clipboard.GetData(vbCFDIB)
End If
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar