Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: shiryou en 30 Noviembre 2005, 12:25 pm



Título: [HELP]leer y escribir imagenes
Publicado por: shiryou en 30 Noviembre 2005, 12:25 pm
Hola a todos! peaaso de foro que teneis aqui montado, me esta siendo la lexe de util para montar una aplicacioncita....pero weno...tengo un problemilla.

Mi jefe me ha pedido que le haga 1 ActiveX con 2 funciones, leer y escribir.

Las 2 reciben como parametro el path a una imagen determinada, pongamos c:/tmp.jpg, y lo que tengo que hacer con ellas es simplemenete eso; lee, tiene que leer la imagen y dejarla en una variable en memoria; y escribir, tiene que coger una imagen que tengo en una variable en memoria, y escribirla en el disco duro. La tecnica que estoy siguiendo para el lee es un

dim variable as byte
open path for binary as #1
    input #1, variable
close #1

y para el escribir igual pero en vez de input un write...el caso es que no me funciona y no tengo ni idea de por que....alguna ayuda??
gracias de antemano!


Título: Re: [HELP]leer y escribir imagenes
Publicado por: {_The_Alwar_} en 2 Diciembre 2005, 20:59 pm
Para guardar utiliza savepicture Imagen, Ruta-donde-guardar-imagen


Título: Re: [HELP]leer y escribir imagenes
Publicado por: dexer en 2 Diciembre 2005, 21:59 pm
o tb siguiendo como kerias hazer cambiando esto

Para leer
dim variable as string
open path for binary access read as #1
    variable = space(lof(1))
    get #1,,variable
close #1

Para escribir
open path for binary access write as #2
   put #2,,variable
close #2.

Otra forma si lo que quieres es copiarlo
FileCopy Origen,Destino.

Saludos.