Internet Security Components - COM, ActiveX and .NET

Delphi Example Code - WeOnlyDo Discussion board

Back to the forum index

Linear

The example code for the SFTP is too basic. I'm stuck in trying to waitfor events to finish.

I am looking for a more robust example that shows how to do more than one thing in procedure. for example:

begin
wodSFTP1.listNames;
wodSFTP1.putfile(FileName);
end;

The above lines will fail on PutFile() as ListNames has not completed.

Any help appreciated.

Email: bee ohh bee at 'bordwell.com' (those are read as: bob)

locked

2208 views

Bret,

the way you use it (sequentially, line per line..) you need to set Blocking property to True and it will work. Currently component works in async way and you cannot execute methods until previous completes. Blocking should solve that. Can you try?

locked

2243 views

Excellent, Thank You!

Now, Another problem

The following fails:

var
FileName : OleVariant;
begin
wodsftp1.ListNames;
FileName := 'c:file1.txt';
wodsftp1.PutFile(FileName);
FileName := 'C:file2.txt';
wodsftp1.PutFile(FileName);
end;

What happens is file1.txt gets sent, then file1.txt gets sent again, as if FileName is not being re-set. Have tried as seperate OleVariants (FileName1,FileName2 : OleVariant), but that fails too.

Thanks again for your earlier suggestion.

Bret,

the way you use it (sequentially, line per line..) you need to set Blocking property to True and it will work. Currently component works in async way and you cannot execute methods until previous completes. Blocking should solve that. Can you try?

locked

2249 views

Bret,

you didn't specify RemotePath, and (I assume) it's the same in both cases.

Also, please use absolute paths *always*, not relative.

Regards,
Kreso

locked

2237 views

Thats It! Thank you!

Love your tech support... oooh so fast!

locked

2189 views

Brilliant, even works on the mobile phone...

Conrad Leigh

Leaf Wireless

The wodCrypt product is great and we appreciate your effort to add support for UNIX Crypt.

William Ruf

Siemens Information and Communication Networks

Your .NET components allow us to blend .NET technology seamlessly with secure communication, and with excellent technical support.

Bil Bragg

Dionach

Your support is fantastic.

Douglas Michael Panchyshyn

The Net Software Group

May I say how nice it is to work with components so complete and self-explanatory that using them in my application is as instinctive as though I wrote them myself?

Michael Barnett

Full Spectrum Telecommunications