Problema enviar archivo

Iniciado por Jareth, 1 Abril 2007, 00:41 AM

0 Miembros y 4 Visitantes están viendo este tema.

Jareth

Ahora por ejemplo tengo un boton STop,cuando le doy que pare,vale lo he conseguido pero si luego le doy al boton Start no empieza,es por eso si alguien sabe como hacerlo bien,yo lo he hecho con un boolean que cambia el valor,al darle stop,se envia "stop|"y en el case "stop" parar=true y en lo de la captura de pantalla pongo if parar=false then y capturar.Pero luego para iniciar,si  pongo en captura parar=true,pues el boton stop no va porque aunque diga que es false lo otro dirá que es true.
No se si se me entiende.
Gracias y espero me puedan ayudar.

~~

Mejor azlo con un chacek box. Tendrias q introducirlo justo aki:

CLIENTE:
CitarIf Envio = True Then
   DataFile = DataFile & datos
   If Len(DataFile) = LenFile Then
       Open "C:\capture2.jpg" For Binary As #1
           Put #1, , DataFile
       Close #1
       DataFile = ""
       MsgBox "El Fichero se a Enviado Correctamente"
       'Ahora lo tendrias q mostrar C:\capture2.jpg en un picture
'Una vez se a mostrado tendriamos q hacer una nueva peticion
'Para saber si hacer la peticion o no comprovariamos el estado del check box:
If Check1.Value = 1 Then 'Si esta activo
ws.sendata 'Lo q tu hallas puesto para pedir una foto
End If


       Envio = False
   End If
End If
Asi solo recibirias imagenes cuando este activo el check box ;)

Jareth

Gracias otra vez,he puesto el check en visible=false,cuando das al boto stop su valro es 0 y start 1,asi queda como yo quiero y funciona perfectamente.
Enga muchas gracias otra vez.
Saludos.

~~

Lo puedes hacer solo con un boton, juega con su caption, cuando estes recibiendo imagenes q ponga stop y cuando no start por ej, y luuego compruevas If ommand1.caption = "stop" then...

yovaninu

veo un interes amplio por la transferencia de archivos, yo pase por muchos de esos problemas... y saben? un dia me pregunte lo siguiente: ¿cuando este trasladando un archivo desde el servidor al cliente (en conexion inversa) podria haber un boton pausar? ¿y otro para reanudar? ¿y otro para cancelar? y ¿otro para previsualizar? (en caso de que se trate de un archivo media)

me llevó noches y noches de codigo, al final lo logre... asi puedo decsrgar archivos desde el servidor de cualquier tamaño, hablo de cientos de megas, vamos que si hay interes posteo linea a linea el codigo completo y comentado...

haber ideas?

vivachapas

mmm seria un codigo muy interesante... ya q no tendrias q depender de q la victima este siempre conectada o por lo menos hasta q termine de bajar el archivo...

yovaninu

Cita de: vivachapas en  5 Abril 2007, 04:04 AM
mmm seria un codigo muy interesante... ya q no tendrias q depender de q la victima este siempre conectada o por lo menos hasta q termine de bajar el archivo...
si la victima se desconecta, entonces el cliente detecta tal accion y guarda lo que hasta el momento de la desconexion haya descargado, asi puedes reanudarlo en una proxima conexion o al dia siguiente y terminar de bajar el archivo cuando quieras... en fin  quisiera chincheta  ;D ;D ;D ;D ;D ;D

~~

Podias ponerlo, a mi me interesa saber como leer un archivo de 2GB por ej y q el VB no se pete, como lo haces tu?

yovaninu

Cita de: E0N en  5 Abril 2007, 12:58 PM
Podias ponerlo, a mi me interesa saber como leer un archivo de 2GB por ej y q el VB no se pete, como lo haces tu?

Justamente esa es la idea mala que tenemos hasta ahora de transferir el archivo, es decir pasar tooooodo el archivo a una variable y despues transferirlo, y claro viene las imaginaciones malevolas por cierto de decir como paso 80GB a una variable sin que el basic se cuelgue, pues no necesariamente debes pasar lo 80GB del archivo a una variable... y este es el secreto... el tamaño archivo se debe dividir en partes (en cuantas sea necesario) y extraer solo esos tamaños o poriones a una variable lo que es mas razonable que pasar todo el archivo a una variable para luego transferirlos, puedes dividirlo en 10, 100, 1000, o 5000 partes y cada pedazo transferirlo sin problemas. Yo un archivo de mas de 100MB lo divido en 4096 partes aunque puedo elegir ese valor.... esto es 104857600 / 4096 = 25600bytes osea casi 25KB, esos 25 kb a una variable y  esa variable se procede a transferir hasta terminar... si sobra bytes tambien eso se controla, este es el secreto que uso, asi que por teoria ningun archivo asi sea este de 100TB no deberia colgar al basic, aunque quien sabe.

Un Saludo.

vivachapas

es una excelente forma.. pero como haces a meter un archivo
(por ej: "C:\archivo.exe") de 100 mb en mas de una variable??