Coger fichero grafico/datos desde HTTP

Coger fichero grafico/datos desde HTTP

Postby JmGarcia » Mon Nov 29, 2010 11:02 am

Como podría coger un fichero gráfico (foto, etc...) o de datos (zip, doc, etc...) o ficheros en general siendo este el enlace (por ejemplo): http://www.fivetechsoft.com/images/logo5t2.gif

Es decir, con alguna de las tecnicas de petición de páginas HTTP coger ficheros alojados en WEBs.

No se si me he explicado.

Por otro lado a veces el enlace es de este tipo http://www.planepictures.net/tshow.cgi?EC-HDT y es una foto.
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: Coger fichero grafico/datos desde HTTP

Postby JmGarcia » Mon Nov 29, 2010 4:19 pm

Me contesto yo solo... (lo encontre)

Code: Select all  Expand view  RUN
oHttp:=CreateObject("WinHTTP.WinHTTPRequest.5.1")
oHttp:SetTimeouts(30000,30000,30000,30000)
oHttp:Open("GET","http://www.fivetechsoft.com/images/logo5t2.gif",.F.)
oHttp:Send()
cImagen:=oHttp:ResponseBody() // Aqui esta la salsa de todo
MemoWrit("logo5t2.gif",cImagen)
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: Coger fichero grafico/datos desde HTTP

Postby MGA » Tue Nov 30, 2010 10:07 am

JMGARCIA,

Sabe como chamar esta função direto no site: analise(login,senha,string)

Exemplo de Conexão:

Linguagem PHP + Class nusoap

<?php

include_once('lib/nusoap.php');

// link do web service
$wsdl = 'http://www.phdrisk.com/padrao/webservice/server.php?wsdl';

$client = new nusoapclient($wsdl,true);
$registro = array();
$registro[] = "99999"; // login
$registro[] = "99999"; //senha
$registro[] = "<analisePHDRISK>…"; //string

print_r($client->call('analise',$registro));

?>

Link Web Service
https://www.phdrisk.com/padrao/webservi ... r.php?wsdl

Fluxo

| analise(login,senha,string) |
USUARIO | ----------------------------------------- | PHDRISK
| stringRetorno |
| ----------------------------------------- |

Procedimento
Chamar a função analise passando por parâmetro o login, a senha, e o XML de envio, como retorno será enviado XML de retorno.
ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
MGA
 
Posts: 1253
Joined: Mon Feb 25, 2008 2:54 pm
Location: Brasil/PR/Maringá

Re: Coger fichero grafico/datos desde HTTP

Postby Patricio Avalos Aguirre » Tue Nov 30, 2010 7:29 pm

JM Garcia:

Gracias por la solucion, en algun momento puede que la necesitemos..
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Re: Coger fichero grafico/datos desde HTTP

Postby elmoiquique » Thu May 08, 2014 12:41 pm

SGS wrote:JMGARCIA,

Sabe como chamar esta função direto no site: analise(login,senha,string)

Exemplo de Conexão:

Linguagem PHP + Class nusoap

<?php

include_once('lib/nusoap.php');

// link do web service
$wsdl = 'http://www.phdrisk.com/padrao/webservice/server.php?wsdl';

$client = new nusoapclient($wsdl,true);
$registro = array();
$registro[] = "99999"; // login
$registro[] = "99999"; //senha
$registro[] = "<analisePHDRISK>…"; //string

print_r($client->call('analise',$registro));

?>

Link Web Service
https://www.phdrisk.com/padrao/webservi ... r.php?wsdl

Fluxo

| analise(login,senha,string) |
USUARIO | ----------------------------------------- | PHDRISK
| stringRetorno |
| ----------------------------------------- |

Procedimento
Chamar a função analise passando por parâmetro o login, a senha, e o XML de envio, como retorno será enviado XML de retorno.


Hola

Lograste resolver este problema, agradeceria tu ayuda

saludos
Fivewin-Xharbour 24.09, Iquique, Chile
elmoiquique
 
Posts: 316
Joined: Wed May 16, 2007 9:40 pm
Location: Region de Ñuble, Chile

Re: Coger fichero grafico/datos desde HTTP

Postby Antonio Linares » Thu May 08, 2014 4:04 pm

JM,

Muy bueno, gracias por compartirlo :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42122
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 75 guests