Google maps

[aferra]

Bom dia.

Alguém consegui usar a nova forma de utilização do google maps com api key ?

 

[kapiaba]

 nova forma ? como é?

[aferra]

Opa. vc tem algo funcionando que veja o trajeto de um ponto ao outro? se sim manda ai.

esse é o novo onde tem que colocar a api key, de outra maneira não está indo.
 

 

https://maps.googleapis.com/maps/api/distancematrix/json?units=imperial&origins=Washington,DC&destinations=New+York+City,NY&key=YOUR_API_KEY

[kapiaba]

Esto?

 

http://www.fivetechsupport.com/forums/viewtopic.php?f=6&t=28033

 

 

[aferra]

Sim, eu tinha visto esses mas não funciona mais. e parece que tem que fazer o cadastro mesmo e ativar a conta com cartão de crédito.

[marcioe]

 

Sim, eu tinha visto esses mas não funciona mais. e parece que tem que fazer o cadastro mesmo e ativar a conta com cartão de crédito.

Olá amigo, seria isso que voce quer

Se a resposta for isso

T_ENDERECO_CLIENTE   := 'RUA DO ENDERECO'
T_NUMERO_END_CLIENTE := '0001' && Por Exemplo
T_CIDADE_CLIENTE	 := 'NOME DO MUNICIPIO' && Exemplo São Paulo
T_ESTADO_CLIENTE	 := 'MG'  

 
ROTA_GOOGLE_MAPS( (alltrim(upper(T_ENDERECO_CLIENTE))+" "+ALLTRIM(T_NUMERO_END_CLIENTE)+" "+alltrim(upper(T_CIDADE_CLIENTE))+" "+alltrim(upper(T_ESTADO_CLIENTE)))   )




function ROTA_GOOGLE_MAPS(v_enderecos)
	If !IsInternet()
		MsgInfo('Problemas Com Acesso a Internet !',SISTEMA)
		return .f.
	ENDIF
	&&& Aqui o sistema pega o Endereço da empresa (ou seja da empresa que está usando o sistema)	
	IF SELECT("empresa_mapas") != 0
		empresa_mapas->(DbCloseArea())
	ENDIF		
	cQuery:='select * from empresa where CODIGO =  ' + TRANSFORMA_SQL(M->T_CODI_EMPRESA,'N',06,0)  + ' LIMIT 1'
	use sql cQuery alias "empresa_mapas" new via 'MYSQL'
	empresa_mapas->( DbGoTop())
	*----------------------------------------------------------------------------	
	msearch := 	ALLTRIM(v_enderecos) +' / '+;
					alltrim(empresa_mapas->ENDEMP) +" "+alltrim(empresa_mapas->NUMERO)+","+ alltrim(empresa_mapas->CIDEMP)+' '+alltrim(empresa_mapas->ESTEMP)

	WebEXE3("https://www.google.com.br/maps/dir/" + MSEARCH)  //CARREGA A PAGINA USANDO O CHROME
 	
	
	
	RELEASE msearch
return
*----------------------------------------------------
Function WebExe3(cLink) // visualiza e navega na pagina
*----------------------------------------------------
	default cLink:="http://www.google.com"
	clink:=GetEnv( "ComSpec" )+" /C START "+STRTRAN(cLink," ","+")
	WAITRUN(cLink, 0 )
RETURN

 

[aferra]

Ola Marcio, blz?
sim assim eu utilizo, a diferença está que uso a ActiveX para mostra na dialog.
o que preciso é o retorno do tempo e distancia. e desta maneira não tenho como utilizar pois preciso acumular, em certos momentos, varias entregas.

se alguém estiver utilizando dessa maneira e puder compartilhar, agradeço.

[Jmsilva]

 

Ola Marcio, blz?
sim assim eu utilizo, a diferença está que uso a ActiveX para mostra na dialog.
o que preciso é o retorno do tempo e distancia. e desta maneira não tenho como utilizar pois preciso acumular, em certos momentos, varias entregas.

se alguém estiver utilizando dessa maneira e puder compartilhar, agradeço.

Aferra, quanto a chave, vc faz cadastro com email do gmail e obtém uma chave, só há cobrança a partir de um certo número de de acesso. Quanto a pegar valores de uma API do Google para gravar em banco ou processamento em xharbour, eu criava um arquivo txt com Api Google em seguida eu fazia a leitura xHarbour (alimentando uma variável) e eliminava o arquivo txt. 

Segue linhas de implementação em javascript para criar arquivo txt, com resultados da API do Google e recuperá-las no (x)Harbour. No caso aponto resultado do Google.

var oFSO = new ActiveXObject("Scripting.FileSystemObject");
var txt = oFSO.CreateTextFile("'+cFILE+'", true);  
txt.WriteLine(aponto);                                        
txt.Close();   

[Jmsilva]

https://drive.google.com/open?id=1KGQA9M1wN5xH2Uj55Nik_xU9sCPql7WL

[kapiaba]

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=36591&p=218336#p218270

[aferra]

essa dica irei me aprofundar, ela funciona mas lenta. depois o Navarro mandou de outra forma mas precisa encontrar a lib para funcionar. 

Obrigado