Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)

Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

Foro

Web

Blog

26 Abril 2024, 09:11 am

Tema destacado: Security Series.XSS. [Cross Site Scripting]

Foro de elhacker.net

Programación

Programación General

.NET (C#, VB.NET, ASP)

Programación Visual Basic (Moderadores: LeandroA, seba123neo)

Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)

0 Usuarios y 1 Visitante están viendo este tema.

Páginas: [1]

Autor

Tema: Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original) (Leído 2,133 veces)

ProgramadorVB

Desconectado

Mensajes: 29

Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)

« en: 2 Junio 2010, 20:49 pm »

Hola amigos, cómo están, espero que muy bien.

Estoy modificando un proyecto, para descargar cualquier archivo en varias partes... para acelerar el proceso de descarga...

El tema es que luego de descargar las partes por separado... no puedo unirlo todo, en un archivo correcto... que en mi ejemplo es un JPG... ya he probado pero no logro dar con la tecla...

Espero que me puedan ayudar... publico aquí el proyecto, limpio de mis intentos de unión... para que se entienda mejor...

Por favor, necesito ayuda con esto, ya que me estoy volviendo loco :-(

Gracias de antemano...

Un saludo

PD: El archivo: http://www.gigasize.com/get.php?d=9zhgjshb3qd
PD: Gracias


« Última modificación: 2 Junio 2010, 21:01 pm por ProgramadorVB »	En línea

ProgramadorVB

Desconectado

Mensajes: 29

Re: Cómo Unir Partes De Un Mismo Archivo (Para Crear El Original)

« Respuesta #1 en: 3 Junio 2010, 01:05 am »

Hola, ya me respondieron... ésta es la solución:

Dim Parte1 As String, Parte2 As String, Parte3 As String
Open "C:\Prueba.001" For Binary As #1
Parte1 = Space$(LOF(1))
Get #1, 1, Parte1
Close #1
Open "C:\Prueba.002" For Binary As #1
Parte2 = Space$(LOF(1))
Get #1, 1, Parte2
Close #1
Open "C:\Prueba.003" For Binary As #1
Parte3 = Space$(LOF(1))
Get #1, 1, Parte3
Close #1

Open "C:\Prueba.jpg" For Binary As #1
Put #1, 1, Parte1 & Parte2 & Parte3
Close #1

Un saludo y gracias.


	En línea

Páginas: [1]

Ir a:

Mensajes similares
	Asunto	Iniciado por	Respuestas	Vistas	Último mensaje
	[JARs] Como modificar un archivo que esté en un mismo jar? Java	klaine	4	8,877	28 Mayo 2011, 23:15 pm por klaine
	Crear archivo .Bat que se copie a si mismo en diversos lugares « 1 2 » Scripting	xpaRtanus	16	10,336	27 Mayo 2013, 16:12 pm por Meine programmen
	Unir dos redes que tienen el mismo direccionamiento ip Redes	dasoman	2	2,923	29 Abril 2012, 23:46 pm por nonroot
	¿Cómo crear un archivo de log para Samba? GNU/Linux	HIRONAKAMURA	2	2,724	14 Diciembre 2013, 14:45 pm por HIRONAKAMURA
	unir 2 partes de pelicula Multimedia	65paco	4	3,995	21 Mayo 2014, 01:01 am por Afueguember!