... 120-001 no procesado",Error en ZIP" ,1) return nil ENDIF Return nil y para descomprimir utiliza algo asi... FUNCTION Descomprime() Local xcNewFile := "c:\recibir\Tarifas.zip" IF FILE( xcNewFile ) Hb_UnZipFile(xcNewFile,,,"mipassword",, .f.) RETURN ...