tftp class
- Richard Chidiak
- Posts: 946
- Joined: Thu Oct 06, 2005 7:05 pm
- Location: France
- Contact:
tftp class
Antonio
Do you plan to make tftp class available for fwppc ?
I neeed to retreive the content of a ftp directory .
This is straight from tftp class, if not i have to figure out another way.
Thanks for your reply
Richard
Do you plan to make tftp class available for fwppc ?
I neeed to retreive the content of a ftp directory .
This is straight from tftp class, if not i have to figure out another way.
Thanks for your reply
Richard
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
- Richard Chidiak
- Posts: 946
- Joined: Thu Oct 06, 2005 7:05 pm
- Location: France
- Contact:
Antonio Linares wrote:Richard,
It seems that wininet.dll is available for Windows Mobile, so it should not be difficult to port the code to FWPPC. We are going to check it.
Antonio
![Very Happy :D](./images/smilies/icon_biggrin.gif)
Gracias,
This issue is not critical for me, i can wait.
I am much more interested in Msgrun replacement , spinners and curiously scopes (i thought this one depending on harbour ???).
Msgrun is as far as i am concerned, the most critical point missing today. I have not found a replacement for it, probably out of ideas on the subject.
Do you have an idea of any replacement ?
Thank you
Richard
Keep faith, FWPPC is a fantastic tool.
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
Richard,
There is already available a new FWPPC build to be downloaded with MsgRun() support. There is a working sample at samples\TestMRun.prg.
It seems to work well but we appreciate your feedback. Thanks,
> spinners
its on our todo list.
> and curiously scopes (i thought this one depending on harbour ???).
Yes, we upgrade Harbour for Pocket PC every few months from Harbour CVS. We may upgrade it in short.
There is already available a new FWPPC build to be downloaded with MsgRun() support. There is a working sample at samples\TestMRun.prg.
It seems to work well but we appreciate your feedback. Thanks,
> spinners
its on our todo list.
> and curiously scopes (i thought this one depending on harbour ???).
Yes, we upgrade Harbour for Pocket PC every few months from Harbour CVS. We may upgrade it in short.
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
Vilian,
First tests are working fine: samples\ftpdir.prg:
![Image](http://img150.imageshack.us/img150/1328/pocketzd9.png)
From XP:
![Image](http://img244.imageshack.us/img244/6328/xpuy7.png)
First tests are working fine: samples\ftpdir.prg:
Code: Select all | Expand
// Testing the FiveWin Internet Classes
#include "FWCE.ch"
function Main()
local oInternet := TInternet():New()
local oFTP := TFTP():New( "ftp.microsoft.com", oInternet ) // Microsoft FTP
local aFiles
if ! Empty( oFTP:hFTP )
aFiles = oFTP:Directory( "*.*" )
MsgInfo( Len( aFiles ) )
AEval( aFiles, { | aFile | MsgInfo( aFile[ 1 ] ) } )
else
MsgAlert( "oFTP:hFTP is null" )
endif
oInternet:End()
MsgInfo( "Done!" )
return nil
![Image](http://img150.imageshack.us/img150/1328/pocketzd9.png)
From XP:
![Image](http://img244.imageshack.us/img244/6328/xpuy7.png)
- Antonio Linares
- Site Admin
- Posts: 42520
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact: