Message-ID:

< jaybonci> actually d-i stands for "divine intervention" ;) -- in #debian-devel

devel / comp.lang.xharbour / Re: tip.lib check if connected

Re: tip.lib check if connected

<ud4gl8$1f6mr$1@dont-email.me>

https://www.rocksolidbbs.com/devel/article-flat.php?id=17708&group=comp.lang.xharbour#17708

copy link Newsgroups: comp.lang.xharbour

Path: i2pn2.org!i2pn.org!eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: webmaster@appliserver.com (Dan)
Newsgroups: comp.lang.xharbour
Subject: Re: tip.lib check if connected
Date: Mon, 4 Sep 2023 13:56:24 +0200
Organization: A noiseless patient Spider
Lines: 37
Message-ID: <ud4gl8$1f6mr$1@dont-email.me>
References: <b30c254e-9ef0-41ef-a97b-5ffab6edb6c9o@googlegroups.com>
<ea065187-e51d-4e1e-8626-803378a75a97o@googlegroups.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Mon, 4 Sep 2023 11:56:24 -0000 (UTC)
Injection-Info: dont-email.me; posting-host="6580fffafa20bfc2b6f40c53ba5be324";
logging-data="1546971"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1+HGmSPHznUOjByXC8SicLD"
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:102.0) Gecko/20100101
Thunderbird/102.15.0
Cancel-Lock: sha1:RQ8reSIpKucgKDpHmcSpR/vbj5o=
In-Reply-To: <ea065187-e51d-4e1e-8626-803378a75a97o@googlegroups.com>

by: Dan - Mon, 4 Sep 2023 11:56 UTC

Il 19/08/2020 22:01, Darkwood ha scritto:
> On Monday, July 27, 2020 at 4:43:52 PM UTC-7, Darkwood wrote:
>> I have a little proggy that zips and FTP's a data backup to my FTP site nightly. This works great for most of my clients, but one has a problem. I noticed that their backups stopped coming through and I couldn't figure out why. So I compiled with debugging and copied the .PRG to their computer and stepped through it. I re-connected manually through the "? prompt" in the debugger, and everything worked. I was wondering if there is a fool proof way of checking the connection in the program so we can re-connect if we get dis-connected.
>>
>> TIA,
>>
>> Mike
>
> I believe it was a Windoze Update that broke it, but I am not seeing this behavior anywhere else. Here is a snippit of code showing how I fixed it:
>
> if oFTP:Open( cURL )
> connected:=.T.
> ? "Connection established", oFTP:cReply
>
> @z,1 say "Connected: "+oFTP:cReply
> z++
>
> oftp:Port()
> oftp:busepasv:=.T.
>
> ? "Connecting to", server
> oFTP:Open(curl)
> ?oftp:creply
>
> ? "Connecting to", server
> oFTP:Open(curl)
> ?oftp:creply
>
> I found that if I did a couple oFTP:Open(Curl)'s before I tried to do anything like transfer a file, it worked. I don't know why.
>
> Mike

Maybe a TIMEOUT problem? In http connections (with TIP) we can modify
this parameter. Sorry I don't use ftp (for now) so I really don't know
if this suggestion can be of some help.
Dan