Page 1 of 1

HB TIPClientHTTP() Freezes

Posted: Sun Oct 08, 2017 11:03 am
by sistemasit
My program freezes when I execute TIPClientHTTP() function.

oInternet:= TIPClientHTTP():New("http://www.google.com", .f.)

What could It be?

Re: HB TIPClientHTTP() Freezes

Posted: Sun Oct 08, 2017 12:08 pm
by Enrico Maria Giordano
This sample doesn't freeze here:

Code: Select all

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oInternet:= TIPClientHTTP():New("http://www.google.com", .f.)

    ? oInternet

    RETURN NIL
EMG

Re: HB TIPClientHTTP() Freezes

Posted: Sun Oct 08, 2017 4:27 pm
by Rick Lipkin
sistemasit

When you go to Google.com .. your browser tries to resolve Google as a secure connection https://www.google.com/ ... Depending on your default browser .. using http://www.google.com may not resolve the secure connection ?

Rick Lipkin

Re: HB TIPClientHTTP() Freezes

Posted: Sun Oct 08, 2017 10:07 pm
by sistemasit
I already tried others URLs, happens the same. It freezes

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 7:50 am
by Enrico Maria Giordano
Have you tried my sample as is? Does it freeze? If yes, you have a problem in your xHarbour installation or in your http connection (a firewall?).

EMG

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:07 am
by sistemasit
Enrico Maria Giordano wrote:Have you tried my sample as is? Does it freeze? If yes, you have a problem in your xHarbour installation or in your http connection (a firewall?).

EMG
I did Enrico. I tried your sample. I also downloaded the latest version of xHarbour. :cry:

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:12 am
by Enrico Maria Giordano
sistemasit wrote:
Enrico Maria Giordano wrote:Have you tried my sample as is? Does it freeze? If yes, you have a problem in your xHarbour installation or in your http connection (a firewall?).

EMG
I did Enrico. I tried your sample. I also downloaded the latest version of xHarbour. :cry:
Does my sample freeze or not for you?

EMG

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:13 am
by sistemasit
yes

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:21 am
by sistemasit
my TIP.LIB is may,28-2015

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:27 am
by Enrico Maria Giordano
sistemasit wrote:my TIP.LIB is may,28-2015
It's very old. Mine is sep,2-2017.

EMG

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:38 am
by sistemasit
I am downloading from xHarbour.org, and I get this lib from '2015. Is there any other link?

Re: HB TIPClientHTTP() Freezes

Posted: Mon Oct 09, 2017 11:45 am
by Enrico Maria Giordano
sistemasit wrote:I am downloading from xHarbour.org, and I get this lib from '2015. Is there any other link?
Which package do you have downloaded? I just tried to download this:

http://www.xharbour.org/files/download/ ... bcc730.zip

and got a new tip.lib.

EMG

Re: HB TIPClientHTTP() Freezes

Posted: Tue Oct 17, 2017 3:08 pm
by ronaldo
Tive problemas tambem, então troquei por este:

CursorWait()
cURL := "http://bazevani.com.br/asp/pesquisa.asp?tipo=L&serie=" + _Serie

oHttp := CreateObject("Microsoft.XMLHTTP")
oHttp:Open("GET",cURL,.F.)
lNetError:=.f.
TRY
oHttp:Send()
CATCH oError
lNetError := .T.
END TRY
cHtml := ""
if !lNetError

cHtml := oHttp:ResponseBody
Else
Msgstop("Erro")
endif