Senhores eu uso a função abaixo em modo console com Harbour e HBTIP sem
problemas, porém ao incorporar a função em Xailer e compilar apresenta o
erro:
TIPCLIENT:NEW(0)
Error BASE/1081 Operation not supported: TIPCLIENTHTTP:new()
Arguments: ( [ 1] = Type: O Val: [ 2] = Type: C Val: )
************************************************************ ********************
Abaixo função:
************************************************************ ********************
Function AnalisaArqNet(cFileName)
cURL := "http://www.netadress.com./folder/" + cFileName + ".txt" )
oHttp:= TIpClientHttp():new( cURL )
* Connect to the HTTP server
If .NOT. oHttp:open()
MsgAlert( "Connection error:" + oHttp:lastErrorMessage())
return
EndIf
* Atribui o conteudo a uma variavel
cFileContent := Upper(( oHttp:readAll() ))
// Analise do Conteúdo.
oHttp:close()
RETURN NIL
************************************************************ ********************
Un Saludo...
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
TipClientHTTP Error
-
Cassiano de Oliveira
- Mensajes: 475
- Registrado: Mar Jul 24, 2012 10:21 pm
-
Cassiano de Oliveira
- Mensajes: 475
- Registrado: Mar Jul 24, 2012 10:21 pm
TipClientHTTP Error
Acredito que encontrei a informação aqui:
https://groups.google.com/forum/?fromgr ... c/harbour- users/xkBOJ2YKbQY
Mas fala que tem que recompilar o Harbour??? Como se usamos o Harbour
disponibilizado pelo Xailer???
Alguém pode ajudar?
Un Saludo...
"Cassiano de Oliveira" wrote in message news:50f3e34b$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores eu uso a função abaixo em modo console com Harbour e HBTIP sem
problemas, porém ao incorporar a função em Xailer e compilar apresenta o
erro:
TIPCLIENT:NEW(0)
Error BASE/1081 Operation not supported: TIPCLIENTHTTP:new()
Arguments: ( [ 1] = Type: O Val: [ 2] = Type: C Val: )
************************************************************ ********************
Abaixo função:
************************************************************ ********************
Function AnalisaArqNet(cFileName)
cURL := "http://www.netadress.com./folder/" + cFileName + ".txt" )
oHttp:= TIpClientHttp():new( cURL )
* Connect to the HTTP server
If .NOT. oHttp:open()
MsgAlert( "Connection error:" + oHttp:lastErrorMessage())
return
EndIf
* Atribui o conteudo a uma variavel
cFileContent := Upper(( oHttp:readAll() ))
// Analise do Conteúdo.
oHttp:close()
RETURN NIL
************************************************************ ********************
Un Saludo...
https://groups.google.com/forum/?fromgr ... c/harbour- users/xkBOJ2YKbQY
Mas fala que tem que recompilar o Harbour??? Como se usamos o Harbour
disponibilizado pelo Xailer???
Alguém pode ajudar?
Un Saludo...
"Cassiano de Oliveira" wrote in message news:50f3e34b$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores eu uso a função abaixo em modo console com Harbour e HBTIP sem
problemas, porém ao incorporar a função em Xailer e compilar apresenta o
erro:
TIPCLIENT:NEW(0)
Error BASE/1081 Operation not supported: TIPCLIENTHTTP:new()
Arguments: ( [ 1] = Type: O Val: [ 2] = Type: C Val: )
************************************************************ ********************
Abaixo função:
************************************************************ ********************
Function AnalisaArqNet(cFileName)
cURL := "http://www.netadress.com./folder/" + cFileName + ".txt" )
oHttp:= TIpClientHttp():new( cURL )
* Connect to the HTTP server
If .NOT. oHttp:open()
MsgAlert( "Connection error:" + oHttp:lastErrorMessage())
return
EndIf
* Atribui o conteudo a uma variavel
cFileContent := Upper(( oHttp:readAll() ))
// Analise do Conteúdo.
oHttp:close()
RETURN NIL
************************************************************ ********************
Un Saludo...