FiveTech Software tech support forums

... local cFileName := cGetFile( "*.*", "Select a file to send by Internet" ) if ! Empty( cFileName ) .and. File( cFileName ) oSocket:SendData( "SENDFILE " + cFileName( cFileName )) oSocket:SendFile( cFileName ) oSocket:End() MsgInfo( "archivo enviado" ) endif :lol: por otra parte de la parte ...

... Client() TOOLTIP "Connect" DEFINE BUTTON OF oBar ; ACTION oSocket:SendData( "IMP01|0|1001|" ) ; TOOLTIP "Send data" DEFINE BUTTON OF oBar ; ACTION SendFile() TOOLTIP "Send file" ACTIVATE WINDOW oWnd return nil FUNCTION Client() LOCAL n oSocket = TSocket():New( 1853 ) oSocket:lDebug := .T. oSocket:cLogFile ...

... Ya hay un nuevo FWPPC build listo para ser descargado. Sólo falta revisar el método SendFile() que aún no va bien. Sin embargo el método SendData() funciona correctamente. En la imagen se ve como hemos establecido una comunicación por ...

... We are going to upload a new FWPPC in a few minutes. Please notice that Class TSocket Method SendFile() is not properly working yet (we are testing it), though SendData() is working ok (in the image, the server displays the data it gets from ...