topic-6148

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Consulta sobre Funcky
Posted: Wed Feb 28, 2007 02:18 PM

Estimados

Tengo algunas consulta sobre esta libreria

Como se distribuye la aplicacion, me explico, hay que instalar todo el paquete o bien solo las dll

Saludos
Patricio

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

R.F.

Posts: 840

Joined: Thu Oct 13, 2005 07:05 PM

Consulta sobre Funcky
Posted: Wed Feb 28, 2007 04:50 PM

Nop.

Solo tienes que copiar los archivos de FUNCKY a la carpeta Windows\system32 o windows\system de la computadora donde instalas y luego "registrar" el servicio.

Copia funcky60.DLL y funcky60.tlb a la carpeta windows\system

Luego, desde una ventana de ms-dos "registra" el componente tecleando esto:

RegSvr32 C:\Windows\System\FUNCky60.DLL

y listo, si utilizas algun instalador como InnoSetup, esto se puede automatizar desde la instalacion.

Saludos

R.F.

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Consulta sobre Funcky
Posted: Wed Feb 28, 2007 06:40 PM

Gracias maestro

ahora una consulta, sobre ftp

Code: Select all Collapse

oFtp := TOleAuto():New("Funckyftp")
oFtp:Connect(cServer, usuario, clave )

if oFtp:Status = 0
    oFtp:ChangeDir ("paso\")
    cStr := oFtp:Execute("LIST", .t. )
   alert( cStr )            //muestra bien los archivos
   oFtp:Get( "prueba.txt", "c:\prueba.txt",0)
endif

oFtp:Disconnect()

me sale el siguiente Error

Code: Select all Collapse

Stack Calls
===========
   Called from: win32ole.prg => TOLEAUTO:PRUEBA.TXT(0)
   Called from:  => HB_EXECFROMARRAY(0)
   Called from: win32ole.prg => TOLEAUTO:GET(415)
   Called from: WCTA.PRG => FUNCKY(1368)
   Called from: WCTA.PRG => MAIN(20)

Por ahi vi a otro usuario con los metodos GET, pero no lo he encontrado

Saludos
Patricio

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

R.F.

Posts: 840

Joined: Thu Oct 13, 2005 07:05 PM

Consulta sobre Funcky
Posted: Thu Mar 01, 2007 07:13 PM

Efectivamente:

Aqui tenemos un "pequeño" problema.

Sucede que la clase TOLE AUTO tiene un METODO GET y Funcky tambien, lo cual causa un conflicto de intereses.... ¿ a quien le hago caso ?, al metodo GET de Fucnky o al metodo Get de TOLE AUTO

Esta claro que lo que se invoca es el metodo GET de la TOLEAUTO, pero te marca el error, porque ese metodo espera unos parametros que no son los que le estan mandando.

Esto deberia funcionar asi:

oFunckyFTP:Get( "Get", ficheroorigen, ficherodestino )

o

oFunckyFTP:Invoke( "Get", ficheroorigen, ficherodestino )

Pruebalo y me dices.

Saludos

R.F.

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Consulta sobre Funcky
Posted: Fri Mar 02, 2007 04:22 PM

No funciono, sale el mismo error

Code: Select all Collapse
oFtp:invoke( "GET", "prueba.txt", "c:\prueba.txt" ) oFtp:Get( "GET", "prueba.txt", "c:\prueba.txt" )

Code: Select all Collapse

Stack Calls
===========
   Called from: win32ole.prg => TOLEAUTO:PRUEBA.TXT(0)
   Called from:  => HB_EXECFROMARRAY(0)
   Called from: win32ole.prg => TOLEAUTO:GET(415)
   Called from:  => HB_EXECFROMARRAY(0)
   Called from: win32ole.prg => TOLEAUTO:INVOKE(415)
   Called from: WCTA.PRG => FUNCKY(1369)
   Called from: WCTA.PRG => MAIN(20)

Pero con la clase de Jose Gimenez funciona bien

oFtp:invoke( "GET", "prueba.txt", "c:\prueba.txt" )

Con este linea oFtp:Get( "prueba.txt", "c:\prueba.txt", 0 )

Muestra un mensaje de errror prueba.txt DISP_E_UNKNOWNNAME
pero no se cae el programa, me parece que esta muy bien

debe tener algun problema la clase oleauto de xharbour

Code: Select all Collapse

*                                                                        *
*  Autor: José F. Giménez (JFG) - jfgimenez@wanadoo.es                   *
*                                 tecnico.sireinsa@ctv.es                *
*  Fecha: 6-11-2000                                                      *
*                                                                        *
*  Revisado: 13-2-2001, 28-2-2001, 13-3-2001                             *
*                                                                        *
*  Nota: basado en la clase TComObj() de FW 2.1                          *
*                                                                        *
**************************************************************************
#ifndef __HARBOUR__
   #include "FiveWin.ch"
#else
   #include "HBClass.ch"
#endif

bla..bla..bla..

Gracias nuevamente maestro

Saludos
Patricio

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

FiveTech Support Forums

Continue the discussion