Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
19 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 19 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
TRY BEGIN E FLOCK()

17/4/2017, 10:32 por AJC

Pessoal estou tendo alguns problemas de gravação em rede, estou usando
try begin, mas vi algo na …

Comentários: 0

Exportar Dados Campo Memo Tabela DBF

10/4/2017, 10:28 por fcampos

Olá bom dia.

Estou tentando exportar os dados de algumas tabelas em formato dbf pelo foxpro.
O …

Comentários: 2

Função EVL()

8/4/2017, 12:18 por Clebervfp

Bom dia a todos.
Vim compartilhar de uma Função do próprio VFP que me benefício muito.
Função …

Comentários: 0

COMO BLOQUEAR REGISTRO OU TABELA NO VISUAL FOXPRO PARA GRAVAÇÃO EM REDE

3/4/2017, 10:29 por AJC

Pessoal estou tendo um problema que acontece sempre busco na minha tabela de clientes o ultimo …

Comentários: 2

Controlar Scanner Twain

31/3/2017, 17:31 por Kleber R Bento

Estou usando o EZTW32.DLL para criar uma ferramenta que escaneia e gera PDF. Porém com esses …

Comentários: 0

Estatísticas
Temos 7063 usuários registrados
O último usuário registrado atende pelo nome de Bravera

Os nossos membros postaram um total de 47 mensagens em 24 assuntos

Google Maps - <<<

Página 1 de 3 1, 2, 3  Seguinte

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Astúcia Google Maps - <<<

Mensagem por Marcos Guedes em 27/10/2009, 16:31

Realize suas consultas por localidades utilizando o recursos do Google Maps:

Como utilizar:
Código:
CLEAR

LOCAL nomecursor AS STRING
m.nomecursor = m.googleMaps("Morro do Careca")

IF USED(m.nomecursor) THEN
   SELECT(m.nomecursor)
   GO TOP
   BROWSE
   USE IN SELECT(m.nomecursor)
ENDIF

A função:
Código:
FUNCTION googleMaps AS STRING
   *!* Autor: Marcos Guedes
   *!* Fonte: http://forum.programacaobrasil.com/visual-foxpro-f4/google-maps-t384.htm
   LPARAMETERS localidade AS STRING, nomecursor AS STRING
   *!*
   LOCAL url AS STRING
   LOCAL parametros AS STRING
   LOCAL loxmlhttp AS OBJECT
   LOCAL strtemp2 AS STRING
   LOCAL cnome AS STRING
   LOCAL endereco AS STRING
   LOCAL cep AS STRING
   LOCAL ddd AS STRING
   LOCAL telefone AS STRING
   LOCAL conttemp AS INTEGER
   *!*
   IF (VARTYPE(m.localidade)!="C") THEN
      m.localidade = ""
   ENDIF
   IF (VARTYPE(m.nomecursor)!="C") OR EMPTY(m.nomecursor) THEN
      m.nomecursor = SYS(2015)
   ENDIF
   *!*
   m.url = "http://maps.google.com.br/maps?f=q&source=s_q&output=js&hl=pt-BR&geocode=&q=" + m.localidade + "&btnG=Pesquisar+no+Mapa&vps=1&jsv=182b&sll=-14.179186%2C-50.449219&sspn=33.483081%2C131.660156&abauth=fa677140%3AOYVhMvJnYkyS63VFfp1D9geCJUo&absince=21"
   m.parametros = ""
   *!*
   m.loxmlhttp = CREATEOBJECT("MSXML2.XMLHTTP")
   *!* Consulta a localidade a partir do site do Google Maps (http://maps.google.com/maps)
   m.loxmlhttp.OPEN("POST",m.url,.F.)
   m.loxmlhttp.setrequestheader("content-type", "application/x-www-form-urlencoded")
   m.loxmlhttp.SEND(m.parametros)
   m.lcresponse = loxmlhttp.responsetext
   m.loxmlhttp = .NULL.
   *!* Cursor que guardará as informações encontradas
   CREATE CURSOR (m.nomecursor) (cnome c(50), endereco c(100), cep c(20), ddd c(2), telefone c(10))
   *!*
   m.conttemp = 1
   m.cnome = STREXTRACT(m.lcresponse, [,name:"],[",],m.conttemp)
   DO WHILE !EMPTY(m.cnome)
      *!* Endereço completo
      m.strtemp2 = ALLTRIM(STRTRAN(STREXTRACT(m.lcresponse, [addressLines:["],'"],',m.conttemp),["], ""))
      *!* Extrai o CEP do endereço completo
      m.cep = STRTRAN( GETWORDNUM(m.strtemp2,GETWORDCOUNT(m.strtemp2,","),",") ,"-", "")
      *!* Extrai o endereço, sem o CEP
      m.endereco = ALLTRIM(STRTRAN( LEFT(m.strtemp2, LEN(m.strtemp2)-LEN(m.cep)) , ",", "", ;
         IIF(OCCURS(",",m.strtemp2)<=0,1,OCCURS(",",m.strtemp2))))
      *!* Telefone completo      
      m.strtemp2 = STREXTRACT(m.lcresponse, [phones:[{number:"(0xx)],'"}],',m.conttemp)      
      *!* Extrai o DDD do telefone completo
      ddd = GETWORDNUM(m.strtemp2, 1)
      *!* Extrai o telefone, sem o DDD
      m.telefone = GETWORDNUM(m.strtemp2, 2)
      *!* Insere os dados no cursor
      INSERT INTO (m.nomecursor) (cnome, endereco, cep, ddd, telefone) ;
         VALUES (m.cnome, m.endereco, ALLTRIM(m.cep), m.ddd, m.telefone)
      *!*
      m.conttemp = m.conttemp + 1
      *!* Próximo local encontrado
      m.cnome = STREXTRACT(m.lcresponse, [,name:"],[",],m.conttemp)
   ENDDO
   *!* Retorna o nome do cursor contendo as possíveis informações
   RETURN m.nomecursor
ENDFUNC

Espero que seja útil aos colegas!
Very Happy

Nota: Havendo alguma falha, ou algo que possa ser melhorado, favor comunicar!


Última edição por Marcos Guedes em 10/11/2009, 08:41, editado 3 vez(es)

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 28/10/2009, 14:37

Segue um exemplo utilizando a rotina (No arquivo encontra-se um aplicativo e o projeto do mesmo):

Clique aqui para realizar o download!

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia GOOGLE MAPAS

Mensagem por alceu11 em 3/11/2009, 07:58

Bom Dia
Marcos
Desculpe, nao estou conseguindo rodar a pesquisa google mapas
Baixei as dua rotinas, e executei no vfp90, abre um browse, e apos isto nao acontece ]
fecho browse. e nao esta indo buscar


Parabens pelo dowload ja caia num ftp de dowload
Depois o projeto rodei, pede para digitar a busca, digitei west plasa nada aconteceu, morro do careca ai ele achou a rua e o cep,
Pergunto nao tem como abrir a o site do google, com o que eu digitei na busca?
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia GOOGLE MAPAS

Mensagem por alceu11 em 3/11/2009, 08:26

Marcos
Funcionou, nao estava sabendo usar o aplicativo, por sinal muito bom!!!

Depois de novo teste do projeto coloquei shopping morumbi, apareceu varios resultados,
Entao concluir que tenho que digitar um local especifico, entao desculpe a minha falha, mais porem gostaria se possivel, que tambem abrisse o google com os enderecos encontrados isto e possivel?
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 3/11/2009, 09:58

[Você precisa estar registrado e conectado para ver este link.] escreveu:Marcos
Funcionou, nao estava sabendo usar o aplicativo, por sinal muito bom!!!

Depois de novo teste do projeto coloquei shopping morumbi, apareceu varios resultados,
Entao concluir que tenho que digitar um local especifico, entao desculpe a minha falha, mais porem gostaria se possivel, que tambem abrisse o google com os enderecos encontrados isto e possivel?
Olá, Alceu!
Quanto às pesquisas, tente colocar dados mais específicos.
A rotina se comportada da mesma forma que no seguinte link:
[Você precisa estar registrado e conectado para ver este link.]

Sobre os endereços, estou observando o que mais consigo extrair pois realmente está um pouco complexo.
Smile

Qualquer dúvida a mais sobre a rotina é só postar.
Grato pela participação!
Very Happy

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia GOOGLE MAPAS

Mensagem por alceu11 em 3/11/2009, 11:33

[Você precisa estar registrado e conectado para ver este link.] escreveu:Quanto às pesquisas, tente colocar dados mais específicos.
A rotina se comportada da mesma forma que no seguinte link:
[Você precisa estar registrado e conectado para ver este link.]

Marcos e como fazer para digitar o endereco, e ir direto para o link
com a rua solicitada
no [Você precisa estar registrado e conectado para ver este link.]
??
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 3/11/2009, 12:25

Poderias citar um exemplo de endereço, e também o exemplo de retorno que gostarias de obter?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia GOOGLE MAPAS

Mensagem por alceu11 em 3/11/2009, 14:29

Endereco e este
rua santa angela, 68 sao paulo-sp ele retornaria, o link, o mapa e localizacao e os dados
tenta ai?
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 6/11/2009, 09:48

marcos estou esperando uma resposta, so quero que abra, o google, com rua que digitei , rua santa angela, 6 sao paulo-sp, preciso urgente!!!
Q
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 6/11/2009, 10:36

Alceu, desculpe-me a demora!
Não sei se é isto que você está precisando:
Código:
abrirpaginagooglemaps("rua santa angela, 6 sao paulo-sp")

PROCEDURE abrirpaginagooglemaps AS void
  LPARAMETERS localizacao AS STRING
  *!*
  LOCAL _open AS HYPERLINK
  LOCAL pcurl AS STRING
  *!*
  m.pcurl = "http://maps.google.com/maps?q=" + ""
  m.pcurl = m.pcurl + m.localizacao + ""
  *!*
  m._open = NEWOBJECT("hyperlink")
  m._open.NAVIGATETO(m.pcurl)
  m._open = NULL
ENDPROC

Resolve?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 6/11/2009, 11:32

isto ai meu camarada, so preciso antes buscar em clientes a rua
pior que na versao 6 nao tem inptubox
da pra melhorar
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 6/11/2009, 11:59

Marcos desconsidere a repsosta anterior isto mesmo queria
depois que achou a rua no google
:
print o mapa em um arquivo jpeg
e carregue no em 1 form a imagem do mapa jpeg e mostre na tela
entedeu
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 6/11/2009, 12:13

affraid

esta certamente não é uma tarefa fácil, mas você poderia abrir esta página num form contendo um web browser, e o próprio usuário recortar o mapa.

Não serviria?

scratch

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 6/11/2009, 12:27

Pode ser achei legal, pode demonstrar isto, num form em web brows achei mais pratico, coloque num exemplo form por favor,e se nao encontrar a rua
nao abre o web browse, e diz wait windo ' nao encontrei'.

O web browse nao e demorado nao?
aguardo anciosamente!!
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 6/11/2009, 14:25

Alceu, não utilizo o VFP 6, mas vê se este exemplo funciona:

Clique aqui para fazer o download!

Obs: Testando no VFP 9.0

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia GOOGLE

Mensagem por alceu11 em 6/11/2009, 15:08

PRECISA aumentar o web browser para ver o mapa no formulario
com fazer isto ?
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 6/11/2009, 15:09

Como assim aumentar?
Como está o teu?
Podes mandar um Print Screen da tela?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 6/11/2009, 16:10

pode fazer um form em vfp90 da pesquisa do mapa?
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 6/11/2009, 16:38

Segue um projeto com 3 modelos.
Espero que ajude!

Clique aqui para realizar o download!

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 7/11/2009, 09:52

Consegui rodá-lo na versão 6 (em espanhol), também!
Segue o projeto completo:

Clique aqui para baixar o arquivo!

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por alceu11 em 7/12/2009, 16:15

Marcos agora que ta tudo funcionando preciso de mais uma funcionalidade,

[Você precisa estar registrado e conectado para ver este link.]
Preciso agora de como chegar, ele acha rua e posiciona no mapa,

Acima do link tem um tipo link ou botao como chegar
preciso que ele abra como chegar
para pegar o endereco de partida do prestador de servicos, para montar, qtos kms vai percorrer, e o tempo estimado, isto tudo o google faz,
So preciso que voce abra nesta rotina como chegar?
E possivel fazer isto Marcos?
[Você precisa estar registrado e conectado para ver este link.]
FICARIA ASSIM COMO CHEGAR CONF. LINK ACIMA
avatar
alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 8/12/2009, 14:12

Alceu, verei as possibilidades de extrair as informações que você precisa!

Caso não seja possível, no momento, acredito que em breve será utilizando a API do NAVTEQ:
- [Você precisa estar registrado e conectado para ver este link.]

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 2/3/2010, 13:25

Alceu... ainda não tive tempo de fazer a rotina da forma como solicitasse.
Mas pesquisando na net, acredito que a API do Google é a mais indicada:

- Google Maps API
- Google API

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por hugo em 2/3/2010, 14:06

to de bobs roxo

caraca

colocar no sistema um botao pra galera da logistica
onde na montagem de carga o cara clica sobre o pedido
e ve na tela o mapa de onde ta o camarada, com km e tudo
mais

sinceramente, isto num sistema ficaria muito fino

bora jogar esta ideia la pro projeto (no futuro, claro)

hauahauahauahauaha

amo muito tudo isto!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]
avatar
hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Astúcia Re: Google Maps - <<<

Mensagem por Marcos Guedes em 2/3/2010, 14:11

Estou devendo isto para o Alceu faz um tempo.

A forma provisória está numa mensagem que postei neste tópico:
[Você precisa estar registrado e conectado para ver este link.]

Porém, da forma como o Alceu pretende é melhor e mais elegante.

Só me resta tempo para estudar a API do Google e ver uma forma de montar este mapa numa aplicação desktop.

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Página 1 de 3 1, 2, 3  Seguinte

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum